= '$dtvenctoini' ) ";
}
if ($dtvenctofin) {
$sql .= " and (p.dtvencto <= '$dtvenctofin' ) ";
}
$selectFinal = $campos . $sql . $filtrosEspecificos . "order by c.razao ";
//Desenha o Relat�rio
Echo "
Pendências de Cliente
";
// Traz os campos de fato
$totalGeral = 0;
if (cria_matriz_campos_pelo_sql($selectFinal, &$itens)) {
for ($i = 0; $i <= (sizeof($itens) - 1); $i++) {
Echo "
Cliente: " . $itens[$i][numcli] . " - " . $itens[$i][razao] . "
";
$totalcli = BuscaFI109_det($itens[$i][codcli], $sql);
$totalGeral += $totalcli;
echo "Total: R$" . number_format($totalcli, 2, ',', '.') . "
";
}
}
echo "Total Geral: R$" . number_format($totalGeral, 2, ',', '.') . "
";
}
function BuscaFI109_det($codcli, $sql) {
include_once "funcoes.inc";
include_once '../auxiliar/strings.inc';
include_once "../bd/bd_senhas.inc";
//Le os filtros com excessao do cliente que ele vai receber apenas um
$dtvenctoini = lecookie("fi109_dtvenctoini");
$dtvenctofin = lecookie("fi109_dtvenctofin");
$p_codvnd = GetCodVnd();
//Monta o Select
$campos = " SELECT DISTINCT f.numlanc as OS, c.numcli, c.fone1, c.contato1, c.codcli, f.numlanc,
(extract(day from p.dtvencto) || '/' || extract(month from p.dtvencto) || '/' || extract(year from p.dtvencto)) as dtvencto, p.valor, p.valorpg, p.codtipo, p.numdoc,
p.numpar, f.codaux, t.descricao, p.obs, c.razao, p.pago, f.nf as numnota ";
$selectFinal = $campos . $sql . " and c.codcli = " . $codcli;
$selectFinal .= " order by c.razao, f.numlanc ";
//echo $selectFinal;
//Desenha o Relat�rio
//Cabe�alho
echo "
| Tipo Pagto |
Data Vencto |
N Venda |
Nota Fiscal |
Valor |
Obs |
| | | | | | ";
// Traz os campos de fato
$totalCli = 0;
if (cria_matriz_campos_pelo_sql($selectFinal, &$itens)) {
for ($i = 0; $i <= (sizeof($itens) - 1); $i++) {
MostraFI109_det($itens[$i][descricao], $itens[$i][dtvencto], $itens[$i][os], $itens[$i][nf], $itens[$i][valorpg], $itens[$i][obs]);
$totalCli = $totalCli + $itens[$i][valorpg];
}
}
echo "
";
return $totalCli;
}
function MostraFI109_det($descricao, $dtvencto, $os, $nf, $valorpg, $obs) {
echo "
| $descricao |
$dtvencto |
$os |
$nf |
R$" . number_format($valorpg, 2, ',', '.') . " |
$obs |
";
}
/* * *****************************************************************************
* FI109 - FIM
* **************************************************************************** */
/* * *****************************************************************************
* MV142 - INICIO
* **************************************************************************** */
function MV142() {
include_once "funcoes.inc";
include_once '../auxiliar/strings.inc';
include_once "../bd/bd_senhas.inc";
include_once '../auxiliar/datas.inc';
//Le todos os filtros
$os = lecookie("mv142_os");
$codloja = lecookie("mv142_codloja");
$codcli = lecookie("mv142_codcli");
$codstatusos = lecookie("mv142_codstatusos");
$codstatuscli = lecookie("mv142_codstatuscli");
$dtosini = lecookie("mv142_dtosini");
$dtosfin = lecookie("mv142_dtosfin");
$p_codvnd = GetCodVnd();
//Monta o Select
$sql = "
SELECT DISTINCT O.CODOS,O.OS,
((extract (day from O.DATAOS)) || '/' || (extract (month from O.DATAOS)) || '/' || (extract (year from O.DATAOS)) ) as DATAOS,
C.RAZAO, cast(substring(c.fone1 from 1 for 14) as varchar(14) ) as FONE1, C.NUMCLI,
V.VENDEDOR as VENDEDOR,
S.DESCRICAO AS STATUS,
F.DESCRICAO AS PRAZOPAGTO,
SUM((COALESCE(OI.QTDE,0))*OI.UNITCOMDESCDILUIDO) AS TOTAL,
SUM((COALESCE(OI.QTDEEXP,0))*OI.UNITCOMDESCDILUIDO) AS TOTALENTREGUE,
SUM((COALESCE(OI.QTDEEXPFALTA,0))*OI.UNITCOMDESCDILUIDO) AS TOTALSALDO
FROM OS O
JOIN OSITENSPRO OI ON OI.CODOS = O.CODOS
JOIN CLIENTES C ON C.CODCLI = O.CODCLI
JOIN TIPOSAIDAS T ON T.CODTIPOSAI = O.CODTIPOSAI
LEFT JOIN VENDEDORES V ON V.CODVND = O.CODVND
LEFT JOIN STATUS S ON S.CODSTATUS = O.CODSTATUS
LEFT JOIN FORMAS F ON F.CODFORMA = O.CODFORMA
where (O.TIPO = 2) AND (T.ISFATURAMENTO = 1) and ( v.codvnd = $p_codvnd) ";
//trata o filtro de data
if ($dtosini) {
$dtosini = ConverteDtUSABR($dtosini);
} else {
$dtosini = '01/01/1000';
}
if ($dtosfin) {
$dtosfin = ConverteDtUSABR($dtosfin);
} else {
$dtosfin = '01/01/5000';
}
//passa os filtros do relatorio
if ($os) {
$sql .= " and ( o.os containing ('$os') ) ";
}
if ($codloja) {
$sql .= " and ( o.codloja = $codloja)";
}
if ($codcli) {
$sql .= " and ( c.codcli = $codcli) ";
}
if ($codstatusos) {
$sql .= " and ( s.codstatus = $codstatusos) ";
}
if ($codstatuscli) {
$sql .= " and ( c.codclistatus = $codstatuscli) ";
}
if ($dtosini) {
$sql .= " and (o.dataos >= '$dtosini' ) ";
}
if ($dtosfin) {
$sql .= " and (o.dataos <= '$dtosfin' ) ";
}
$final = " GROUP BY O.CODOS, O.OS, O.DATAOS, C.RAZAO, c.FONE1, C.NUMCLI, 7,8,9
order by o.os, c.razao";
$sql .= $final;
// echo $sql;
echo "
Pedidos de Venda |
| Venda |
Data |
Cliente |
Telefone |
Vendedor |
Prazo Pagto |
Status |
Total |
Entregue |
Saldo |
| | | | | | ";
$totalGeral = 0;
$entregueGeral = 0;
$saldoGeral = 0;
//Desenha o Relat�rio
// Traz os campos de fato
if (cria_matriz_campos_pelo_sql($sql, &$itens)) {
for ($i = 0; $i <= (sizeof($itens) - 1); $i++) {
MostraMV142($itens[$i][os], $itens[$i][dataos], $itens[$i][numcli], $itens[$i][razao], $itens[$i][fone1], $itens[$i][vendedor], $itens[$i][prazopagto],
$itens[$i][status], $itens[$i][total], $itens[$i][totalentregue], $itens[$i][totalsaldo]);
$totalGeral += $itens[$i][total];
$entregueGeral += $itens[$i][totalentregue];
$saldoGeral += $itens[$i][totalsaldo];
}
}
echo "
| | | | | |
| | | | | |
Totais Geral: |
R$" . number_format($totalGeral, 2, ',', '.') . " |
R$" . number_format($entregueGeral, 2, ',', '.') . " |
R$" . number_format($saldoGeral, 2, ',', '.') . " |
";
}
function MostraMV142($os, $dataos, $numcli, $razao, $fone1, $vendedor, $prazopagto, $status, $total, $totalentregue, $totalsaldo) {
echo "
| $os |
$dataos |
$numcli - $razao |
$fone1 |
$vendedor |
$prazopagto |
$status |
R$" . number_format($total, 2, ',', '.') . " |
R$" . number_format($totalentregue, 2, ',', '.') . " |
R$" . number_format($totalsaldo, 2, ',', '.') . " |
";
}
/* * *****************************************************************************
* MV142 - FIM
* **************************************************************************** */
/*
*
* FUN��ES
* GERAIS
* AUXILIARES
*
*/
function MostraLookup($campo, $cod, $nomecookie, $codcookie, $pathgo) {
echo "$campo
";
}
function ListaLookup($tabela, $campo, $chave, $valorfiltro, $nomecookie, $codcookie, $pathgo) {
/*
* tabela = tabela filtrada no lookup
* campo = campo que mostra no lookup
* chave = campo chave pra associar o lookup
* valorfiltro = valor inserido pelo usuario
* nomecookie = nome do cookie pra gravar a descricao da op��o filtrada
* codcookie = nome do cookie pra gravar o codigo da op��o filtrada
* pathgo = caminho pra onde ser� redirecionada a p�gina depois de gravar os cookies
* aqui normalmente deve ser a pagina onde tem os filtros que vai abrir o rel
*/
include '../auxiliar/parametros.inc';
include 'conecta.inc.php';
$l_select = "SELECT $campo as campo, $chave as cod FROM $tabela WHERE (1=1)";
if ($valorfiltro) {
$l_select .= " and $campo containing '$valorfiltro' ";
}
$l_select .= " order by $campo";
$a_reg = qry($con, $l_select, $a_campos);
if (cria_matriz_campos($a_reg, $a_campos, $l_a_sql)) {
//se tiver resultado do select - quando encontra pelo menos um cliente
for ($i = 0; $i <= (sizeof($l_a_sql) - 1); $i++) {
MostraLookup($l_a_sql[$i][campo], $l_a_sql[$i][cod], $nomecookie, $codcookie, $pathgo);
}
}
exit;
}
function LimpaLookup($nomecookie, $codcookie) {
setcookie($nomecookie, "", time() - 3600, '/');
setcookie($codcookie, "
", time() - 3600, '/');
}
?>