if ($ls_tipafeiva=='P') { uf_load_cuentas_cargo($ls_numsol,"B"); } uf_load_total($li_subtotal,$li_cargos,$li_total); break; case "AGREGARSERVICIOS": $ls_titulo="Servicios"; uf_print_servicios($li_totalservicios); uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"S"); break; case "LOADSERVICIOS": $ls_titulo="Servicios"; uf_load_servicios($ls_numsol); uf_load_creditos($ls_titulo,$ls_numsol,"S"); uf_load_cuentas($ls_numsol,"S"); if ($ls_tipafeiva=='P') { uf_load_cuentas_cargo($ls_numsol,"S"); } uf_load_total($li_subtotal,$li_cargos,$li_total); break; case "AGREGARCONCEPTOS": $ls_titulo="Conceptos"; uf_print_conceptos($li_totalconceptos); uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"O"); break;
uf_load_servicios_sep($li_totalservicios,$ls_numsep,$ls_opesep); } uf_print_proveedores($li_totalproveedores); break; case "LOADBIENES": $ls_titulo="Bien o Material"; uf_load_sep($ls_numsolcot); uf_load_bienes($ls_numsolcot); uf_load_proveedores($ls_numsolcot,"B"); break; case "LOADSERVICIOS": $ls_titulo="Servicios"; uf_load_sep($ls_numsolcot); uf_load_servicios($ls_numsolcot); uf_load_proveedores($ls_numsolcot,"S"); break; } //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_proveedores($ai_total) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_proveedores // Access: private // Arguments: ai_total // Total de filas a imprimir // Description: Método que imprime el grid de los Bienes // Creado Por: Ing. Néstor Falcon // Fecha Creación: 17/03/2007 Fecha Última Modificación :
case "LOADBIENES": $ls_titulo="Bien o Material"; uf_load_bienes($ls_numordcom,$ls_tipsol); uf_load_creditos($ls_titulo,$ls_numordcom,"B",$ls_tipsol,"B"); uf_load_cuentas($ls_numordcom,"B",$ls_tipsol); if ($ls_tipafeiva=='P') { uf_load_cuentas_cargo($ls_numordcom,"B",$ls_tipsol); } uf_load_total($li_subtotal,$li_cargos,$li_total); break; case "LOADSERVICIOS": $ls_titulo="Servicios"; uf_load_servicios($ls_numordcom,$ls_tipsol); uf_load_creditos($ls_titulo,$ls_numordcom,"S",$ls_tipsol,"S"); uf_load_cuentas($ls_numordcom,"S",$ls_tipsol); if ($ls_tipafeiva=='P') { uf_load_cuentas_cargo($ls_numordcom,"S",$ls_tipsol); } uf_load_total($li_subtotal,$li_cargos,$li_total); break; case "AGREGARBIENES": $ls_titulo="Bien o Material"; uf_print_bienes($li_totalbienes,$ls_tipconpro,$ls_tipsol); uf_print_creditos($ls_titulo,$li_totalcargos,$ls_cargarcargos,"B",$ls_tipconpro,$ls_tipsol); break;
uf_load_bienes_solicitud($ls_numsolcot,$ls_codpro); break; case "LOADSERVICIOS": $ls_titulo="Servicios"; uf_load_servicios_solicitud($ls_numsolcot,$ls_codpro); break; case "CARGAR_DT_BIENES": $ls_titulo="Bien o Material"; uf_load_bienes($ls_numcot,$ls_codpro); break; case "CARGAR_DT_SERVICIOS": $ls_titulo="Servicios"; uf_load_servicios($ls_numcot,$ls_codpro); break; } //----------------------------------------------------------------------------------------------------------------------------------- function uf_print_detalles_bienes($ai_total) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_detalles_bienes // Access: private // Arguments: ai_total // Total de filas a imprimir // Description: Método que imprime el grid de los Bienes // Creado Por: Ing. Néstor Falcon // Fecha Creación: 17/03/2007 Fecha Última Modificación : ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_grid, $io_funciones_soc;