if($ls_tipo=="P") { $ls_codpro =$ls_provbene; $ls_cedbene="----------"; } else { $ls_cedbene=$ls_provbene; $ls_codpro ="----------"; } $ls_nomproben=$_POST["txtnomproben"]; $in_classmovbanco->io_sql->begin_transaction(); $ldec_montoaux=$ldec_monto_mov+$ldec_retenido+$ldec_antret; $lb_valido=$in_classmovbanco->uf_guardar_automatico($ls_codban,$ls_ctaban,$ls_mov_document,$ls_codope,$ld_fecha,$ls_mov_descripcion,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_monto_mov,$ldec_objret,$ldec_montoaux,$ls_chevau,$ls_estmov,$li_estint,$li_cobrapaga,$ls_estbpd,$ls_mov_procede,$ls_estreglib,$ls_estdoc,$ls_tipo,$ls_tipdocres,$ls_numdocres,$ls_fecdocres,$ls_tipreg,$ls_fte_financiamiento,$ls_origen,$ls_tippag,$ls_mediopago,$ls_modalidad,$ls_coduniadm,$ls_codbansig,$ls_codestpro1,$ls_codbanbene,$ls_nombanbene,$ls_ctabanbene,$ls_codbanaut,$ls_nombanaut,$ls_ctabanaut,$ls_rifaut,$ls_nombreaut,$ls_nrocontrol,$li_estserext); $arr_movbco["codban"]=$ls_codban; $arr_movbco["ctaban"]=$ls_ctaban; $arr_movbco["mov_document"]=$ls_mov_document; $ld_fecdb=$fun->uf_convertirdatetobd($ld_fecha); $arr_movbco["codope"]=$ls_codope; $arr_movbco["fecha"]=$ld_fecha; $arr_movbco["codpro"]=$ls_codpro; $arr_movbco["cedbene"]=$ls_cedbene; $arr_movbco["estmov"]=$ls_estmov; $arr_movbco["monto_mov"]=$ldec_monto_mov; $arr_movbco["objret"] =$ldec_objret; $arr_movbco["retenido"] =$ldec_retenido; $ls_codded="00000";
$ls_tipo=$_POST["rb_provbene"]; $ls_provbene=$_POST["txtprovbene"]; if($ls_tipo=='P') { $ls_codpro=$ls_provbene; $ls_cedbene='----------'; } else { $ls_cedbene=$ls_provbene; $ls_codpro='----------'; } $ls_nomproben=$_POST["txtdesproben"]; $li_estserext=0; $lb_valido=$in_classmovbco->uf_guardar_automatico($ls_codban_tesoreria,$ls_ctaban_tesoreria,$ls_docmov,$ls_mov_operacion,$ld_fecha,$ls_desmov,$ls_codconmov,$ls_codpro,$ls_cedbene,$ls_nomproben,$ldec_montomov,$ldec_monobjret,$ldec_montoret,'',$ls_estmov,0,0,'M','SCBMOV','',$ls_estdoc,$ls_tipo,$ls_tipdocressig,$ls_numdocressig,$ls_fecordpagsig,$ls_tipreg,$ls_codfuefin,$ls_origen,$ls_forpagsig,$ls_medpagsig,$ls_modalidad,$ls_unidad,$ls_codbansig,$ls_codestpro1,$ls_codban,$ls_denban,$ls_cuenta_banco,$ls_codbanaut,$ls_nombanaut,$ls_ctabanaut,$ls_rifaut,$ls_nombreaut,$ls_nrocontrol,$li_estserext); if($lb_valido) { $in_classmovbco->io_sql->commit(); $ls_estdoc='C'; $io_msg->message("Movimiento Registrado"); } else { $in_classmovbco->io_sql->rollback(); $io_msg->message($in_classmovbco->is_msg_error); } uf_cargar_dt(); } if($ls_operacion == "ELIMINAR") {