Definición de la Nomina

"; print "location.href='../sigesp_inicio_sesion.php'"; print ""; } $ls_logusr=$_SESSION["la_logusr"]; require_once("class_folder/class_funciones_nomina.php"); $io_fun_nomina=new class_funciones_nomina(); $io_fun_nomina->uf_load_seguridad("SNR","sigesp_snorh_d_nominas.php",$ls_permisos,$la_seguridad,$la_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; 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_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]=""; $ls_subnom=""; $ls_racnom=""; $ls_racobrnom=""; $ls_nomliq=""; $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_tipdocnom=""; $ls_recdocapo=""; $ls_tipdocapo=""; $ls_perresnom=""; $ls_codorgcestic=""; $ls_cueconfid=""; $ls_confidnom="OC"; $la_confidnom[0]=""; $ls_recdocfid=""; $ls_tipdocfid=""; $ls_codbenfid="----------"; $ls_activo_contabilizacion=""; $ls_activo=""; $ls_titrepnom=""; $ls_activo_cod=""; $li_genrecdocpagperche=0; $li_estctaalt=0; $ls_tipdocpagperche=""; $ls_disabled=" disabled"; $ls_disabled_subnom=" disabled"; $ls_disabled_establecer=" disabled"; $ls_informa=""; $ls_operacion=$io_fun_nomina->uf_obteneroperacion(); $ls_existe=$io_fun_nomina->uf_obtenerexiste(); $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_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_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_tipdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO NOMINA","","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; 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_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_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"); $ls_titrepnom=$_POST["txttitrepnom"]; $ls_informa=$io_fun_nomina->uf_obtenervalor("txtinforma",""); $ls_codorgcestic=$io_fun_nomina->uf_obtenervalor("txtcodorgcestic",""); $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_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_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_tipdocnom=$io_nomina->io_sno->uf_select_config("SNO","CONFIG","TIPO DOCUMENTO NOMINA","","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_recdocfid=$io_fun_nomina->uf_obtenervalor("chkrecdocfid","0"); $ls_tipdocnom=$_POST["txttipdocnom"]; $ls_tipdocfid=$_POST["txttipdocfid"]; $ls_recdocapo=$io_fun_nomina->uf_obtenervalor("chkrecdocapo","0"); $ls_tipdocapo=$_POST["txttipdocapo"]; $ls_cueconfid=$_POST["txtcueconfid"]; } } //-------------------------------------------------------------- ?> Definición de la Nomina uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4); $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4); $io_fun_nomina->uf_seleccionarcombo("OC",$ls_confidnom,$la_confidnom,1); $io_fun_nomina->uf_seleccionarcombo(" -P-B",substr($ls_descomnom,0,1),$la_descomnom,3); break; case "GUARDAR": uf_load_variables(); $lb_valido=$io_nomina->uf_guardar_nomina($ls_existe,$ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom, $ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom,$ls_racnom,$ls_adenom, $ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,substr($ls_descomnom,0,1),$ls_codpronom, $ls_codbennom,$ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom, $ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$ls_conpernom, $ls_conpronom,$ls_titrepnom,$ls_codorgcestic,$ls_confidnom,$ls_recdocfid,$ls_tipdocfid, $ls_codbenfid,$ls_cueconfid,$ls_divcon,$ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche, $li_estctaalt,$ls_racobrnom,$ls_nomliq,$ls_hojtienom,$ls_tiksuel,$la_seguridad); if($lb_valido) { uf_limpiarvariables(); $ls_existe="FALSE"; } else { $io_fun_nomina->uf_seleccionarcombo("0-1-2-3",$ls_tippernom,$la_tippernom,4); $io_fun_nomina->uf_seleccionarcombo("1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17",$ls_tipnom,$la_tipnom,17); } $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4); $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4); $io_fun_nomina->uf_seleccionarcombo("OC",$ls_confidnom,$la_confidnom,1); $io_fun_nomina->uf_seleccionarcombo(" -P-B",substr($ls_descomnom,0,1),$la_descomnom,3); break; case "ELIMINAR": uf_load_variables(); $lb_valido=$io_nomina->uf_delete_nomina($ls_codnom,$la_seguridad); if($lb_valido) { uf_limpiarvariables(); $ls_existe="FALSE"; } else { $lb_valido=$io_nomina->load_nomina($li_conta_global,$ls_existe,$ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom, $ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom,$ls_racnom,$ls_adenom, $ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,$ls_descomnom,$ls_codpronom, $ls_codbennom,$ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom, $ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$li_total,$ls_conpernom, $ls_conpronom,$ls_titrepnom,$ls_codorgcestic,$ls_confidnom,$ls_recdocfid,$ls_tipdocfid, $ls_codbenfid,$ls_cueconfid,$ls_divcon,$ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche, $li_estctaalt,$ls_racobrnom,$ls_nomliq,$ls_hojtienom,$ls_tiksuel); if($lb_valido) { $ls_activo="disabled"; $ls_activo_cod="readonly"; $io_fun_nomina->uf_seleccionarcombo("0-1-2-3",$ls_tippernom,$la_tippernom,4); $io_fun_nomina->uf_seleccionarcombo("1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17",$ls_tipnom,$la_tipnom,17); } } $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4); $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4); $io_fun_nomina->uf_seleccionarcombo("OC",$ls_confidnom,$la_confidnom,1); $io_fun_nomina->uf_seleccionarcombo(" -P-B",substr($ls_descomnom,0,1),$la_descomnom,3); break; case "BUSCAR": $ls_existe="FALSE"; $ls_codnom=$_POST["txtcodnom"]; $li_total=1; $lb_valido=$io_nomina->load_nomina($li_conta_global,$ls_existe,$ls_codnom,$ls_desnom,$ls_tippernom,$ls_despernom,$ls_anocurnom, $ld_fecininom,$ls_peractnom,$ls_tipnom,$ls_subnom,$ls_racnom,$ls_adenom, $ls_espnom,$ls_ctnom,$ls_ctmetnom,$ls_consulnom,$ls_descomnom,$ls_codpronom, $ls_codbennom,$ls_conaponom,$ls_cueconnom,$ls_notdebnom,$ls_numvounom, $ls_recdocnom,$ls_tipdocnom,$ls_recdocapo,$ls_tipdocapo,$li_total,$ls_conpernom, $ls_conpronom,$ls_titrepnom,$ls_codorgcestic,$ls_confidnom,$ls_recdocfid,$ls_tipdocfid, $ls_codbenfid,$ls_cueconfid,$ls_divcon,$ls_informa,$li_genrecdocpagperche,$ls_tipdocpagperche, $li_estctaalt,$ls_racobrnom,$ls_nomliq,$ls_hojtienom,$ls_tiksuel); if($lb_valido) { $ls_activo="disabled"; $ls_activo_cod="readonly"; $ls_disabled=""; if($ls_subnom=="1") { $ls_disabled_subnom=""; } if($li_total=="0") { $ls_disabled_establecer=""; } $io_fun_nomina->uf_seleccionarcombo("0-1-2-3",$ls_tippernom,$la_tippernom,4); $io_fun_nomina->uf_seleccionarcombo("1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17",$ls_tipnom,$la_tipnom,17); } $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_consulnom,$la_consulnom,4); $io_fun_nomina->uf_seleccionarcombo("CP-OCP-OC-O",$ls_conaponom,$la_conaponom,4); $io_fun_nomina->uf_seleccionarcombo("OC",$ls_confidnom,$la_confidnom,1); $io_fun_nomina->uf_seleccionarcombo(" -P-B",substr($ls_descomnom,0,1),$la_descomnom,3); break; } $io_nomina->uf_destructor(); unset($io_nomina); ?>

Sistema de Nómina