}
}
}
}
// XXXXXXXXXXXXXXXXXXXXXXXX CANCDEBITOS XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
// separar os registros da $totcancdebitos
if ($sqlerro == false) {
$cancdebitos2 = split('#', $totcancdebitos);
$linhas4 = sizeof($cancdebitos2) - 1;
for ($b = 0; $b < $linhas4; $b++) {
$sqldeb = "select * from cancdebitosreg where k21_codigo = {$cancdebitos2[$b]}";
$resultdeb = pg_query($sqldeb);
$linhasdeb = pg_num_rows($resultdeb);
if ($linhasdeb = 0) {
// *************** excluir da cancdebitosproc
$clcancdebitos->excluir($cancdebitos2[$b]);
if ($clcancdebitos->erro_status == 0) {
$sqlerro = true;
$erro = "exclução da cancdebitos..." . $clcancdebitos->erro_sql;
}
}
}
}
// $sqlerro =true;
db_fim_transacao($sqlerro);
}
if (isset($cancelar)) {
if ($sqlerro == true) {
db_msgbox("erro = {$erro}");
} else {
db_msgbox("Cancelamento efetuado com sucesso.");
