if ($lb_existe) {
uf_pintardetalle($lo_object, $li_totrows, $li_montot);
uf_pintardetallescg($lo_objectscg, $li_totrowsscg, $li_totdeb, $li_tothab);
uf_agregarlineablancascg($lo_objectscg, $li_totrowsscg);
$io_msg->message("El numero de comprobante ya existe");
$lb_valido = false;
} else {
$ls_codrespri = "";
$ls_codresuso = "";
$ls_coduniadm = "";
$ls_ubigeo = "";
$ls_tiprespri = "";
$ls_tipresuso = "";
$ls_fecent = "1900-01-01";
$io_sql->begin_transaction();
$lb_valido = $io_saf->uf_saf_insert_movimento($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd, $ls_descmp, $ls_codpro, $ls_cedbene, $ls_codtipdoc, $ls_codusureg, $ls_estpromov, $la_seguridad, $ls_codrespri, $ls_codresuso, $ls_coduniadm, $ls_ubigeo, $ls_tiprespri, $ls_tipresuso, $ls_fecent, "MO", $ls_numcmp);
if ($lb_valido) {
$ls_estsoc = 0;
$ls_estmov = "";
$lb_valido = $io_saf->uf_saf_insert_dt_movimiento($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd, $ls_codact, $ls_ideact, $ls_desmov, $li_monactaux, $ls_estsoc, $ls_estmov, $la_seguridad);
if ($lb_valido) {
$ls_estact = "M";
$lb_valido = $io_saf->uf_saf_update_dtaestatus($ls_codemp, $ls_codact, $ls_ideact, $ls_estact, $la_seguridad);
if ($lb_valido) {
for ($li_i = 1; $li_i < $li_totrows; $li_i++) {
$ls_codpar = $_POST["txtcodpar" . $li_i];
$ls_denpar = $_POST["txtdenpar" . $li_i];
$li_monpar = $_POST["txtmonpar" . $li_i];
$li_cossal = $_POST["txtcossal" . $li_i];
$li_viduti = $_POST["txtviduti" . $li_i];
$li_monparaux = str_replace(".", "", $li_monpar);
if ($ls_cmpmov != "" && $ls_codcau != "" && $li_totrows > 1) {
$ls_estpromov = "0";
$ls_codpro = "----------";
$ls_cedbene = "----------";
$ls_codtipdoc = "";
$ld_feccmpbd = $io_fun->uf_convertirdatetobd($ld_feccmp);
$lb_existe = $io_saf->uf_saf_select_movimiento($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd);
if ($lb_existe) {
uf_pintardetalle($lo_object, $li_totrows, $li_montot);
uf_pintardetallescg($lo_objectscg, $li_totrowsscg, $li_totdeb, $li_tothab);
uf_agregarlineablancascg($lo_objectscg, $li_totrowsscg);
$io_msg->message("El numero de comprobante ya existe");
$lb_valido = false;
} else {
$io_sql->begin_transaction();
$lb_valido = $io_saf->uf_saf_insert_movimento($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd, $ls_descmp, $ls_codpro, $ls_cedbene, $ls_codtipdoc, $ls_codusureg, $ls_estpromov, $la_seguridad);
if ($lb_valido) {
for ($li_i = 1; $li_i < $li_totrows; $li_i++) {
$ls_codact = $_POST["txtcodact" . $li_i];
$ls_idact = $_POST["txtidact" . $li_i];
$ls_desmov = $_POST["txtdesmov" . $li_i];
$li_monact = $_POST["txtmonact" . $li_i];
$li_monact = str_replace(".", "", $li_monact);
$li_monact = str_replace(",", ".", $li_monact);
$ls_estsoc = 0;
$ls_estmov = "";
$lb_valido = $io_saf->uf_saf_insert_dt_movimiento($ls_codemp, $ls_cmpmov, $ls_codcau, $ld_feccmpbd, $ls_codact, $ls_idact, $ls_desmov, $li_monact, $ls_estsoc, $ls_estmov, $la_seguridad);
if ($lb_valido) {
$ls_estact = "R";
$lb_valido = $io_saf->uf_saf_update_dtaestatus($ls_codemp, $ls_codact, $ls_idact, $ls_estact, $la_seguridad);
if (!$lb_valido) {
