Altera��o de Movimenta��o Financeira
 Movimento : $dtamov
 Empresa : $cemp-$empdesc

"; $dtamov2 = FormatDate2($dtamov); if ($dtamovn != '') $dtamovn = FormatDate2($dtamovn); $valor = str_replace(".","",$valor); $valor = str_replace(",",".",$valor); $valorcont = str_replace(".","",$valorcont); $valorcont = str_replace(",",".",$valorcont); if ($aluguel == '') $aluguel = 0; if ($valorcont == '') $valorcont = 0; if ($contabil == 'on') $contabil = 1; else $contabil = 0; $contm = 0; if (($dtamovn != '') && ($dtamov2 != $dtamovn)) { $stmt=("SELECT MAX(CAIX_ID) CONT FROM CAIXA ,CONTA_S ,CONTA WHERE CTAS_CTA_ID = CTA_ID AND CAIX_CTAS_ID = CTAS_ID AND CAIX_CTAS_CTA_ID = CTAS_CTA_ID AND CAIX_DTA_MOV = '$dtamovn' AND CAIX_EMP_ID = $cemp AND CAIX_ID = $caixa "); $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $contm = $row->CONT; } } if ($contm ==0) { $stmt = "UPDATE CAIXA SET CAIX_DESCRICAO = UPPER('$desc') ,CAIX_VALOR = $valor ,CAIX_OBS = UPPER('$obs') ,CAIX_ALUGUEL = $aluguel ,CAIX_TIPO_CAIXA = $tipoc ,CAIX_VALOR_CONTABIL = $valorcont "; if ($dtamovn != '') $stmt = $stmt . ",CAIX_DTA_MOV = '$dtamovn'"; $stmt = $stmt . ",CAIX_CONTABIL = $contabil WHERE CAIX_DTA_MOV = '$dtamov2' AND CAIX_EMP_ID = $cemp AND CAIX_ID = $caixa"; $sth = ibase_query($dbh, $stmt); } else { $stmt =(" SELECT MAX(CAIX_ID) CONT FROM CAIXA WHERE CAIX_DTA_MOV = '$dtamovn' AND CAIX_EMP_ID = $cemp "); $sth = ibase_query($dbh, $stmt); while ($row = ibase_fetch_object ($sth)) { $contm = $row->CONT + 1; } $stmt = "UPDATE CAIXA SET CAIX_ID = $contm ,CAIX_DESCRICAO = UPPER('$desc') ,CAIX_VALOR = $valor ,CAIX_OBS = UPPER('$obs') ,CAIX_ALUGUEL = $aluguel ,CAIX_TIPO_CAIXA = $tipoc ,CAIX_VALOR_CONTABIL = $valorcont ,CAIX_DTA_MOV = '$dtamovn' ,CAIX_CONTABIL = $contabil WHERE CAIX_DTA_MOV = '$dtamov2' AND CAIX_EMP_ID = $cemp AND CAIX_ID = $caixa"; $sth = ibase_query($dbh, $stmt); } echo " "; echo "
    
  C�digo :    $caixa
  Descri��o :    $desc
    
   Registro alterado com Sucesso !!! 
Voltar
"; } ?>