FLUX_DTA_MOV&v_men_id=$v_men_id&cemp=$cemp&v_usr_id=$v_usr_id&sessao=$sessao" . chr(34); } ?>
"; ?>
Mes Base :
JANEIRO"; if ($mes == '02') echo "
FEVEREIRO"; if ($mes == '03') echo "
MARÇO"; if ($mes == '04') echo "
ABRIL"; if ($mes == '05') echo "
MAIO"; if ($mes == '06') echo "
JUNHO"; if ($mes == '07') echo "
JULHO"; if ($mes == '08') echo "
AGOSTO"; if ($mes == '09') echo "
SETEMBRO"; if ($mes == '10') echo "
OUTUBRO"; if ($mes == '11') echo "
NOVEMBRO"; if ($mes == '12') echo "
DEZEMBRO"; ?>
JANEIRO
FEVEREIRO
MARÇO
ABRIL
MAIO
JUNHO
JULHO
AGOSTO
SETEMBRO
OUTUBRO
NOVEMBRO
DEZEMBRO
Ano Base :
$ano"; ?>
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
"; echo "
TODOS"; echo "
01"; echo "
02"; echo "
03"; echo "
04"; echo "
05"; } else { echo "
"; } ?>
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
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image5','','images/bt_atualizar.gif',1)">
Gerar
Visualizando:
$mes/$ano
 
