"; ?>
Mes Base :
$mesd"; } else { echo "
"; } ?>
JANEIRO
FEVEREIRO
MARÇO
ABRIL
MAIO
JUNHO
JULHO
AGOSTO
SETEMBRO
OUTUBRO
NOVEMBRO
DEZEMBRO
Ano Base :
$ano"; } else { echo "
"; } for ($i = $xx; $i >= 2007 ; $i--) { echo "
$i"; } ?>
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image4','','images/bt_atualizar02.gif',1)">
Atualizar
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image5','','images/bt_incluir02.gif',1)">
Novo
Grupo / Produto
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
T.Vnd
V.Cus
V.Vnd
L.Brt
L.Lqu
= 4) { $mesA = $mes - 3; $datai = $mesA . "/01/" . $ano; } if ($mes == 1) { $mesA = 10; $anoA = $ano - 1; $datai = $mesA . "/01/" . $anoA; } if ($mes == 2) { $mesA = 11; $anoA = $ano - 1; $datai = $mesA . "/01/" . $anoA; } if ($mes == 3) { $mesA = 12; $anoA = $ano - 1; $datai = $mesA . "/01/" . $anoA; } $dataf = $mes . "/01/" . $ano; $nBru = 0; $nLiq = 0; $nBruG = 0; $nLiqG = 0; $stmt="SELECT GRUP_ID, GRUP_DESCRICAO, P1.PROC_PROD_ID PROC_PROD_ID, PROD_DESCRICAO, SUM(P1.PROC_QTDE) TOTAL_VENDA, (SELECT SUM(P2.PROC_QTDE) / 3 FROM PRODUTOS_C P2 WHERE P2.PROC_PROD_ID = P1.PROC_PROD_ID AND P2.PROC_EMP_ID = $cemp AND P2.PROC_DTA_MOV >= '$datai' AND P2.PROC_DTA_MOV < '$dataf') MEDIA, SUM(P1.PROC_VLR_CUSTO * P1.PROC_QTDE) VALOR_CUSTO, SUM(P1.PROC_VLR_VENDA * P1.PROC_QTDE) VALOR_VENDA FROM PRODUTOS_C P1 ,PRODUTOS ,GRUPO_P WHERE GRUP_ID = PROD_GRUP_ID AND PROD_ID = P1.PROC_PROD_ID AND P1.PROC_EMP_ID = $cemp AND extract(MONTH from P1.PROC_DTA_MOV) = $mes AND extract(YEAR from P1.PROC_DTA_MOV) = $ano GROUP BY GRUP_ID, GRUP_DESCRICAO, PROD_DESCRICAO, P1.PROC_PROD_ID"; $cont_reg = 0; $cont_reg_2 = 0; $empa = 0; $cont_ttt = 1; $grp = 0; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $vc = $row->VALOR_CUSTO / $row->TOTAL_VENDA; $vv = $row->VALOR_VENDA / $row->TOTAL_VENDA; $lb = $vv * $row->TOTAL_VENDA; $ll = ($vv * $row->TOTAL_VENDA) - ($vc * $row->TOTAL_VENDA); $qtd1 = 0; $qtd2 = 0; $qtd3 = 0; $qtd4 = 0; $qtd5 = 0; $qtd6 = 0; $qtd7 = 0; $qtd8 = 0; $qtd9 = 0; $qtd10 = 0; $qtd11 = 0; $qtd12 = 0; $qtd13 = 0; $qtd14 = 0; $qtd15 = 0; $qtd16 = 0; $qtd17 = 0; $qtd18 = 0; $qtd19 = 0; $qtd20 = 0; $qtd21 = 0; $qtd22 = 0; $qtd23 = 0; $qtd24 = 0; $qtd25 = 0; $qtd26 = 0; $qtd27 = 0; $qtd28 = 0; $qtd29 = 0; $qtd30 = 0; $qtd31 = 0; $prod = $row->PROC_PROD_ID; $stmt2="SELECT PROC_QTDE, extract(DAY from PROC_DTA_MOV) DIA FROM PRODUTOS_C WHERE extract(MONTH from PROC_DTA_MOV) = $mes AND extract(YEAR from PROC_DTA_MOV) = $ano AND PROC_EMP_ID = $cemp AND PROC_PROD_ID = $prod"; $sth2 = ibase_query($dbh, $stmt2); while ($row2 = ibase_fetch_object ($sth2)) { if ($row2->DIA == '1') $qtd1 = $row2->PROC_QTDE; if ($row2->DIA == '2') $qtd2 = $row2->PROC_QTDE; if ($row2->DIA == '3') $qtd3 = $row2->PROC_QTDE; if ($row2->DIA == '4') $qtd4 = $row2->PROC_QTDE; if ($row2->DIA == '5') $qtd5 = $row2->PROC_QTDE; if ($row2->DIA == '6') $qtd6 = $row2->PROC_QTDE; if ($row2->DIA == '7') $qtd7 = $row2->PROC_QTDE; if ($row2->DIA == '8') $qtd8 = $row2->PROC_QTDE; if ($row2->DIA == '9') $qtd9 = $row2->PROC_QTDE; if ($row2->DIA == '10') $qtd10 = $row2->PROC_QTDE; if ($row2->DIA == '11') $qtd11 = $row2->PROC_QTDE; if ($row2->DIA == '12') $qtd12 = $row2->PROC_QTDE; if ($row2->DIA == '13') $qtd13 = $row2->PROC_QTDE; if ($row2->DIA == '14') $qtd14 = $row2->PROC_QTDE; if ($row2->DIA == '15') $qtd15 = $row2->PROC_QTDE; if ($row2->DIA == '16') $qtd16 = $row2->PROC_QTDE; if ($row2->DIA == '17') $qtd17 = $row2->PROC_QTDE; if ($row2->DIA == '18') $qtd18 = $row2->PROC_QTDE; if ($row2->DIA == '19') $qtd19 = $row2->PROC_QTDE; if ($row2->DIA == '20') $qtd20 = $row2->PROC_QTDE; if ($row2->DIA == '21') $qtd21 = $row2->PROC_QTDE; if ($row2->DIA == '22') $qtd22 = $row2->PROC_QTDE; if ($row2->DIA == '23') $qtd23 = $row2->PROC_QTDE; if ($row2->DIA == '24') $qtd24 = $row2->PROC_QTDE; if ($row2->DIA == '25') $qtd25 = $row2->PROC_QTDE; if ($row2->DIA == '26') $qtd26 = $row2->PROC_QTDE; if ($row2->DIA == '27') $qtd27 = $row2->PROC_QTDE; if ($row2->DIA == '28') $qtd28 = $row2->PROC_QTDE; if ($row2->DIA == '29') $qtd29 = $row2->PROC_QTDE; if ($row2->DIA == '30') $qtd30 = $row2->PROC_QTDE; if ($row2->DIA == '31') $qtd31 = $row2->PROC_QTDE; } $cr = 6; $nBru = $nBru + $lb; $nLiq = $nLiq + $ll; $link = chr(34) . "exc_cons_prod.php?cemp=$cemp&grup=$row->GRUP_ID&v_men_id=$v_men_id&cod=$row->USR_ID&v_usr_id=$v_usr_id&cemp=$cemp&sessao=$sessao" . chr(34); if ($grp != $row->GRUP_ID) { if ($tg == 1) { $somb = '#999999'; echo "
TOTAL
"; printf("%6.2f", $nBruG); echo "
"; printf("%6.2f", $nLiqG); echo "
"; $nBruG = 0; $nLiqG = 0; } $tg = 1; $somb = '#C0DCE4'; echo "
$row->GRUP_DESCRICAO
"; $grp = $row->GRUP_ID; } if ($cor==1) { $somb = '#E1E1E1'; $cor = 2; } else { $somb = '#F7F7F7'; $cor = 1; } echo "
$row->PROD_DESCRICAO
$qtd1
$qtd2
$qtd3
$qtd4
$qtd5
$qtd6
$qtd7
$qtd8
$qtd9
$qtd10
$qtd11
$qtd12
$qtd13
$qtd14
$qtd15
$qtd16
$qtd17
$qtd18
$qtd19
$qtd20
$qtd21
$qtd22
$qtd23
$qtd24
$qtd25
$qtd26
$qtd27
$qtd28
$qtd29
$qtd30
$qtd31
"; if ($row->TOTAL_VENDA > $row->MEDIA) { echo "
"; printf("%6.2f", $row->TOTAL_VENDA); echo "
"; } if ($row->TOTAL_VENDA < $row->MEDIA) { echo "
"; printf("%6.2f", $row->TOTAL_VENDA); echo "
"; } if ($row->TOTAL_VENDA == $row->MEDIA) { echo "
"; printf("%6.2f", $row->TOTAL_VENDA); echo "
"; } echo "
"; printf("%6.2f", $vc); echo "
"; printf("%6.2f", $vv); echo "
"; printf("%6.2f", $lb); echo "
"; printf("%6.2f", $ll); echo "
"; $f_btn++; $nBruG = $nBruG + $lb; $nLiqG = $nLiqG + $ll; } } $somb = '#999999'; echo "
TOTAL
"; printf("%6.2f", $nBruG); echo "
"; printf("%6.2f", $nLiqG); echo "
"; $somb = '#1688AC'; echo"
TOTAL
"; printf("%6.2f", $nBru); echo "
"; printf("%6.2f", $nLiq); echo "
"; echo "
"; if ($cont_reg > 0) echo "
"; else echo "
"; echo "