source: trunk/workflow/inc/report/includes/php/listagem/lst_view.php @ 5307

Revision 5307, 2.9 KB checked in by pereira.jair, 12 years ago (diff)

Ticket #2416 - Inclusao da nova ferramenta de relatorios do workflow.

Line 
1<?php
2
3$conn = &Factory::getInstance('WorkflowObjects')->getDBWorkflow()->Link_ID->_connectionID;
4
5$BASE_URL = "index.php?menuaction=workflow.reports.view";
6
7$lstoid = $_POST['lstoid'];
8if ($lstoid == "") { $lstoid = $_GET['lstoid']; }
9
10$lstidlistagem = $_POST['idlistagem'];
11if ($lstidlistagem == "") { $lstidlistagem = $_GET['idlistagem']; }
12
13if ($lstoid != "") {
14        $sql = "select lstidlistagem, lstnome from listagem.listagem where lstoid = $lstoid";
15        $res = pg_query($conn,$sql);
16        $dados= pg_fetch_array($res);
17        $lstidlistagem = $dados["lstidlistagem"];
18} else {
19        $sql = "select lstoid, lstidlistagem, lstnome from listagem.listagem where lstidlistagem = '$lstidlistagem'";
20        $res = pg_query($conn,$sql);
21        $dados= pg_fetch_array($res);
22        $lstidlistagem = $dados["lstidlistagem"];
23        $lstoid = $dados["lstoid"];
24}
25
26$form           = new Formulario("FrmCadListagem");
27$form->setAction($BASE_URL);
28$listagem = new Listagem($lstidlistagem,"",$conn);
29$listagem->setDebug(true);
30$listagem->setUrlBasePath($GLOBALS['phpgw_info']['server']['webserver_url'] . "/workflow/inc/report");
31$listagem->carregarIDListagem($lstidlistagem);
32
33$sql_par = "select
34                lspoid,
35                lsplstoid,
36                lspidparametro,
37                lsptitulo,
38                lsptipo,
39                lspvalor_padrao,
40                lspobrigatorio
41            from
42                listagem.listagem_parametro
43            where
44                lsplstoid = $lstoid
45            order by lspoid ";
46$resu_par = pg_query($conn,$sql_par);
47
48$form->adicionarHidden("lstoid",$lstoid);
49$form->adicionarHidden("abaMenu",$abaMenu);
50$form->adicionarHidden("acao","editar");
51$exibeform = false;
52
53while ($parametro = pg_fetch_object($resu_par)) {
54    $idparametro = $parametro->lspidparametro;
55    $titulo = $parametro->lsptitulo;
56
57   
58    if ($titulo == "") {
59        $titulo = $idparametro;
60    }
61    $tipo = $parametro->lsptipo;
62    $obrigatorio = ($parametro->lspobrigatorio == "t") ? true : false;
63    $valor_padrao = $parametro->lspvalor_padrao;
64   
65    $exibeform = true;   
66   
67    $valor = $_POST[$idparametro];
68    if ($tipo == "data") {
69        $valor = $_POST[$idparametro . "_inicio"];
70    }
71    if (($valor == "") && ((!isset($_POST[$idparametro])) && (!isset($_POST[$idparametro . "_inicio"])))) { $valor = $valor_padrao; }
72   
73    if ($obrigatorio) { $titulo .= " *"; }
74
75    $form->adicionarCampo($idparametro,$tipo,$titulo. ":",$idparametro . ":",$valor,$obrigatorio);
76   
77    $listagem->setParametro($idparametro,$valor);
78   
79    $addobr = "";
80    if ($obrigatorio) { $addobr = " //OBRIGATÓRIO"; }
81   
82    $adicionarcodigo .= "\$report->setParam('$idparametro',\$$valor_$idparametro);$addobr<br>";
83}
84
85if ($exibeform) {
86    $form->adicionarQuadro("quadro1","Formulário de Pesquisa");
87    $form->adicionarSubmit("quadro1","btn_cadastrar","Pesquisar","pesquisar");
88    $form->desenhar();
89}
90
91
92echo "<center>";
93$listagem->desenhar();
94
95?>
Note: See TracBrowser for help on using the repository browser.