"; } ?>
Data
Emp
Cód
TP
Descrição
Entrada
Saída
Saldo
= '$primeiro' AND FLUX_DTA_MOV < '$ultimo' AND FLXM_EMP_ID = $cemp AND FLUX_TIPO = 2"; $sth = ibase_query($dbh, $stmt); $stmt="SELECT FLXM_SEG, FLXM_TER, FLXM_QUA, FLXM_QUI, FLXM_SEX, FLXM_SAB, FLXM_DOM, FLXM_VALOR FROM FLUXO_M WHERE FLXM_EMP_ID = $cemp AND FLXM_MES = $mes AND FLXM_ANO = $ano"; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $vlr_m = $row->FLXM_VALOR; $seg = $row->FLXM_SEG; $ter = $row->FLXM_TER; $qua = $row->FLXM_QUA; $qui = $row->FLXM_QUI; $sex = $row->FLXM_SEX; $sab = $row->FLXM_SAB; $dom = $row->FLXM_DOM; } $qdiax = qtd_dias_mes($mes,$ano); for ($i=1; $i<=$qdiax; $i++) { if ($i < 10) $data = '0' . $i . '/' . $mes . '/' . $ano; else $data = $i . '/' . $mes . '/' . $ano; $dias = DiaSemanaD($data); if ($dias == '3') $valor2 = $vlr_m * $ter; if ($dias == '4') $valor2 = $vlr_m * $qua; if ($dias == '5') $valor2 = $vlr_m * $qui; if ($dias == '6') $valor2 = $vlr_m * $sex; if ($dias == '0') $valor2 = $vlr_m * $sab; if ($dias == '1') $valor2 = $vlr_m * $dom; if ($dias == '2') $valor2 = $vlr_m * $seg; $dtamov2 = FormatDate2($data); $stmt =(" SELECT MAX(FLUX_ID) AS CONTADOR FROM FLUXO WHERE FLUX_EMP_ID = $cemp AND FLUX_DTA_MOV = '$dtamov2' "); $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $codigo = 1 + $row->CONTADOR; } $stmt ="INSERT INTO FLUXO (FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_ES ,FLUX_DTA_CAD ,FLUX_DTA_MOV ,FLUX_USR_ID ,FLUX_VALOR ,FLUX_TIPO) VALUES ($codigo, $cemp, UPPER('ALUGUEL'), 'E', '$v_dta_cad', '$dtamov2', '$v_usr_id', $valor2, 2) "; $sth = ibase_query($dbh, $stmt); } $mf = $mes + 1; if ($mf == 13) { $mf = 1; $af = $ano + 1; } if ($mf < 10) { $mf = '0' . $mf; } if ($dia == "") { $di = $mes . '/01/' . $ano; $df = $mf . '/01/' . $af; } else { $di = $mes . '/' . $dia . '/' . $ano; $df = $mes . '/' . $dia . '/' . $ano; } $stmt="SELECT FLXA_VALOR ,FLXA_ES ,FLXA_DESCRICAO ,FLXA_OBS ,FLXA_DIA ,FLXA_DTA_INI ,FLXA_DTA_FIM FROM FLUXO_A WHERE FLXA_DTA_INI <= '$di' AND FLXA_DTA_FIM >= '$df' AND FLXA_STATUS = 1 AND FLXA_EMP_ID = $cemp"; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $dtamov3 = $mes . '/' . $row->FLXA_DIA . '/' . $ano; $stmt2 =(" SELECT MAX(FLUX_ID) AS CONTADOR FROM FLUXO WHERE FLUX_EMP_ID = $cemp AND FLUX_DTA_MOV = '$dtamov3' "); $sth2 = ibase_query($dbh, $stmt2); while ($row2 = ibase_fetch_object ($sth2)) { $codigo = 1 + $row2->CONTADOR; } $stmt2 ="INSERT INTO FLUXO (FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_OBS ,FLUX_ES ,FLUX_DTA_CAD ,FLUX_DTA_MOV ,FLUX_USR_ID ,FLUX_VALOR ,FLUX_TIPO) VALUES ($codigo, $cemp, UPPER('$row->FLXA_DESCRICAO'), UPPER('$row->FLXA_OBS'), '$row->FLXA_ES', '$v_dta_cad', '$dtamov3', '$v_usr_id', $row->FLXA_VALOR, 2) "; $sth2 = ibase_query($dbh, $stmt2); } } if ($dia == "") $diaini = $mes . '/01/' . $ano; else $diaini = $mes . '/' . $dia . '/' . $ano; $qdia = qtd_dias_mes($mes,$ano); $diafim = $mes . '/' . $qdia . '/' . $ano; $saldoi = 0; $stmt="SELECT FLUX_VALOR ,FLUX_ES FROM FLUXO WHERE FLUX_DTA_MOV < '$diaini' AND FLUX_EMP_ID = $cemp"; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { if ($row->FLUX_ES == 'E') $saldoi = $saldoi + $row->FLUX_VALOR; else $saldoi = $saldoi - $row->FLUX_VALOR; } } echo "
Inicial
"; printf("%6.2f", $saldoi); echo "
"; $cor = 1; $saldo = $saldoant; $tent = 0; $tsai = 0; $semanaat = 0; $sem = 1; if (($mes != "") && ($ano != "")) { if ($dia == "") { $stmt2="SELECT FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_VALOR ,FLUX_OBS ,FLUX_ES ,FLUX_DTA_MOV ,FLUX_TIPO FROM FLUXO WHERE FLUX_DTA_MOV >= '$primeiro' AND FLUX_DTA_MOV < '$ultimo' AND FLUX_EMP_ID = $cemp ORDER BY FLUX_DTA_MOV,FLUX_EMP_ID,FLUX_ID "; $stmt="SELECT FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_VALOR ,FLUX_OBS ,FLUX_ES ,FLUX_DTA_MOV ,FLUX_TIPO FROM FLUXO WHERE FLUX_DTA_MOV >= '$primeiro' AND FLUX_DTA_MOV < '$ultimo' AND FLUX_EMP_ID = $cemp ORDER BY FLUX_DTA_MOV,FLUX_EMP_ID,FLUX_ID "; } else { $filtro = $mes . "/" . $dia . "/" . $ano; $stmt2="SELECT FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_VALOR ,FLUX_OBS ,FLUX_ES ,FLUX_DTA_MOV ,FLUX_TIPO FROM FLUXO WHERE FLUX_DTA_MOV = '$filtro' AND FLUX_EMP_ID = $cemp ORDER BY FLUX_DTA_MOV,FLUX_EMP_ID,FLUX_ID "; $stmt="SELECT FLUX_ID ,FLUX_EMP_ID ,FLUX_DESCRICAO ,FLUX_VALOR ,FLUX_OBS ,FLUX_ES ,FLUX_DTA_MOV ,FLUX_TIPO FROM FLUXO WHERE FLUX_DTA_MOV = '$filtro' AND FLUX_EMP_ID = $cemp ORDER BY FLUX_DTA_MOV,FLUX_EMP_ID,FLUX_ID "; } $cont_reg = 0; $cont_reg_2 = 0; $empa = 0; $cont_ttt = 1; $sth = ibase_query($dbh, $stmt2); while ($row = ibase_fetch_object ($sth)) { $cont_reg_2 = $cont_reg_2 + 1; } $saldo = $saldoi; $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $data = FormatDate($row->FLUX_DTA_MOV); $ano = substr($row->FLUX_DTA_MOV,0,4); $mes = substr($row->FLUX_DTA_MOV,5,2); $dia = substr($row->FLUX_DTA_MOV,8,2); $link = chr(34) . "exc_fluxo.php?cemp=$cemp&fluxo=$row->FLUX_ID&dtaflux=$row->FLUX_DTA_MOV&mes=$mes&ano=$ano&v_men_id=$v_men_id&cod=$row->USR_ID&v_usr_id=$v_usr_id&cemp=$cemp&sessao=$sessao" . chr(34); if ($semanaat == 0) { $semanaat = semana_do_ano($dia, $mes, $ano); } if ($semanaat != semana_do_ano($dia, $mes, $ano)) { if (($sem == $dsem) || ($sem == $dsem - 1) || ($dsem == 0)) { echo "
"; printf("%6.2f", $saldo); echo "
"; } $sem = $sem + 1; $semanaat = semana_do_ano($dia, $mes, $ano); } $semana = semana_do_ano($dia, $mes, $ano); $cont_reg++; // $valorfat = number_format($row->FAT_VLRFAT, 2, ',', '.'); if ($row->FLUX_ES == 'E') { $saldo = $saldo + $row->FLUX_VALOR; $entrada = $row->FLUX_VALOR; $saida = ''; $tent = $tent + $row->FLUX_VALOR; } if ($row->FLUX_ES == 'S') { $saldo = $saldo - $row->FLUX_VALOR; $entrada = ''; $saida = $row->FLUX_VALOR; $tsai = $tsai + $row->FLUX_VALOR; } $sts = 'Aberto'; $cr = 6; if ($cor==1) { $somb = '#E1E1E1'; $cor = 2; } else { $somb = '#F7F7F7'; $cor = 1; } if ($row->FLUX_DESCRICAO == 'ALUGUEL') { if (($sem == $dsem) || ($dsem == 0)) { echo "
$data
$row->FLUX_EMP_ID
$row->FLUX_ID
$row->FLUX_TIPO
$row->FLUX_DESCRICAO
"; if ($row->FLUX_OBS != '') { echo"
"; } echo"
$entrada
$saida
"; printf("%6.2f", $saldo); echo "
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_excluir02.gif',1)">
"; if ($row->FLUX_DESCRICAO == 'ALUGUEL') { $f_btn++; echo"
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_arquivo01.gif',1)">
"; } else { echo"
"; } $f_btn++; echo"
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_editar02.gif',1)">
"; } } else { if (($sem == $dsem) || ($dsem == 0)) { echo "
$data
$row->FLUX_EMP_ID
$row->FLUX_ID
$row->FLUX_TIPO
$row->FLUX_DESCRICAO
"; if ($row->FLUX_OBS != '') { echo"
"; } echo"
$entrada
$saida
"; printf("%6.2f", $saldo); echo "
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_excluir02.gif',1)">
"; if ($row->FLUX_DESCRICAO == 'ALUGUEL') { $f_btn++; echo"
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_arquivo01.gif',1)">
"; } else { echo"
"; } $f_btn++; echo"
onMouseOut='MM_swapImgRestore()' onMouseOver="MM_swapImage('Image','','images/bt_editar02.gif',1)">
"; } } $f_btn++; $cont_ttt++; } } if (($sem == $dsem) || ($dsem == 0)) { echo "
$row->FLUX_EMP_ID
$row->FLUX_ID
"; printf("%6.2f", $tent); echo "
"; printf("%6.2f", $tsai); echo "
"; printf("%6.2f", $saldo); echo "
"; } echo"
"; if ($cont_reg > 0) echo "
Registros Encontrados: $cont_reg_2
"; echo "