Transferencias Bancarias

"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_funciones_banco.php"); $io_fun_banco= new class_funciones_banco(); $io_fun_banco->uf_load_seguridad("SCB","sigesp_scb_p_transferencias.php",$ls_permisos,$la_seguridad,$la_permisos); $li_estciespg = $io_fun_banco->uf_load_estatus_cierre($li_estciespi,$li_estciescg); $ls_disabled = ""; if ($li_estciescg==1) { $ls_disabled = "disabled"; } $li_diasem = date('w'); switch ($li_diasem){ case '0': $ls_diasem='Domingo'; break; case '1': $ls_diasem='Lunes'; break; case '2': $ls_diasem='Martes'; break; case '3': $ls_diasem='Miércoles'; break; case '4': $ls_diasem='Jueves'; break; case '5': $ls_diasem='Viernes'; break; case '6': $ls_diasem='Sábado'; break; } ?> Transferencias Bancarias

Caja y Banco

uf_conectar(); $arre = $_SESSION["la_empresa"]; $ls_empresa = $arre["codemp"]; $io_disfin = new sigesp_scb_c_disponibilidad_financiera("../"); $ls_tipvaldis = $io_disfin->uf_load_tipo_validacion(); $in_classtrans=new sigesp_scb_c_transferencias($la_seguridad); require_once("sigesp_scb_c_movbanco.php"); $in_classmovbco=new sigesp_scb_c_movbanco($la_seguridad); if( array_key_exists("operacion",$_POST)) { $ls_operacion= $_POST["operacion"]; $ld_fecha=$_POST["txtfecha"]; $ls_opeorigen=$_POST["cmboperacionorigen"]; $ls_opedestino=$_POST["cmboperaciondestino"]; $ls_docorigen=$_POST["txtdocorigen"]; $ls_docdestino=$_POST["txtdocdestino"]; $ls_codban=$_POST["txtcodban"]; $ls_denban=$_POST["txtdenban"]; $ls_cuenta_banco=$_POST["txtcuenta"]; $ls_dencuenta_banco=$_POST["txtdenominacion"]; $ls_codbandestino=$_POST["txtcodbandestino"]; $ls_denbandestino=$_POST["txtdenbandestino"]; $ls_cuenta_bancodestino=$_POST["txtcuentadestino"]; $ls_dencuenta_bancodestino=$_POST["txtdenominaciondestino"]; $ls_cuenta_scg=$_POST["txtcuenta_scg"]; $ls_cuenta_scgdestino=$_POST["txtcuenta_scgdestino"]; $ldec_disponible=$_POST["txtdisponible"]; $ldec_disponibledestino=$_POST["txtdisponibledestino"]; if($ls_opeorigen=="CH") { $ls_chevau=""; } $ldec_mondeb=0; $ldec_monhab=0; $ldec_diferencia=0; $ldec_monspg=0; $ldec_monspi=0; $ldec_montomov=$_POST["txtmonto"]; if(($ls_opeorigen=='CH')&&(array_key_exists("txtmonobjret",$_POST))) { $ldec_monobjret=$_POST["txtmonobjret"]; $ldec_monobjret=str_replace(".","",$ldec_monobjret); $ldec_monobjret=str_replace(",",".",$ldec_monobjret); } else { $ldec_monobjret=0; } if(($ls_opeorigen=='CH')&&(array_key_exists("txtretenido",$_POST))) { $ldec_montoret=$_POST["txtretenido"]; $ldec_montoret=str_replace(".","",$ldec_montoret); $ldec_montoret=str_replace(",",".",$ldec_montoret); } else { $ldec_montoret=0; } $ldec_montomov=str_replace(".","",$ldec_montomov); $ldec_montomov=str_replace(",",".",$ldec_montomov); $ls_desmov=$_POST["txtconcepto"]; if(array_key_exists("chkestinternet",$_POST)) { $li_chkinternet=1; $lb_chkinternet="checked"; } else { $li_chkinternet=0; $lb_chkinternet=""; } } else { $ls_operacion= "NUEVO" ; $lb_chkinternet=""; $ls_numtrans=""; } function uf_nuevo() { if(array_key_exists("la_deducciones",$_SESSION)) { unset($_SESSION["la_deducciones"]); } global $ls_opeorigen; $ls_opeorigen=""; global $ls_opedestino; $ls_opedestino=""; global $ls_docorigen; $ls_docorigen=""; global $ls_docdestino; $ls_docdestino=""; global $ls_codban; $ls_codban=""; global $ls_denban; $ls_denban=""; global $ls_cuenta_banco; $ls_cuenta_banco=""; global $ls_dencuenta_banco; $ls_dencuenta_banco=""; global $ls_codbandestino; $ls_codbandestino=""; global $ls_denbandestino; $ls_denbandestino=""; global $ls_cuenta_bancodestino; $ls_cuenta_bancodestino=""; global $ls_dencuenta_bancodestino; $ls_dencuenta_bancodestino=""; global $ls_cuenta_scg; $ls_cuenta_scg=""; global $ls_cuenta_scgdestino; $ls_cuenta_scgdestino=""; global $ldec_disponible; $ldec_disponible="0,00"; global $ldec_disponibledestino; $ldec_disponibledestino="0,00"; global $ls_provbene; $ls_provbene="----------"; global $ls_desproben; $ls_desproben="Ninguno"; global $ls_tipo; $ls_tipo="-"; global $lastspg; $lastspg = 0; global $ld_fecha; $ld_fecha=date("d/m/Y"); global $lastscg; $lastscg=0; global $lastret; $lastret=0; global $lastspi; $lastspi=0; global $ldec_mondeb; $ldec_mondeb=0; global $ldec_monhab; $ldec_monhab=0; global $ldec_diferencia; $ldec_diferencia=0; global $ldec_monspg; $ldec_monspg=0; global $ldec_monspi; $ldec_monspi=0; global $ldec_montomov; $ldec_montomov=""; global $ldec_monobjret; $ldec_monobjret=""; global $ldec_montoret; $ldec_montoret=""; global $ls_codconmov; $ls_codconmov='---'; global $ls_desmov; $ls_desmov=""; global $lb_nocontab; $lb_nocontab=""; global $li_estint; $li_estint=0; global $ls_ctascg; global $ls_denctascg; //Cuentas auxiliares para transferencia/// $ls_ctascg=""; $ls_denctascg=""; ////////////////////////////////////////// } if($ls_operacion == "NUEVO") { $ls_operacion= "" ; uf_nuevo(); } if(($ls_operacion!="")&&($ls_codban==$ls_codbandestino)&&($ls_cuenta_banco==$ls_cuenta_bancodestino)) { $ls_codbandestino=""; $ls_denbandestino=""; $ls_cuenta_bancodestino=""; $ls_dencuenta_bancodestino=""; $ls_opeorigen=""; $ls_opedestino=""; $ls_cuenta_scgdestino=""; $msg->message("Cuenta origen y destino son iguales,Verifique"); } if($ls_operacion == "GUARDAR") { if($ls_opeorigen =='CH') { $ls_chevau = $_POST["txtchevau"]; } else { $ls_chevau = ""; } $ls_conmov=$_POST["txtconcepto"]; $li_row=1; //Inserto en el datastore los datos del origen del movimiento $arr_data["numtra"][1]=$ls_docorigen; $arr_data["Codban"][1]=$ls_codban; $arr_data["Ctaban"][1]=$ls_cuenta_banco; $arr_data["numdoc"][1]=$ls_docorigen; $arr_data["codope"][1]=$ls_opeorigen; $arr_data["fecmov"][1]=$ld_fecha; $arr_data["concepto"][1]=$ls_conmov; $arr_data["ced_bene"][1]='----------'; $arr_data["cod_prov"][1]='----------'; $arr_data["debhab"][1]='H'; $arr_data["scg_cuenta"][1]=$ls_cuenta_scg; $arr_data["nomproben"][1]='--------------- '; $arr_data["estmov"][1]='N'; $arr_data["monto"][1] =doubleval($ldec_montomov)-doubleval($ldec_montoret); $arr_data["monobjret"][1]=$ldec_monobjret; $arr_data["monret"][1]=$ldec_montoret; $arr_data["chevau"][1]=$ls_chevau; $arr_data["estbpd"][1]='M'; $arr_data["procede_doc"][1]='SCBTRA'; $arr_data["estmovint"][1]=0; $arr_data["codded"][1]='00000'; $li_row=$li_row+1; $arr_data["numtra"][$li_row]=$ls_docorigen; $arr_data["Codban"][$li_row]=$ls_codban; $arr_data["Ctaban"][$li_row]=$ls_cuenta_banco; $arr_data["numdoc"][$li_row]=$ls_docdestino; $arr_data["codope"][$li_row]=$ls_opeorigen; $arr_data["fecmov"][$li_row]=$ld_fecha; $arr_data["concepto"][$li_row]=$ls_conmov; $arr_data["ced_bene"][$li_row]='----------'; $arr_data["cod_prov"][$li_row]='----------'; $arr_data["debhab"][$li_row]='D'; $arr_data["scg_cuenta"][$li_row]=$ls_cuenta_scgdestino; $arr_data["nomproben"][$li_row]='--------------- '; $arr_data["estmov"][$li_row]='N'; $arr_data["monto"][$li_row] =$ldec_montomov; $arr_data["monobjret"][$li_row]=$ldec_monobjret; $arr_data["monret"][$li_row]=$ldec_montoret; $arr_data["chevau"][$li_row]=$ls_chevau; $arr_data["estbpd"][$li_row]='M'; $arr_data["procede_doc"][$li_row]='SCBTRA'; $arr_data["codded"][$li_row]='00000'; $arr_data["estmovint"][$li_row]=0; if(array_key_exists("la_deducciones",$_SESSION)) { $la_deducciones=$_SESSION["la_deducciones"]; $li_total=count($la_deducciones["Codded"]); for($i=1;$i<=$li_total;$i++) { if(array_key_exists("$i",$la_deducciones["Codded"]))//6 { $ls_ctascgded=$la_deducciones["SC_Cuenta"][$i]; $ls_dended=$la_deducciones["Dended"][$i]; $ls_codded=$la_deducciones["Codded"][$i]; $ldec_objret=$la_deducciones["MonObjRet"][$i]; $ldec_montoret=$la_deducciones["MonRet"][$i]; if($ls_codded!="") { $li_row=$li_row+1; $arr_data["numtra"][$li_row]=$ls_docorigen; $arr_data["Codban"][$li_row]=$ls_codban; $arr_data["Ctaban"][$li_row]=$ls_cuenta_banco; $arr_data["numdoc"][$li_row]=$ls_docorigen; $arr_data["codope"][$li_row]=$ls_opeorigen; $arr_data["fecmov"][$li_row]=$ld_fecha; $arr_data["concepto"][$li_row]=$ls_dended; $arr_data["ced_bene"][$li_row]='----------'; $arr_data["cod_prov"][$li_row]='----------'; $arr_data["debhab"][$li_row]='H'; $arr_data["scg_cuenta"][$li_row]=$ls_ctascgded; $arr_data["nomproben"][$li_row]='--------------- '; $arr_data["estmov"][$li_row]='N'; $arr_data["monto"][$li_row] =$ldec_montoret; $arr_data["monobjret"][$li_row]=$ldec_objret; $arr_data["monret"][$li_row]=$ldec_montoret; $arr_data["chevau"][$li_row]=$ls_chevau; $arr_data["estbpd"][$li_row]='M'; $arr_data["procede_doc"][$li_row]='SCBTRA'; $arr_data["codded"][$li_row]=$ls_codded; $arr_data["estmovint"][$li_row]=0; } } } } //Inserto en el datastore los datos del destino del movimiento $li_row=1; $arr_datadestino["numtra"][$li_row]=$ls_docdestino; $arr_datadestino["Codban"][$li_row]=$ls_codbandestino; $arr_datadestino["Ctaban"][$li_row]=$ls_cuenta_bancodestino; $arr_datadestino["numdoc"][$li_row]=$ls_docdestino; $arr_datadestino["codope"][$li_row]=$ls_opedestino; $arr_datadestino["fecmov"][$li_row]=$ld_fecha; $arr_datadestino["concepto"][$li_row]="Tansferencia de Fondos, del ".$ls_codban." cuenta ".$ls_cuenta_banco." al ".$ls_codbandestino." cuenta ".$ls_cuenta_bancodestino; $arr_datadestino["ced_bene"][$li_row]='----------'; $arr_datadestino["cod_prov"][$li_row]='----------'; $arr_datadestino["nomproben"][$li_row]='Ninguno'; $arr_datadestino["estmov"][$li_row]='L'; $arr_datadestino["monto"][$li_row] =$ldec_montomov; $arr_datadestino["monobjret"][$li_row]=0; $arr_datadestino["monret"][$li_row]=0; $arr_datadestino["chevau"][$li_row]=""; $arr_datadestino["estbpd"][$li_row]='M'; $arr_datadestino["procede_doc"][$li_row]='SCBTRA'; $arr_datadestino["estmovint"][$li_row]=0; $arr_datadestino["codded"][$li_row]='00000'; $in_classtrans->io_sql->begin_transaction(); $lb_valido=$in_classtrans->uf_procesar_transferencia($arr_data,$arr_datadestino,$la_seguridad); if($lb_valido) { $in_classtrans->io_sql->commit(); $msg->message("Movimiento Registrado !!!"); uf_nuevo(); } else { $in_classtrans->io_sql->rollback(); $msg->message("Error en transacción".",".$in_classtrans->is_msg_error); } } if($ls_opeorigen=='CH') { require_once("sigesp_scb_c_movbanco.php"); $in_classmovbco=new sigesp_scb_c_movbanco($la_seguridad); $ls_chevau=$in_classmovbco->uf_generar_voucher($ls_empresa); $lb_selCH="selected"; $lb_selND=""; $ls_opedestino="DP"; $ls_destino="Depósito"; } else { $lb_selCH=""; $lb_selND="selected"; $ls_opedestino="NC"; $ls_destino="Nota de Crédito"; } if($ls_operacion == "VERIFICAR_VAUCHER") { $ls_chevaux=$_POST["txtchevau"]; $lb_existe=$in_classmovbco->uf_select_voucher($ls_chevaux); if($lb_existe) { $msg->message("Nº de Voucher ya existe, favor indicar otro"); $ls_chevau=""; } else { $ls_chevau=$ls_chevaux; } } ?>

uf_print_permisos($ls_permisos,$la_permisos,$ls_logusr,"location.href='sigespwindow_blank.php'"); unset($io_fun_banco); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// ?>

Transferencias Bancarias

		Fecha	onKeyDown="javascript:ue_formato_fecha(this,'/',patron,true,event);" onBlur="javascript: ue_validar_formatofecha(this);uf_validar_estatus_mes();">
Concepto Movimiento	>
Monto	" size="24" >		" size="24">
	" size="24" readonly>	Via Web	>

Datos de Origen

Documento	>
Banco
Cuenta
Cuenta Contable		Disponible
Operación			"; } ?>

Datos de Destino

Documento	>
Banco
Cuenta
Cuenta Contable		Disponible
Operación