"; print "window.close();"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_folder/class_funciones_nomina.php"); $io_fun_nomina=new class_funciones_nomina(); $ls_permisos=""; $la_seguridad = Array(); $la_permisos = Array(); $arrResultado=$io_fun_nomina->uf_load_seguridad("SNR","sigesp_snorh_d_nominas.php",$ls_permisos,$la_seguridad,$la_permisos); $ls_permisos=$arrResultado['as_permisos']; $la_seguridad=$arrResultado['aa_seguridad']; $la_permisos=$arrResultado['aa_permisos']; ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// //-------------------------------------------------------------- function uf_limpiarvariables() { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_limpiarvariables // Access: private // Description: Función que limpia todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 01/01/2006 Fecha Última Modificación : ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom,$ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom; global $ls_racnom,$ls_adenom,$ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,$ls_descomnom,$ls_codpronom,$ls_codbennom; global $ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom,$ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$ls_estagrapo; global $ls_perresnom,$ls_operacion,$ls_existe,$io_fun_nomina,$io_nomina,$ls_activo,$ls_activo_cod,$ls_activo_contabilizacion; global $la_tippernom, $la_tipnom, $la_consulnom, $la_conaponom, $la_descomnom,$li_conta_global, $ls_disabled, $ls_disabled_subnom; global $ls_disabled_establecer, $ls_conpernom, $ls_conpronom, $ls_titrepnom, $ls_codorgcestic, $ls_confidnom, $la_confidnom; global $ls_recdocfid, $ls_tipdocfid, $ls_codbenfid, $ls_cueconfid, $ls_divcon, $ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche; global $li_estctaalt,$ls_racobrnom,$ls_nomliq, $ls_hojtienom, $ls_tiksuel, $ls_codfuefin, $ls_denfuefin,$ls_cersindis,$ls_recdoccaunom,$ls_tipdoccaunom; global $ls_codclanom, $ls_codclaapo, $ls_codclafid, $ls_codclaper, $ls_codclacau, $li_estctaaltapo, $ls_pasape; $ls_codnom=""; $ls_desnom=""; $ls_tippernom=""; $la_tippernom[0]=""; $la_tippernom[1]=""; $la_tippernom[2]=""; $la_tippernom[3]=""; $ls_despernom=""; $fecha=$_SESSION["la_empresa"]["periodo"]; $ls_anocurnom=substr($fecha,0,4); $ld_fecininom="01/01/".substr($fecha,0,4); $ls_peractnom="001"; $ls_tipnom=""; $la_tipnom[0]=""; $la_tipnom[1]=""; $la_tipnom[2]=""; $la_tipnom[3]=""; $la_tipnom[4]=""; $la_tipnom[5]=""; $la_tipnom[6]=""; $la_tipnom[7]=""; $la_tipnom[8]=""; $la_tipnom[9]=""; $la_tipnom[10]=""; $la_tipnom[11]=""; $la_tipnom[12]=""; $la_tipnom[13]=""; $la_tipnom[14]=""; $la_tipnom[15]=""; $la_tipnom[16]=""; $la_tipnom[17]=""; $la_tipnom[18]=""; $ls_subnom=""; $ls_racnom=""; $ls_racobrnom=""; $ls_nomliq=""; $ls_cersindis=""; $ls_pasape=""; $ls_hojtienom=""; $ls_adenom=""; $ls_divcon=""; $ls_espnom=""; $ls_conpronom=""; $ls_ctnom=""; $ls_tiksuel=""; $ls_ctmetnom=""; $ls_conpernom=""; $ls_consulnom="OCP"; $la_consulnom[0]=""; $la_consulnom[1]=""; $la_consulnom[2]=""; $la_consulnom[3]=""; $ls_descomnom=""; $la_descomnom[0]=""; $la_descomnom[1]=""; $la_descomnom[2]=""; $ls_codpronom="----------"; $ls_codbennom="----------"; $ls_conaponom="OCP"; $la_conaponom[0]=""; $la_conaponom[1]=""; $la_conaponom[2]=""; $la_conaponom[3]=""; $ls_cueconnom=""; $ls_notdebnom=""; $ls_numvounom="0"; $ls_recdocnom=""; $ls_recdoccaunom=""; $ls_tipdocnom=""; $ls_tipdoccaunom=""; $ls_recdocapo=""; $ls_estagrapo=""; $ls_tipdocapo=""; $ls_perresnom=""; $ls_codorgcestic=""; $ls_cueconfid=""; $ls_confidnom="OC"; $la_confidnom[0]=""; $la_confidnom[1]=""; $ls_recdocfid=""; $ls_tipdocfid=""; $ls_codbenfid="----------"; $ls_activo_contabilizacion=""; $ls_activo=""; $ls_titrepnom=""; $ls_activo_cod=""; $li_genrecdocpagperche=0; $li_estctaalt=0; $li_estctaaltapo=0; $ls_tipdocpagperche=""; $ls_disabled=" disabled"; $ls_disabled_subnom=" disabled"; $ls_disabled_establecer=" disabled"; $ls_informa=""; $ls_codfuefin="--"; $ls_denfuefin=""; $ls_operacion=$io_fun_nomina->uf_obteneroperacion(); $ls_existe=$io_fun_nomina->uf_obtenerexiste(); $ls_codclanom="--"; $ls_codclaapo="--"; $ls_codclafid="--"; $ls_codclaper="--"; $ls_codclacau="--"; $li_conta_global=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","CONTA GLOBAL","0","I"); if($li_conta_global=="0") { $li_estctaalt=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","UTILIZAR_CTA.CONTA_REC_DOC_PROV_BEN","0","I")); $li_estctaaltapo=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","UTILIZAR_CTA.CONTA_REC_DOC_PROV_BEN_APORTE","0","I")); $li_genrecdocpagperche=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO PAGO PERSONAL CHEQUE","0","I")); $ls_tipdocpagperche=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO PAGO PERSONAL CHEQUE","-","C")); $ls_consulnom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION","OCP","C"); $ls_notdebnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR NOTA DEBITO","1","I"); $ls_recdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO","0","I"); $ls_recdoccaunom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO CAUSA","0","I"); $ls_recdocfid=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO FIDEICOMISO","0" ,"I"); $ls_recdocapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO APORTE","0","I"); $ls_estagrapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","AGRUPAR APORTES","0","I"); $ls_tipdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO NOMINA","-","C"); $ls_tipdoccaunom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO CAUSADO","-","C"); $ls_tipdocapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO APORTE","-","C"); $ls_tipdocfid=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO FIDEICOMISO","-","C"); $ls_conaponom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION APORTES","OCP","C"); $ls_confidnom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION FIDEICOMISO","OCP","C"); $ls_cueconnom=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","CTA.CONTA","XXXXXXXXXXXXX","C")); $ls_cueconfid=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","CTA.CONTABLE_FIDEICOMISO","XXXXXXXXXXXXX","C")); $ls_descomnom=trim($io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION DESTINO","-","C")); $ls_codbenfid=trim($io_nomina->io_sno->uf_select_config("SNO","NOMINA","DESTINO FIDEICOMISO","----------","C")); switch (substr($ls_descomnom,0,1)) { case "P": $ls_codpronom=substr($ls_descomnom,1,strlen($ls_descomnom)-1); $ls_codbennom="----------"; break; case "B": $ls_codbennom=substr($ls_descomnom,1,strlen($ls_descomnom)-1); $ls_codpronom="----------"; break; } $ls_activo_contabilizacion="disabled"; } } //-------------------------------------------------------------- //-------------------------------------------------------------- function uf_load_variables() { ////////////////////////////////////////////////////////////////////////////// // Function: uf_load_variables // Access: private // Description: Función que carga todas las variables necesarias en la página // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 18/03/2006 Fecha Última Modificación : ////////////////////////////////////////////////////////////////////////////// global $ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom,$ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom; global $ls_racnom,$ls_adenom,$ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,$ls_descomnom,$ls_codpronom,$ls_codbennom; global $ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom,$ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$ls_estagrapo; global $io_fun_nomina,$io_nomina,$ls_conpernom,$ls_conpronom, $ls_titrepnom, $ls_codorgcestic, $ls_confidnom, $ls_recdocfid; global $ls_tipdocfid, $ls_cueconfid, $ls_codbenfid, $ls_divcon, $ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche,$li_estctaalt; global $ls_racobrnom,$ls_nomliq,$ls_hojtienom,$ls_tiksuel,$ls_codfuefin, $ls_denfuefin,$ls_cersindis,$ls_recdoccaunom,$ls_tipdoccaunom; global $ls_codclanom, $ls_codclaapo, $ls_codclafid, $ls_codclaper, $ls_codclacau, $li_estctaaltapo, $ls_pasape; $ls_codnom=$_POST["txtcodnom"]; $ls_desnom=$io_fun_nomina->uf_obtenervalor("txtdesnom",""); $ls_tippernom=$io_fun_nomina->uf_obtenervalor("cmbtippernom",""); $ls_despernom=$io_fun_nomina->uf_obtenervalor("txtdespernom",""); $ls_anocurnom=$io_fun_nomina->uf_obtenervalor("txtanocurnom",""); $ld_fecininom=$io_fun_nomina->uf_obtenervalor("txtfecininom",""); $ls_peractnom=$io_fun_nomina->uf_obtenervalor("txtperactnom",""); $ls_tipnom=$io_fun_nomina->uf_obtenervalor("cmbtipnom",""); $ls_subnom=$io_fun_nomina->uf_obtenervalor("chksubnom","0"); $ls_racnom=$io_fun_nomina->uf_obtenervalor("chkracnom","0"); $ls_racobrnom=$io_fun_nomina->uf_obtenervalor("chkracobrnom","0"); $ls_nomliq=$io_fun_nomina->uf_obtenervalor("chknomliq","0"); $ls_cersindis=$io_fun_nomina->uf_obtenervalor("chkcersindis","0"); $ls_pasape=$io_fun_nomina->uf_obtenervalor("chkpasape","0"); $ls_hojtienom=$io_fun_nomina->uf_obtenervalor("chkhojtienom","0"); $ls_adenom=$io_fun_nomina->uf_obtenervalor("chkadenom","0"); $ls_divcon=$io_fun_nomina->uf_obtenervalor("chkdivcon","0"); $ls_espnom=$io_fun_nomina->uf_obtenervalor("chkespnom","0"); $ls_conpronom=$io_fun_nomina->uf_obtenervalor("chkconpronom","0"); $ls_ctnom=$io_fun_nomina->uf_obtenervalor("chkctnom","0"); $ls_tiksuel=$io_fun_nomina->uf_obtenervalor("chkticksuel","0"); $ls_ctmetnom=$io_fun_nomina->uf_obtenervalor("txtctmetnom",""); $ls_conpernom=$io_fun_nomina->uf_obtenervalor("chkconpernom","0"); $ls_tipdocpagperche=$io_fun_nomina->uf_obtenervalor("txttipdocpagper",""); $li_genrecdocpagperche=$io_fun_nomina->uf_obtenervalor("chkgenrecdocpagper","0"); $li_estctaalt=$io_fun_nomina->uf_obtenervalor("chkestctaalt","0"); $li_estctaaltapo=$io_fun_nomina->uf_obtenervalor("chkestctaaltapo","0"); $ls_titrepnom=$_POST["txttitrepnom"]; $ls_informa=$io_fun_nomina->uf_obtenervalor("txtinforma",""); $ls_codorgcestic=$io_fun_nomina->uf_obtenervalor("txtcodorgcestic",""); $ls_codclanom=$io_fun_nomina->uf_obtenervalor("txtcodclanom","--"); $ls_codclaapo=$io_fun_nomina->uf_obtenervalor("txtcodclaapo","--"); $ls_codclafid=$io_fun_nomina->uf_obtenervalor("txtcodclafid","--"); $ls_codclaper=$io_fun_nomina->uf_obtenervalor("txtcodclaper","--"); $ls_codclacau=$io_fun_nomina->uf_obtenervalor("txtcodclacau","--"); $li_conta_global=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","CONTA GLOBAL","0","I"); if($li_conta_global=="0") { $li_estctaalt=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","UTILIZAR_CTA.CONTA_REC_DOC_PROV_BEN","0","I")); $li_estctaaltapo=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","UTILIZAR_CTA.CONTA_REC_DOC_PROV_BEN_APORTE","0","I")); $li_genrecdocpagperche=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO PAGO PERSONAL CHEQUE","0","I")); $ls_tipdocpagperche=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO PAGO PERSONAL CHEQUE","-","C")); $ls_consulnom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION","OCP","C"); $ls_notdebnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR NOTA DEBITO","1","I"); $ls_recdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO","0","I"); $ls_recdoccaunom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO CAUSA","0","I"); $ls_recdocfid=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO FIDEICOMISO","0" ,"I"); $ls_recdocapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","GENERAR RECEPCION DOCUMENTO APORTE","0","I"); $ls_estagrapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","AGRUPAR APORTES","0","I"); $ls_tipdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO NOMINA","-","C"); $ls_tipdoccaunom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO CAUSADO","-","C"); $ls_tipdocapo=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO APORTE","-","C"); $ls_tipdocfid=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO FIDEICOMISO","-","C"); $ls_conaponom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION APORTES","OCP","C"); $ls_confidnom=$io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION FIDEICOMISO","OCP","C"); $ls_cueconnom=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","CTA.CONTA","XXXXXXXXXXXXX","C")); $ls_cueconfid=trim($io_nomina->io_sno->uf_select_config("SNO","CONFIG","CTA.CONTABLE_FIDEICOMISO","XXXXXXXXXXXXX","C")); $ls_descomnom=trim($io_nomina->io_sno->uf_select_config("SNO","NOMINA","CONTABILIZACION DESTINO","-","C")); $ls_codbenfid=trim($io_nomina->io_sno->uf_select_config("SNO","NOMINA","DESTINO FIDEICOMISO","----------","C")); switch (substr($ls_descomnom,0,1)) { case "P": $ls_codpronom=substr($ls_descomnom,1,strlen($ls_descomnom)-1); $ls_codbennom="----------"; break; case "B": $ls_codbennom=substr($ls_descomnom,1,strlen($ls_descomnom)-1); $ls_codpronom="----------"; break; } } else { $ls_consulnom=$_POST["cmbconsulnom"]; $ls_descomnom=$_POST["cmbdesconnom"]; switch (substr($ls_descomnom,0,1)) { case "P": $ls_codpronom=$_POST["txtcodproben"]; $ls_codbennom="----------"; break; case "B": $ls_codbennom=$_POST["txtcodproben"]; $ls_codpronom="----------"; break; } $ls_codbenfid=$_POST["txtcodbenfid"]; $ls_conaponom=$_POST["cmbconaponom"]; $ls_confidnom=$_POST["cmbconfidnom"]; $ls_cueconnom=$_POST["txtcueconnom"]; $ls_notdebnom=$io_fun_nomina->uf_obtenervalor("chknotdebnom","0"); $ls_numvounom="0"; $ls_recdocnom=$io_fun_nomina->uf_obtenervalor("chkrecdocnom","0"); $ls_recdoccaunom=$io_fun_nomina->uf_obtenervalor("chkrecdoccaunom","0"); $ls_recdocfid=$io_fun_nomina->uf_obtenervalor("chkrecdocfid","0"); $ls_tipdocnom=$_POST["txttipdocnom"]; $ls_tipdoccaunom=$_POST["txttipdoccaunom"]; $ls_tipdocfid=$_POST["txttipdocfid"]; $ls_recdocapo=$io_fun_nomina->uf_obtenervalor("chkrecdocapo","0"); $ls_estagrapo=$io_fun_nomina->uf_obtenervalor("chkestagrapo","0"); $ls_tipdocapo=$_POST["txttipdocapo"]; $ls_cueconfid=$_POST["txtcueconfid"]; $ls_codfuefin=$io_fun_nomina->uf_obtenervalor("txtftefinanciamiento",""); $ls_denfuefin=$io_fun_nomina->uf_obtenervalor("txtdenftefinanciamiento",""); } } //-------------------------------------------------------------- ?>
|
||||||||||||||