jsoto/MBS
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

Browse Source
This commit is contained in:
jsoto
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTO/nodir/2004-ir13.xls
BIN
View File
Binary file not shown.
PROYECTO/nodir/42f
+1634
View File
File diff suppressed because it is too large Load Diff
PROYECTO/nodir/Copy of noprmt008.4gl
+1772
View File
File diff suppressed because it is too large Load Diff
PROYECTO/nodir/E
BIN
View File
Binary file not shown.
PROYECTO/nodir/IMP
+528
View File
@@ -0,0 +1,528 @@

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
CASTELLANOS LUCIA 310081645-007 82,750.00 0.00 82,750.00 0.00 0.00 0.00 0.00 0.00
ARIAS DIMAS 10780035-001 366,000.00 0.00 366,000.00 246,000.00 48,500.00 48,500.00 0.00 0.00
VELOZ FAVIO 20116672-005 99,000.00 0.00 99,000.00 0.00 0.00 181.25 181.25 0.00
VALDEZ LAVANDIER 10915711-005 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
TIBURCIO ADAMARIS 11250919-005 18,750.00 0.00 18,750.00 0.00 0.00 0.00 0.00 0.00
DE LEON KAREL 20091482-008 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
MEDINA MARGARITA 11252727-001 26,250.00 0.00 26,250.00 0.00 0.00 0.00 0.00 0.00
TAVAREZ PEDRO MIGUEL 11258333-001 25,500.00 0.00 25,500.00 0.00 0.00 0.00 0.00 0.00
MOLOON SHARIFF 310327028-000 56,500.00 0.00 56,500.00 0.00 0.00 0.00 0.00 0.00
SILIE IVAN 31-009 82,500.00 0.00 82,500.00 0.00 0.00 2,025.00 2,025.00 0.00
FERNANDEZ CARLOS 310302124-006 12,000.00 0.00 12,000.00 0.00 0.00 0.00 0.00 0.00
MARTINEZ ANA 11214652-007 52,000.00 0.00 52,000.00 0.00 0.00 0.00 0.00 0.00
COLON ROLANDO 11154894-007 20,000.00 0.00 20,000.00 0.00 0.00 0.00 0.00 0.00
VILLAR THOMAS 20066812-007 48,450.00 0.00 48,450.00 0.00 0.00 0.00 0.00 0.00
DALMASI IVAN 11241605-002 15,000.00 0.00 15,000.00 0.00 0.00 0.00 0.00 0.00
MERCEDES TORIBIO 11260020-000 53,250.00 0.00 53,250.00 0.00 0.00 0.00 0.00 0.00
LORENZO TORIBIO 10409695-003 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
PEREZ LUIS 10564619-004 71,250.00 0.00 71,250.00 0.00 0.00 0.00 0.00 0.00
CASTILLO MAXIMO 200977247- 48,750.00 0.00 48,750.00 0.00 0.00 0.00 0.00 0.00
SILVERIO JUAN 91008722-002 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
TERRERO JOAN 910000475-004 53,250.00 0.00 53,250.00 0.00 0.00 0.00 0.00 0.00
DE LA CRUZ JUAN 20020583-009 27,950.00 0.00 27,950.00 0.00 0.00 0.00 0.00 0.00
TEJEDA PASCUAL 1040018133-004 43,140.00 0.00 43,140.00 0.00 0.00 0.00 0.00 0.00
SANTANA JUAN 20025732-007 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
MATEO FRANKLIN 1040003809-006 40,560.00 0.00 40,560.00 0.00 0.00 0.00 0.00 0.00
CORPORAN GERMAN 200035146-008 52,950.00 0.00 52,950.00 0.00 0.00 0.00 0.00 0.00
DE LEON JOSE 20084538-006 4,500.00 0.00 4,500.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ JUAN 20099048-009 60,150.00 0.00 60,150.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,581,520.00 0.00 1,581,520.00 246,000.00 48,500.00 50,706.25 2,206.25 0.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
GERMAN NATANAEL 20003115-001 16,750.00 0.00 16,750.00 0.00 0.00 0.00 0.00 0.00
YSABEL ANDRES 20015055-005 28,250.00 0.00 28,250.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ JOSUE 20116548-007 2,900.00 0.00 2,900.00 0.00 0.00 0.00 0.00 0.00
AYBAR JUAN 20100374-006 14,500.00 0.00 14,500.00 0.00 0.00 0.00 0.00 0.00
MATOS NELSON 20070666-001 1,450.00 0.00 1,450.00 0.00 0.00 0.00 0.00 0.00
SALAS ROCKY 20113840-001 35,650.00 0.00 35,650.00 0.00 0.00 0.00 0.00 0.00
GUZMAN BERNARDO 820004350-006 5,000.00 0.00 5,000.00 0.00 0.00 0.00 0.00 0.00
AGRAMONTE JOSE 10058767-004 30,000.00 0.00 30,000.00 0.00 0.00 0.00 0.00 0.00
REYES SANTO 20079406-003 44,000.00 0.00 44,000.00 0.00 0.00 0.00 0.00 0.00
SOTO MANUEL 10091566-009 30,000.00 0.00 30,000.00 0.00 0.00 0.00 0.00 0.00
CELESTINO BIENVENIDO 11359821-003 15,000.00 0.00 15,000.00 0.00 0.00 0.00 0.00 0.00
SUBERO JORGE 13004866-002 480,000.00 0.00 480,000.00 360,000.00 77,000.00 77,000.00 0.00 0.00
SANTELISES JOSE 11146756-009 300,000.00 0.00 300,000.00 180,000.00 32,000.00 32,000.00 0.00 0.00
CASTILLO ANDRES 322878-002 13,350.00 0.00 13,350.00 0.00 0.00 0.00 0.00 0.00
CORPORAN MARCIAL 20031973-009 101,250.00 0.00 101,250.00 0.00 0.00 296.88 296.88 0.00
PAULINO JOSE 10453581-000 84,450.00 0.00 84,450.00 0.00 0.00 0.00 0.00 0.00
SANTANA JOSE 10120895-007 297,000.00 0.00 297,000.00 177,000.00 32,000.00 31,400.00 0.00 600.00
CASTILLO FELIPE 32236-002 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
MARTE JUAN 20124714-005 4,000.00 0.00 4,000.00 0.00 0.00 0.00 0.00 0.00
CASADO RAMON 20064854-001 62,500.00 0.00 62,500.00 0.00 0.00 2,550.00 2,550.00 0.00
TERRERO RAFELITO 910002558-005 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
DIAZ CESAR 91002122-000 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
PEREZ ANNY 91003148-004 16,320.00 0.00 16,320.00 0.00 0.00 0.00 0.00 0.00
MATOS PABLO 210002576-002 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
RODRIGUEZ WAGRNER 910003706-009 16,320.00 0.00 16,320.00 0.00 0.00 0.00 0.00 0.00
AMADOR SANTO 20031821-000 1,450.00 0.00 1,450.00 0.00 0.00 0.00 0.00 0.00
CASTILLO APOLINAR 32230-002 13,050.00 0.00 13,050.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,781,220.00 0.00 1,781,220.00 717,000.00 141,000.00 143,246.88 2,846.88 600.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TEJEDA SANTOS 20098886-003 59,250.00 0.00 59,250.00 0.00 0.00 0.00 0.00 0.00
CASTILLO VIRGILIO 20031865-007 77,250.00 0.00 77,250.00 0.00 0.00 0.00 0.00 0.00
MARMOLEJOS ISIDRO 870007808-005 65,250.00 0.00 65,250.00 0.00 0.00 0.00 0.00 0.00
GARCIA VALERIO 870007749-001 44,400.00 0.00 44,400.00 0.00 0.00 0.00 0.00 0.00
BAUTISTA AGUSTIN 20064797-002 59,250.00 0.00 59,250.00 0.00 0.00 0.00 0.00 0.00
TAVAREZ RIGOBERTO 10957907-008 32,250.00 0.00 32,250.00 0.00 0.00 0.00 0.00 0.00
MARTINEZ SIMON 20097110-009 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
DIPRE SANTOS 20065663-005 37,250.00 0.00 37,250.00 0.00 0.00 0.00 0.00 0.00
SEGURA LEONARDO 78006963-000 40,410.00 0.00 40,410.00 0.00 0.00 0.00 0.00 0.00
CONTRERA EUSEBIO 870007690-007 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ VIVIAN 10101999-000 82,500.00 0.00 82,500.00 0.00 0.00 0.00 0.00 0.00
ISA ALTAGRACIA 10065034-000 183,750.00 0.00 183,750.00 63,750.00 9,562.50 9,562.50 0.00 0.00
MENDEZ NORIS 50003-054 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
ORTEGA MARINO 1040007216-000 27,000.00 0.00 27,000.00 0.00 0.00 0.00 0.00 0.00
TIBURCIO MARTIN VICTOR 1040006066-000 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
CABRERA HILARIO 20079178-008 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
ARIAS ANGEL 130019028-005 59,250.00 0.00 59,250.00 0.00 0.00 0.00 0.00 0.00
DE LOS SANTOS RAFAEL 20039645-005 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
ARIAS FINITO 20074111-004 59,250.00 0.00 59,250.00 0.00 0.00 0.00 0.00 0.00
GONZALEZ SALVADOR 1040003937-005 44,400.00 0.00 44,400.00 0.00 0.00 0.00 0.00 0.00
ARAUJO RAFAEL 20057962-001 44,400.00 0.00 44,400.00 0.00 0.00 0.00 0.00 0.00
SANTANA ELPIDIO 20091104-008 42,000.00 0.00 42,000.00 0.00 0.00 0.00 0.00 0.00
SUAZO FERNANDO 20066043-009 42,000.00 0.00 42,000.00 0.00 0.00 0.00 0.00 0.00
JIMENEZ FRANCISCO 20112249-006 10,000.00 0.00 10,000.00 0.00 0.00 0.00 0.00 0.00
BAUTISTA DAVID 104806-002 55,050.00 0.00 55,050.00 0.00 0.00 0.00 0.00 0.00
HERNANDEZ JUAN 266395-003 6,450.00 0.00 6,450.00 0.00 0.00 0.00 0.00 0.00
MALONE MODESTO 2682861-001 226,500.00 0.00 226,500.00 106,500.00 32,000.00 17,300.00 0.00 14,700.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,561,380.00 0.00 1,561,380.00 170,250.00 41,562.50 26,862.50 0.00 14,700.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
RUIZ VICTORIANO 20100867-039 20,925.00 0.00 20,925.00 0.00 0.00 0.00 0.00 0.00
GOMEZ EFRAIN 20700559-007 2,500.00 0.00 2,500.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ CONFESOR 820019194-001 62,750.00 0.00 62,750.00 0.00 0.00 0.00 0.00 0.00
DE LA ROSA JUAN 1040008972-007 48,450.00 0.00 48,450.00 0.00 0.00 0.00 0.00 0.00
GUZMAN MARTIN 820015874-002 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
HERNANDEZ JUAN 20066395-003 25,900.00 0.00 25,900.00 0.00 0.00 0.00 0.00 0.00
ARIAS SANTIAGO 20063044-000 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
TEJEDA ANGEL 1040010767-007 53,250.00 0.00 53,250.00 0.00 0.00 0.00 0.00 0.00
CARMONA JOSE 820013571-006 1,450.00 0.00 1,450.00 0.00 0.00 0.00 0.00 0.00
ALCANTARA MANUEL 1040010691-009 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
AGUASVIVA PAPITO 20017082-007 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
CASTILLO LUIS 130002784-002 55,650.00 0.00 55,650.00 0.00 0.00 0.00 0.00 0.00
HERRERAS MARIANO 31899-003 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
ORTEGA MARINO 1040007216-000 5,700.00 0.00 5,700.00 0.00 0.00 0.00 0.00 0.00
SOLANO CARLO 130019305-007 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
GOMEZ JULIO 11242239-009 5,130.00 0.00 5,130.00 0.00 0.00 0.00 0.00 0.00
SOLANO CANDELARIO 1040006404-003 41,940.00 0.00 41,940.00 0.00 0.00 0.00 0.00 0.00
LARA SANTO 30050474-003 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
MONTILLA RAFAEL 20085635-006 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
DE LA CRUZ PORFIRIO 1040009558-003 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
ABREU VICTOR 10208624-006 20,050.00 0.00 20,050.00 0.00 0.00 0.00 0.00 0.00
DE LA PAZ JUAN 20022902-009 14,610.00 0.00 14,610.00 0.00 0.00 0.00 0.00 0.00
BELTRE OSCAR 24638-013 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
MEJIA LEONARDO 20066514-009 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
DE LA ROSA MIGUEL 820000134-008 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
CIPRIAN WILLIAN 1040000035-007 9,480.00 0.00 9,480.00 0.00 0.00 0.00 0.00 0.00
MATEO ELVIN 130007721-009 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 933,885.00 0.00 933,885.00 0.00 0.00 0.00 0.00 0.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
PINALES ROBERTO 20125455-004 46,050.00 0.00 46,050.00 0.00 0.00 0.00 0.00 0.00
VIZCAINO ELIA 1040019102-008 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
DE LA ROSA JUAN JESUS 1040009760-005 3,420.00 0.00 3,420.00 0.00 0.00 0.00 0.00 0.00
VILLAR JUAN WILKIN 40015512-002 32,490.00 0.00 32,490.00 0.00 0.00 0.00 0.00 0.00
JIMENEZ VICTOR 20022890-006 30,780.00 0.00 30,780.00 0.00 0.00 0.00 0.00 0.00
PENA FRANCISCO 20104695-000 1,710.00 0.00 1,710.00 0.00 0.00 0.00 0.00 0.00
DE LA ROSA MARCIAL 1040009567-004 17,100.00 0.00 17,100.00 0.00 0.00 0.00 0.00 0.00
POLANCO ESTEVAN 20071493-009 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
VOLQUEZ RAMON 200002898-001 48,450.00 0.00 48,450.00 0.00 0.00 0.00 0.00 0.00
JORGE CARMELO 20085167-003 28,000.00 0.00 28,000.00 0.00 0.00 0.00 0.00 0.00
RAMIREZ GUILLERMO 1060001509-002 58,200.00 0.00 58,200.00 0.00 0.00 0.00 0.00 0.00
SOTO RUBEN 130016087-004 53,250.00 0.00 53,250.00 0.00 0.00 0.00 0.00 0.00
FERRERAS CARMEN 10158154-004 401,050.00 0.00 401,050.00 281,050.00 57,262.50 57,262.50 0.00 0.00
ROBLES ANA 20083033-009 89,250.00 0.00 89,250.00 0.00 0.00 84.38 84.38 0.00
DIAZ CLARIZA 20002508-008 71,250.00 0.00 71,250.00 0.00 0.00 0.00 0.00 0.00
EVANGELISTA JOSELINE 2063161-002 71,460.00 0.00 71,460.00 0.00 0.00 0.00 0.00 0.00
MATEO JENNY 20064449-000 79,650.00 0.00 79,650.00 0.00 0.00 0.00 0.00 0.00
DE LA CRUZ CLAUDINA 11094496-004 204,250.00 0.00 204,250.00 84,250.00 32,000.00 12,850.00 0.00 19,150.00
PINALES LOURDES 20016843-003 211,500.00 0.00 211,500.00 91,500.00 32,000.00 14,300.00 0.00 17,700.00
SUBERO CESAR 133333519-001 93,000.00 0.00 93,000.00 0.00 0.00 162.50 162.50 0.00
CHALAS JOSE 13001804-005 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
BATISTA LUIS 1040016686-003 42,450.00 0.00 42,450.00 0.00 0.00 0.00 0.00 0.00
PUJOLS RAMON 130003426-009 141,000.00 0.00 141,000.00 21,000.00 3,150.00 3,150.00 0.00 0.00
VALENTIN JUAN 20066086-008 10,950.00 0.00 10,950.00 0.00 0.00 0.00 0.00 0.00
CABRERA JOSE 1100002804-000 3,420.00 0.00 3,420.00 0.00 0.00 0.00 0.00 0.00
RUIZ FRANCISCO 20088810-005 18,810.00 0.00 18,810.00 0.00 0.00 0.00 0.00 0.00
DIAZ GIORDANO 130028177-009 13,680.00 0.00 13,680.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,898,730.00 0.00 1,898,730.00 477,800.00 124,412.50 87,809.38 246.88 36,850.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
BATISTA MELVIN 1040019431-001 5,130.00 0.00 5,130.00 0.00 0.00 0.00 0.00 0.00
TRIBEY JESUS 20121753-006 5,130.00 0.00 5,130.00 0.00 0.00 0.00 0.00 0.00
ANDUJAR LUIS 18995-012 42,450.00 0.00 42,450.00 0.00 0.00 0.00 0.00 0.00
TEJEDA FELIX 20013466-006 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
MEDRANO ROBERTO 20010792-008 9,480.00 0.00 9,480.00 0.00 0.00 0.00 0.00 0.00
TEJEDA GUILLERMO 1040016756-005 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
MARINEZ CARLOS 20126082-005 11,190.00 0.00 11,190.00 0.00 0.00 0.00 0.00 0.00
RODRIGUEZ JOSE 1040015569-002 14,250.00 0.00 14,250.00 0.00 0.00 0.00 0.00 0.00
FERNANDEZ CARLOS 11323922-002 63,450.00 0.00 63,450.00 0.00 0.00 0.00 0.00 0.00
MONTILLA ISAIAS 20005213-002 252,000.00 0.00 252,000.00 132,000.00 32,000.00 22,400.00 0.00 9,600.00
BALDEMORA RADHAMES 39999-023 19,250.00 0.00 19,250.00 0.00 0.00 0.00 0.00 0.00
ZAPATA GERMAN 1094221-001 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
NAVARO PEDRO 240019589-003 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
ZAPATA PEDRO 10669361-007 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
GOMEZ MIGUEL 10669143-009 53,250.00 0.00 53,250.00 0.00 0.00 0.00 0.00 0.00
GUZMAN NICOLAS 40003519-002 12,900.00 0.00 12,900.00 0.00 0.00 0.00 0.00 0.00
MEJIA ALEJANDRO 11253733-007 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
ZAPATA DOMINGO 23081748-009 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
CASTILLO ERNESTO 40012614-000 43,200.00 0.00 43,200.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ RAMON 10669319-005 43,200.00 0.00 43,200.00 0.00 0.00 0.00 0.00 0.00
GRULLART EDDY 710041811-005 19,740.00 0.00 19,740.00 0.00 0.00 0.00 0.00 0.00
FERRER PILAR 10669090-002 47,500.00 0.00 47,500.00 0.00 0.00 0.00 0.00 0.00
VARGAS JORGE 20104933-005 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
RAMIREZ EDWIN 20105610-008 9,480.00 0.00 9,480.00 0.00 0.00 0.00 0.00 0.00
PEREZ MANUEL 11136701-007 46,950.00 0.00 46,950.00 0.00 0.00 0.00 0.00 0.00
PEREZ AUDESTE 10344031-009 65,250.00 0.00 65,250.00 0.00 0.00 0.00 0.00 0.00
PAREDES JUAN 10888268-009 10,000.00 0.00 10,000.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,116,430.00 0.00 1,116,430.00 132,000.00 32,000.00 22,400.00 0.00 9,600.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
VIALET ANGEL 10280306-001 226,500.00 0.00 226,500.00 106,500.00 32,000.00 17,300.00 0.00 14,700.00
DE LA CRUZ ANIANO 650010492-009 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
SANTANA GERINERDO 64907-009 47,250.00 0.00 47,250.00 0.00 0.00 0.00 0.00 0.00
TORRES RAFAEL 79000621-008 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
GONZALEZ BARTOLO 790002086-003 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
VARGAS JOSE 790005985-003 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
DIAZ ALBO 220005323-005 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
PENA VICTOR 790001844-006 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
REYES RAMON 79005927-005 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
JHONSON SAMUEL 650001028-002 59,250.00 0.00 59,250.00 0.00 0.00 0.00 0.00 0.00
FERRER SALVADOR 10107889-007 141,000.00 0.00 141,000.00 21,000.00 3,150.00 3,150.00 0.00 0.00
CASTILLO MANUEL 1040014631-001 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
CARDERON FEDERICO 1040010700-008 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
GUERRERO MANUEL 10654329-001 14,610.00 0.00 14,610.00 0.00 0.00 0.00 0.00 0.00
RAMIREZ YONNY 130007808-004 42,240.00 0.00 42,240.00 0.00 0.00 0.00 0.00 0.00
SANCHEZ FRANCISCO 104530455-001 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
DE LA ROSA EPIFANIO 20047448-004 32,500.00 0.00 32,500.00 0.00 0.00 0.00 0.00 0.00
ARIAS MAXIMO 20119252-003 3,420.00 0.00 3,420.00 0.00 0.00 0.00 0.00 0.00
HERNANDEZ JESUS 650005341-005 43,650.00 0.00 43,650.00 0.00 0.00 0.00 0.00 0.00
DE LEON AMAURIS 650010504-001 40,260.00 0.00 40,260.00 0.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,070,440.00 0.00 1,070,440.00 127,500.00 35,150.00 20,450.00 0.00 14,700.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

05-01-02 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2001
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. (C) RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTALES RD$ ==> 9,943,605.00 0.00 9,943,605.00 1,870,550.00 422,625.00 351,475.01 5,300.01 76,450.00
===================================================================================================================================================================================================================================
 RESUMEN PARA EL PAGO
------------------------------------- Yo_______________________________________________________________________________________________________ _______________________________________________________________________
| NUMERO DE | 183 | en calidad de Agente de Retencion, por la presente declaro bajo juramento que los datos consignados en la | IMPUESTO A PAGAR | |
| ASALARIADOS | | presente declaracion son correctos y completos y que no he omitido dato alguno que la misma deba contener |---------------------------------------|-----------------------------|
|---------------------|-------------| siendo en consecuencia todo su contenido la fiel expresion de la verdad. | RECARGOS ART.252 ( )% | |
| NUMERO DE | | |---------------------------------------|-----------------------------|
| ASALARIADOS | 13 | | INTERES INDENNIZATORIO ART.27 ( )% | |
| SUJETOS A RETENCION | | _____________________________________________ _____________________________________________ |---------------------------------------|-----------------------------|
------------------------------------- Nombres y Apellidos del Representante Firma | TOTAL A PAGAR RD$ | |
-----------------------------------------------------------------------
(COLOQUE EL SELLO DE LA EMPRESA)
PROYECTO/nodir/IR13
+594
View File
@@ -0,0 +1,594 @@

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
BISONO LUCIA 310081645- 7 87,675.00 0.00 87,675.00 87,675.00 0.00 0.00 0.00 0.00
ARIAS DIMAS 10780035- 1 381,300.00 0.00 381,300.00 242,880.00 44,600.44 44,326.46 0.00 273.98
VELOZ FABIO 20116672- 5 187,500.00 0.00 187,500.00 49,080.00 7,018.97 6,938.78 0.00 80.19
DE LEON KAREL 20091482- 8 90,400.00 0.00 90,400.00 90,400.00 0.00 0.00 0.00 0.00
COLON ROLANDO 11154894- 7 35,000.00 0.00 35,000.00 35,000.00 0.00 0.00 0.00 0.00
VILLAR TOMAS 20066812- 7 43,700.00 0.00 43,700.00 43,700.00 0.00 0.00 0.00 0.00
TERRERO HANLY 10676652- 0 122,800.00 0.00 122,800.00 122,800.00 0.00 0.00 0.00 0.00
HERRAND RODOLFO 10175642- 7 87,675.00 0.00 87,675.00 87,675.00 0.00 0.00 0.00 0.00
PENA HEIDY 11571369- 5 27,000.00 0.00 27,000.00 27,000.00 0.00 0.00 0.00 0.00
TERRERO JOSELIN 10489944- 8 6,750.00 0.00 6,750.00 6,750.00 0.00 0.00 0.00 0.00
VARGAS MARIA 11315357- 1 125,250.00 0.00 125,250.00 125,250.00 0.00 0.00 0.00 0.00
ANTONIO ROSA 10033344- 2 87,675.00 0.00 87,675.00 87,675.00 0.00 0.00 0.00 0.00
YENA ALTAGRACIA 10953519- 5 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
PENA INGRID 8352088- 32,000.00 0.00 32,000.00 32,000.00 0.00 0.00 0.00 0.00
OSORIO MIOSOTIS 10966989- 5 62,800.00 0.00 62,800.00 62,800.00 0.00 0.00 0.00 0.00
RAMIREZ KORANJALY 11305703- 8 27,000.00 0.00 27,000.00 27,000.00 0.00 0.00 0.00 0.00
LORENZO TORIBIO *********- 3 54,500.00 0.00 54,500.00 54,500.00 0.00 0.00 0.00 0.00
RICARDO MIGUEL 230103044- 7 15,000.00 0.00 15,000.00 15,000.00 0.00 0.00 0.00 0.00
PEREZ LUIS 10564619- 4 88,800.00 0.00 88,800.00 88,800.00 0.00 0.00 0.00 0.00
SILVERIO JUAN 910000872- 2 48,730.00 0.00 48,730.00 48,730.00 0.00 0.00 0.00 0.00
TEJEDA PASCUAL *********- 4 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
SANTANA JUAN 20025732- 7 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
CORPORAN GERMAN 20035146- 8 58,450.00 0.00 58,450.00 58,450.00 0.00 0.00 0.00 0.00
SANCHEZ JUAN 20099048- 9 70,050.00 0.00 70,050.00 70,050.00 0.00 0.00 0.00 0.00
REYES SANTO 20079406- 3 76,100.00 0.00 76,100.00 76,100.00 0.00 0.00 0.00 0.00
FELIZ ELVIN 20107165- 1 67,450.00 0.00 67,450.00 67,450.00 0.00 0.00 0.00 0.00
CASTILLO MARCOS 20109200- 4 64,450.00 0.00 64,450.00 64,450.00 0.00 0.00 0.00 0.00
ALCANTARA BENITO 20078023- 7 67,450.00 0.00 67,450.00 67,450.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 2,168,165.00 0.00 2,168,165.00 1,891,325.00 51,619.41 51,265.24 0.00 354.17
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SUBERO JORGE 130004866- 5 965,200.00 0.00 965,200.00 826,780.00 189,665.85 189,474.34 0.00 191.51
SANTELISES JOSE 11146756- 9 317,500.00 0.00 317,500.00 179,080.00 30,380.25 30,261.45 0.00 118.80
CORPORAN MARCIAL 20031973- 9 109,000.00 0.00 109,000.00 109,000.00 0.00 0.00 0.00 0.00
PAULINO JOSE 10453581- 0 92,350.00 0.00 92,350.00 92,350.00 0.00 0.00 0.00 0.00
SANTANA JOSE 10120895- 7 361,375.00 0.00 361,375.00 222,955.00 39,561.95 39,391.17 0.00 170.78
CASTILLO FELIPE 20032236- 0 59,000.00 0.00 59,000.00 59,000.00 0.00 0.00 0.00 0.00
DIAZ CESAR 910002122- 0 55,200.00 0.00 55,200.00 55,200.00 0.00 0.00 0.00 0.00
SILVERIO RAMON 910002740- 9 48,380.00 0.00 48,380.00 48,380.00 0.00 0.00 0.00 0.00
MENDEZ APOLINAR 790002755- 3 66,200.00 0.00 66,200.00 66,200.00 0.00 0.00 0.00 0.00
TEJEDA SANTOS 20098886- 3 68,600.00 0.00 68,600.00 68,600.00 0.00 0.00 0.00 0.00
CASTILLO VIRGILIO 20031865- 7 89,600.00 0.00 89,600.00 89,600.00 0.00 0.00 0.00 0.00
MARMOLEJOS ISIDRO 870007808- 5 36,650.00 0.00 36,650.00 36,650.00 0.00 0.00 0.00 0.00
BAUTISTA AGUSTIN 20064797- 2 58,300.00 0.00 58,300.00 58,300.00 0.00 0.00 0.00 0.00
MARTINEZ SIMON 20097110- 9 52,100.00 0.00 52,100.00 52,100.00 0.00 0.00 0.00 0.00
SEGURA LEONARDO 780006963- 0 42,030.00 0.00 42,030.00 42,030.00 0.00 0.00 0.00 0.00
RODRIGUEZ WILLY 11449290- 3 19,080.00 0.00 19,080.00 19,080.00 0.00 0.00 0.00 0.00
VASQUEZ CRISTIAN 870013655- 2 39,480.00 0.00 39,480.00 39,480.00 0.00 0.00 0.00 0.00
MARMOLEJOS REINALDO 870007804- 4 27,450.00 0.00 27,450.00 27,450.00 0.00 0.00 0.00 0.00
FELIZ JUAN 20135992- 4 5,400.00 0.00 5,400.00 5,400.00 0.00 0.00 0.00 0.00
VALERIO JORDANY 10676673- 6 4,500.00 0.00 4,500.00 4,500.00 0.00 0.00 0.00 0.00
ISA ALTAGRACIA 10065034- 0 254,000.00 0.00 254,000.00 115,580.00 17,844.59 17,749.55 0.00 95.04
MENDEZ NORIS 540046945- 7 122,800.00 0.00 122,800.00 122,800.00 0.00 0.00 0.00 0.00
TIBURCIO VICTOR *********- 0 55,400.00 0.00 55,400.00 55,400.00 0.00 0.00 0.00 0.00
CABRERA HILARIO 20079178- 8 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
ARIAS ANGEL 130019028- 5 64,450.00 0.00 64,450.00 64,450.00 0.00 0.00 0.00 0.00
DE LOS SANTOS RAFAEL 20039645- 5 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
ARIAS FINITO 20074111- 4 64,450.00 0.00 64,450.00 64,450.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 3,182,675.00 0.00 3,182,675.00 2,628,995.00 277,452.64 276,876.51 0.00 576.13
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
GONZALEZ SALVADOR *********- 5 13,600.00 0.00 13,600.00 13,600.00 0.00 0.00 0.00 0.00
ARAUJO RAFAEL 20057962- 1 49,700.00 0.00 49,700.00 49,700.00 0.00 0.00 0.00 0.00
SANTANA ELPIDIO 20091104- 8 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
SUAZO FERNANDO 20066043- 9 24,930.00 0.00 24,930.00 24,930.00 0.00 0.00 0.00 0.00
ENCARNACION DOMINGO 10016282- 5 20,600.00 0.00 20,600.00 20,600.00 0.00 0.00 0.00 0.00
BATISTA DAYVI 20011619- 2 65,650.00 0.00 65,650.00 65,650.00 0.00 0.00 0.00 0.00
HERNANDEZ JUAN 20066395- 3 10,750.00 0.00 10,750.00 10,750.00 0.00 0.00 0.00 0.00
FIGUEREO LUCILO 820017895- 5 13,500.00 0.00 13,500.00 13,500.00 0.00 0.00 0.00 0.00
VIZCAINO DANIEL 20013506- 9 11,250.00 0.00 11,250.00 11,250.00 0.00 0.00 0.00 0.00
SIERRA VICTOR 820003374- 7 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
UPIA JUAN DE DIOS 20101619- 3 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
CAMPUSANO EDUARDO 20104884- 0 6,750.00 0.00 6,750.00 6,750.00 0.00 0.00 0.00 0.00
MALONE MODESTO 10268286- 1 203,500.00 0.00 203,500.00 65,080.00 9,439.76 11,439.37 1,999.61 0.00
SANCHEZ CONFESOR 820019194- 1 78,850.00 0.00 78,850.00 78,850.00 0.00 0.00 0.00 0.00
ARIAS ARTURO *********- 6 23,550.00 0.00 23,550.00 23,550.00 0.00 0.00 0.00 0.00
LARA SANTOS FELIPE 20023572- 9 21,600.00 0.00 21,600.00 21,600.00 0.00 0.00 0.00 0.00
GUZMAN AGUSTIN 10433525- 2 22,000.00 0.00 22,000.00 22,000.00 0.00 0.00 0.00 0.00
GUZMAN MARTIN 820015874- 2 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
ARIAS SANTIAGO 20063044- 0 52,100.00 0.00 52,100.00 52,100.00 0.00 0.00 0.00 0.00
ALCANTARA MANUEL *********- 9 46,200.00 0.00 46,200.00 46,200.00 0.00 0.00 0.00 0.00
GUZMAN EUSEBIO 20071819- 5 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
AGUASVIVAS RAFAEL 20012241- 4 26,880.00 0.00 26,880.00 26,880.00 0.00 0.00 0.00 0.00
MEDRANO ROBERTO 20010792- 8 19,650.00 0.00 19,650.00 19,650.00 0.00 0.00 0.00 0.00
SANTANA ANDRES 20107366- 5 4,500.00 0.00 4,500.00 4,500.00 0.00 0.00 0.00 0.00
CASTILLO LUIS 130002784- 2 64,450.00 0.00 64,450.00 64,450.00 0.00 0.00 0.00 0.00
HERRERAS MARIANO 30031899- 3 56,050.00 0.00 56,050.00 56,050.00 0.00 0.00 0.00 0.00
SOLANO CARLO 130019305- 7 52,250.00 0.00 52,250.00 52,250.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,058,970.00 0.00 1,058,970.00 920,550.00 9,439.76 11,439.37 1,999.61 0.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
GOMEZ JULIO 11242239- 9 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
LARA SANTO 30050474- 3 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
MONTILLA RAFAEL 20088635- 6 60,500.00 0.00 60,500.00 60,500.00 0.00 0.00 0.00 0.00
DE LA CRUZ PORFIRIO *********- 3 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
BELTRE OSCAR 20102916- 2 58,100.00 0.00 58,100.00 58,100.00 0.00 0.00 0.00 0.00
MEJIA LEONARDO 20066514- 9 50,900.00 0.00 50,900.00 50,900.00 0.00 0.00 0.00 0.00
DE LA ROSA MIGUEL 820000134- 8 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
PINALES ROBERTO 20125455- 4 53,300.00 0.00 53,300.00 53,300.00 0.00 0.00 0.00 0.00
VILLAR JUAN *********- 2 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
POLANCO ESTEVAN 20071493- 9 24,350.00 0.00 24,350.00 24,350.00 0.00 0.00 0.00 0.00
VOLQUEZ RAMON 200002898- 1 56,050.00 0.00 56,050.00 56,050.00 0.00 0.00 0.00 0.00
CUEVAS JESUS 20133656- 7 101,500.00 0.00 101,500.00 101,500.00 0.00 0.00 0.00 0.00
RAMIREZ GUILLERMO *********- 2 70,800.00 0.00 70,800.00 70,800.00 0.00 0.00 0.00 0.00
SOTO RUBEN 130016087- 4 62,050.00 0.00 62,050.00 62,050.00 0.00 0.00 0.00 0.00
BAUTISTA REINALDO 20098254- 4 42,945.00 0.00 42,945.00 42,945.00 0.00 0.00 0.00 0.00
MARTE ALEX 20134537- 8 42,945.00 0.00 42,945.00 42,945.00 0.00 0.00 0.00 0.00
PACHECO RAMON 20141262- 4 23,400.00 0.00 23,400.00 23,400.00 0.00 0.00 0.00 0.00
MENDEZ CARLOS 10146213- 3 276,934.05 0.00 276,934.05 138,514.05 22,198.21 19,976.97 0.00 2,221.24
MARTINEZ ESTEBAN 20126970- 1 28,550.00 0.00 28,550.00 28,550.00 0.00 0.00 0.00 0.00
GARCIA WANDEL 20036845- 4 21,650.00 0.00 21,650.00 21,650.00 0.00 0.00 0.00 0.00
BRITO DANIEL 20141196- 4 13,500.00 0.00 13,500.00 13,500.00 0.00 0.00 0.00 0.00
MATEO SECUNDINO 820012545- 1 17,500.00 0.00 17,500.00 17,500.00 0.00 0.00 0.00 0.00
FERRERAS CARMEN 10158154- 4 444,500.00 0.00 444,500.00 306,080.00 60,099.37 59,891.47 0.00 207.90
ROBLES ANA 20083033- 9 33,000.00 0.00 33,000.00 33,000.00 0.00 0.00 0.00 0.00
DIAZ CLARIZA 20002508- 8 96,000.00 0.00 96,000.00 96,000.00 0.00 0.00 0.00 0.00
EVANGELISTA JOSELINE 20063161- 2 15,950.00 0.00 15,950.00 15,950.00 0.00 0.00 0.00 0.00
SIERRA ROSARIO 20007332- 8 66,750.00 0.00 66,750.00 66,750.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,929,754.05 0.00 1,929,754.05 1,652,914.05 82,297.58 79,868.44 0.00 2,429.14
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
ROSARIO SILOMOR 11754407- 2 4,250.00 0.00 4,250.00 4,250.00 0.00 0.00 0.00 0.00
CASILLA ANTIA 20047089- 6 40,500.00 0.00 40,500.00 40,500.00 0.00 0.00 0.00 0.00
MATEO JENNY 20064449- 0 72,360.00 0.00 72,360.00 72,360.00 0.00 0.00 0.00 0.00
DE LA CRUZ CLAUDINA 11094496- 4 235,000.00 0.00 235,000.00 96,580.00 14,105.97 14,022.81 0.00 83.16
FIGUEROA ESTHER 20064958- 0 8,250.00 0.00 8,250.00 8,250.00 0.00 0.00 0.00 0.00
ENCARNACION WILLY 20118272- 2 11,900.00 0.00 11,900.00 11,900.00 0.00 0.00 0.00 0.00
PINALES LOURDES 20016843- 3 266,700.00 0.00 266,700.00 128,280.00 20,351.72 20,251.93 0.00 99.79
SUBERO CESAR 130003519- 1 100,200.00 0.00 100,200.00 100,200.00 0.00 0.00 0.00 0.00
CHALAS JOSE 130021804- 5 62,050.00 0.00 62,050.00 62,050.00 0.00 0.00 0.00 0.00
BATISTA LUIS *********- 3 50,900.00 0.00 50,900.00 50,900.00 0.00 0.00 0.00 0.00
MARINEZ OSCAR 130006730- 1 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
COLON JUAN 30006022- 5 15,750.00 0.00 15,750.00 15,750.00 0.00 0.00 0.00 0.00
PUJOLS RAMON 130003426- 9 180,000.00 0.00 180,000.00 41,580.00 5,867.24 5,813.78 0.00 53.46
RIVERA DIONICIO 20074370- 6 14,700.00 0.00 14,700.00 14,700.00 0.00 0.00 0.00 0.00
ISAAC BENITO 20039271- 0 15,000.00 0.00 15,000.00 15,000.00 0.00 0.00 0.00 0.00
MELENDEZ MANUEL 20098051- 4 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
DIAZ SOCRATES 10528327- 9 33,400.00 0.00 33,400.00 33,400.00 0.00 0.00 0.00 0.00
BATISTA MELVIN *********- 1 53,300.00 0.00 53,300.00 53,300.00 0.00 0.00 0.00 0.00
RODRIGUEZ JACOBO 20097607- 4 53,300.00 0.00 53,300.00 53,300.00 0.00 0.00 0.00 0.00
TEJEDA HECTOR *********- 7 15,180.00 0.00 15,180.00 15,180.00 0.00 0.00 0.00 0.00
AQUINO ADAN 820005596- 3 58,450.00 0.00 58,450.00 58,450.00 0.00 0.00 0.00 0.00
ARIAS ADRIANO 20102514- 5 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
VENTURA MILIANO 20066808- 5 50,480.00 0.00 50,480.00 50,480.00 0.00 0.00 0.00 0.00
CANDELARIO RAFAEL 20035078- 3 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
TIBREY JESUS 20121753- 6 43,130.00 0.00 43,130.00 43,130.00 0.00 0.00 0.00 0.00
MEDRANO RAFAEL 20014858- 3 40,100.00 0.00 40,100.00 40,100.00 0.00 0.00 0.00 0.00
LORENZO ALEXANDER 20018817- 5 18,950.00 0.00 18,950.00 18,950.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,598,290.00 0.00 1,598,290.00 1,183,030.00 40,324.93 40,088.52 0.00 236.41
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
ANDUJAR WILSON 20084724- 2 14,650.00 0.00 14,650.00 14,650.00 0.00 0.00 0.00 0.00
GONZALEZ JULIO 20129070- 7 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
MEJIA WILLIAN 20123705- 4 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
TRINIDAD EDUARDO 20097750- 2 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
MATEO CARLOS *********- 6 24,930.00 0.00 24,930.00 24,930.00 0.00 0.00 0.00 0.00
CEPEDA ANGEL 20065588- 4 50,900.00 0.00 50,900.00 50,900.00 0.00 0.00 0.00 0.00
ANDUJAR LUIS 130018995- 6 50,900.00 0.00 50,900.00 50,900.00 0.00 0.00 0.00 0.00
CASTILLO FRANK 20097089- 5 51,250.00 0.00 51,250.00 51,250.00 0.00 0.00 0.00 0.00
HERNANDEZ JOSE 560094632- 0 7,800.00 0.00 7,800.00 7,800.00 0.00 0.00 0.00 0.00
PAYANO FLORENTINO 20004554- 0 49,200.00 0.00 49,200.00 49,200.00 0.00 0.00 0.00 0.00
RIVERA JULIO 20097142- 2 39,000.00 0.00 39,000.00 39,000.00 0.00 0.00 0.00 0.00
GUERRERO WILQUIN 10906385- 9 39,000.00 0.00 39,000.00 39,000.00 0.00 0.00 0.00 0.00
DEL ROSARIO SANTO 20101792- 8 35,250.00 0.00 35,250.00 35,250.00 0.00 0.00 0.00 0.00
CARO FRANDY 20100519- 6 38,650.00 0.00 38,650.00 38,650.00 0.00 0.00 0.00 0.00
PUCHEO ROBERT 20138970- 7 33,300.00 0.00 33,300.00 33,300.00 0.00 0.00 0.00 0.00
NINA JOSE 20002722- 5 29,400.00 0.00 29,400.00 29,400.00 0.00 0.00 0.00 0.00
TEJEDA GUILLERMO *********- 5 48,480.00 0.00 48,480.00 48,480.00 0.00 0.00 0.00 0.00
MATEO CARLOS *********- 6 19,300.00 0.00 19,300.00 19,300.00 0.00 0.00 0.00 0.00
ALMONTE KENNY 20102468- 4 4,300.00 0.00 4,300.00 4,300.00 0.00 0.00 0.00 0.00
ROSARIO ANDRES 20145009- 5 11,250.00 0.00 11,250.00 11,250.00 0.00 0.00 0.00 0.00
CASTILLO JONNY 130007618- 7 13,500.00 0.00 13,500.00 13,500.00 0.00 0.00 0.00 0.00
GONZALEZ SANTOS 20092347- 2 9,800.00 0.00 9,800.00 9,800.00 0.00 0.00 0.00 0.00
HERRERA JOSE 20107796- 3 13,500.00 0.00 13,500.00 13,500.00 0.00 0.00 0.00 0.00
SANTANA VICENTE 20099562- 9 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
SANTANA JOSE 11640404- 7 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
MARTINEZ CONFESOR 20140098- 3 6,750.00 0.00 6,750.00 6,750.00 0.00 0.00 0.00 0.00
MARTINEZ JUAN 20083396- 0 6,750.00 0.00 6,750.00 6,750.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 761,300.00 0.00 761,300.00 761,300.00 0.00 0.00 0.00 0.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TEJEDA LUIS 10960485- 0 6,750.00 0.00 6,750.00 6,750.00 0.00 0.00 0.00 0.00
FERNANDEZ CARLOS 11323922- 2 80,100.00 0.00 80,100.00 80,100.00 0.00 0.00 0.00 0.00
MONTILLA ISAIAS 20005213- 2 273,050.00 0.00 273,050.00 134,630.00 21,605.29 21,503.12 0.00 102.17
ZAPATA PEDRO 10669361- 7 55,800.00 0.00 55,800.00 55,800.00 0.00 0.00 0.00 0.00
GOMEZ MIGUEL 10669143- 9 65,800.00 0.00 65,800.00 65,800.00 0.00 0.00 0.00 0.00
ZAPATA DOMINGO 23081748- 9 2,000.00 0.00 2,000.00 2,000.00 0.00 0.00 0.00 0.00
SANCHEZ RAMON 10669319- 5 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
FERRER PILAR 10669090- 2 60,800.00 0.00 60,800.00 60,800.00 0.00 0.00 0.00 0.00
JIMENEZ FELIX 40012292- 5 50,580.00 0.00 50,580.00 50,580.00 0.00 0.00 0.00 0.00
SANCHEZ BERNARDO 710032586- 4 49,780.00 0.00 49,780.00 49,780.00 0.00 0.00 0.00 0.00
SANTOS BERNARDO 650019510- 9 49,780.00 0.00 49,780.00 49,780.00 0.00 0.00 0.00 0.00
MEJIA ALEJANDRO 11253733- 7 54,250.00 0.00 54,250.00 54,250.00 0.00 0.00 0.00 0.00
VARGAS JORGE 20104933- 5 62,050.00 0.00 62,050.00 62,050.00 0.00 0.00 0.00 0.00
PEREZ MANUEL 11136701- 7 28,850.00 0.00 28,850.00 28,850.00 0.00 0.00 0.00 0.00
VIALET ANGEL 10280306- 1 241,300.00 0.00 241,300.00 102,880.00 15,337.46 15,247.17 0.00 90.29
DE LA CRUZ ANIANO 650010492- 9 57,000.00 0.00 57,000.00 57,000.00 0.00 0.00 0.00 0.00
SANTANA GERINERDO 790000649- 0 57,000.00 0.00 57,000.00 57,000.00 0.00 0.00 0.00 0.00
TORRES RAFAEL 790001621- 8 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
GONZALEZ BARTOLO 790002086- 3 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
VARGAS JOSE 790005985- 3 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
DIAZ ALBO 220005323- 5 48,730.00 0.00 48,730.00 48,730.00 0.00 0.00 0.00 0.00
REYES RAMON 79005927- 5 48,730.00 0.00 48,730.00 48,730.00 0.00 0.00 0.00 0.00
SANTANA TOMAS 790000651- 6 48,730.00 0.00 48,730.00 48,730.00 0.00 0.00 0.00 0.00
FERRER SALVADOR 10107889- 7 180,000.00 0.00 180,000.00 41,580.00 5,867.24 5,813.78 0.00 53.46
CARDERON FEDERICO *********- 8 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
SANCHEZ FRANCISCO 10453043- 1 52,100.00 0.00 52,100.00 52,100.00 0.00 0.00 0.00 0.00
DE LA ROSA EPIFANIO 20047448- 4 70,800.00 0.00 70,800.00 70,800.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,911,680.00 0.00 1,911,680.00 1,496,420.00 42,809.99 42,564.07 0.00 245.92
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
ARIAS MAXIMO 20119252- 3 49,980.00 0.00 49,980.00 49,980.00 0.00 0.00 0.00 0.00
TEJEDA RANDOL 20103081- 4 49,980.00 0.00 49,980.00 49,980.00 0.00 0.00 0.00 0.00
DELGADO SANTO *********- 1 3,690.00 0.00 3,690.00 3,690.00 0.00 0.00 0.00 0.00
DIPRE SANTO 20065663- 5 55,700.00 0.00 55,700.00 55,700.00 0.00 0.00 0.00 0.00
PEREYRA CARLOS 20096389- 0 44,850.00 0.00 44,850.00 44,850.00 0.00 0.00 0.00 0.00
MEJIA NELVIN 20120181- 1 21,450.00 0.00 21,450.00 21,450.00 0.00 0.00 0.00 0.00
BAEZ ANGEL 201102589- 9,750.00 0.00 9,750.00 9,750.00 0.00 0.00 0.00 0.00
BATISTA RUBEN 20136268- 8 29,400.00 0.00 29,400.00 29,400.00 0.00 0.00 0.00 0.00
TEJEDA JOSE 130007869- 6 21,600.00 0.00 21,600.00 21,600.00 0.00 0.00 0.00 0.00
AVELINO HECTOR 20114203- 1 25,150.00 0.00 25,150.00 25,150.00 0.00 0.00 0.00 0.00
MARTICH DANILO 20109647- 6 19,650.00 0.00 19,650.00 19,650.00 0.00 0.00 0.00 0.00
SANTANA JULIO 20110849- 5 10,950.00 0.00 10,950.00 10,950.00 0.00 0.00 0.00 0.00
VELOZ JUAN 20092733- 3 9,000.00 0.00 9,000.00 9,000.00 0.00 0.00 0.00 0.00
HERNANDEZ JESUS 650004153- 5 53,000.00 0.00 53,000.00 53,000.00 0.00 0.00 0.00 0.00
DE LEON AMAURIS 650010504- 1 48,730.00 0.00 48,730.00 48,730.00 0.00 0.00 0.00 0.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 452,880.00 0.00 452,880.00 452,880.00 0.00 0.00 0.00 0.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

27-12-03 noprrp014
IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 2003
===================================================================================================================================================================================================================================
RAZON SOCIAL RAY.O.VAC DOMINICANA RNC 101009527
DIRECCION AV. ROMULO BETANCOURT, ZONA IND. DE HERRERA MUNICIPIO
PROVINCIA CIUDAD TELEFONO No. 530-5409 FAX No. 530-7966
===================================================================================================================================================================================================================================
DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTALES RD$ ==> 13,063,714.05 0.00 13,063,714.05 10,987,414.05 503,944.31 502,102.15 1,999.61 3,841.77
===================================================================================================================================================================================================================================
RESUMEN PARA EL PAGO
------------------------------------- Yo_______________________________________________________________________________________________________ _______________________________________________________________________
| NUMERO DE | 205 | en calidad de Agente de Retencion, por la presente declaro bajo juramento que los datos consignados en la | IMPUESTO A PAGAR | |
| ASALARIADOS | | presente declaracion son correctos y completos y que no he omitido dato alguno que la misma deba contener |---------------------------------------|-----------------------------|
|---------------------|-------------| siendo en consecuencia todo su contenido la fiel expresion de la verdad. | RECARGOS ART.252 ( )% | |
| NUMERO DE | | |---------------------------------------|-----------------------------|
| ASALARIADOS | 15 | | INTERES INDENNIZATORIO ART.27 ( )% | |
| SUJETOS A RETENCION | | _____________________________________________ _____________________________________________ |---------------------------------------|-----------------------------|
------------------------------------- Nombres y Apellidos del Representante Firma | TOTAL A PAGAR RD$ | |
-----------------------------------------------------------------------
(COLOQUE EL SELLO DE LA EMPRESA)
PROYECTO/nodir/MARMOTECH/PROYECTO/nodir/nofmrp009.per
+27
View File
@@ -0,0 +1,27 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMRP009
OBJETIVO : Pantalla a ser utilizado por el programa que lista
los Descuentos de Cooperativa (NOPRRP009,NOPRRP011)
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Septiembre 03, 1993
------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Numero de Nomina [f001]
Tipo de Nomina [f]
Movimiento [k ]
}
end
tables
notb00008
attributes
f001 = notb00008.num_nomi,autonext,
comments = "Digite el numero de la nomina";
f = notb00008.tipo_emp,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
k = notb00008.cod_mov,required,
comments = "Digite el movimiento deseado";
end
PROYECTO/nodir/a.sql
+19
View File
@@ -0,0 +1,19 @@
select a.cod_mov,b.clase_mov,a.cantidad,a.valor,b.cantidad_emp,cantidad_cia,
b.ch_encabeza
FROM notb00003 a,notb00002 b
WHERE
a.num_emp = 620 and
a.departamento = a.departamento and
a.status_t is null and
a.cod_mov = b.cod_mov
UNION
SELECT a.cod_mov,b.clase_mov,a.cantidad,a.valor,b.cantidad_emp,cantidad_cia,
b.ch_encabeza
FROM notb00007 a,notb00002 b
WHERE a.num_nomi = 9901 and
a.num_emp = 620 and
a.tipo_emp = "Q" and
a.departamento = a.departamento and
a.status_t is null and
a.cod_mov = b.cod_mov
ORDER BY 1
PROYECTO/nodir/acmn00000.erc
+3
View File
@@ -0,0 +1,3 @@
acmn00000.4gl
No such file or directory. The input file "acmn00000.4gl" cannot be opened.
PROYECTO/nodir/adfmmt001.per
+34
View File
@@ -0,0 +1,34 @@
{
-----------------------------------------------------------------------
FORMULARIO : ADFMMT001
OBJETIVO : Capturar registros de la Tabla de Departamentos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 19, 1993
-----------------------------------------------------------------------
}
database rayovac
screen size 24 by 80
{
Codigo del Departamento [f000]
Descripcion [f001 ]
[j]
Usuario Creador [f002 ] Usuario Modificador [f004 ]
Fecha Creacion [f003 ] Fecha Modificacion [f005 ]
}
end
tables
adtb00001
attributes
f000 = adtb00001.departamento,autonext,
comments = "Digite el codigo del departamento";
f001 = adtb00001.nom_dpto,upshift,
comments = "Digite el nombre del departamento";
j = adtb00001.status_t,noentry;
f002 = adtb00001.us_crea,noentry;
f003 = adtb00001.fech_crea,noentry;
f004 = adtb00001.us_mod,noentry;
f005 = adtb00001.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/adfmmt003.per
+47
View File
@@ -0,0 +1,47 @@
{
------------------------------------------------------------------
FORMULARIO : ADFMMT003
OBJETIVO : Capturar registros de la Tabla de Puestos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 20, 1993
------------------------------------------------------------------
}
database rayovac
screen size 24 by 80
{
Codigo del Puesto [f0]
Nombre del Puesto [f001 ]
Funcion Basica [f002 ]
[f003 ]
Nivel [c] Salario Minimo [a ] Salario Maximo [b ]
[j]
Usuario Creador [f004 ] Usuario Modificador [f006 ]
Fecha Creacion [f005 ] Fecha Modificacion [f007 ]
}
end
tables
adtb00004
attributes
f0 = adtb00004.cod_puesto,autonext,
comments = "Digite el codigo del Puesto";
f001 = adtb00004.nom_puesto,upshift,
comments = "Digite el nombre del Puesto";
f002 = adtb00004.funciones,upshift,
comments = "Digite las funciones relacionadas al Puesto";
f003 = adtb00004.funcion1,upshift,
comments = "Digite las funciones relacionadas al Puesto";
c = adtb00004.nivel_sal,autonext,
comments = "Digite el nivel salarial del Puesto";
a = adtb00004.salario_min,
comments = "Digite el Salario Minimo para el Puesto";
b = adtb00004.salario_max,
comments = "Digite el Salario Maximo para el Puesto";
j = adtb00004.status_t,noentry;
f004 = adtb00004.us_crea,noentry;
f005 = adtb00004.fech_crea,noentry;
f006 = adtb00004.us_mod,noentry;
f007 = adtb00004.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/adfmmt022.per
+69
View File
@@ -0,0 +1,69 @@
{
----------------------------------------------------------------------------
FORMULARIO : ADFMMT022
OBJETIVO : Pantalla para actualizar las informaciones comunes de
la accion de personal y la maestra de empleados.
Es utilizada por: ADPRMT022
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Noviembre 19, 1993
----------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Ficha No.[f000]-[f001]-[f2]-[f3]
[b ]
Puesto[l ]
Depto.[m ]
Dir.[f004 ] [f005] [f006 ] [f007 ]
Ced [f010 ] Serie [f011 ] Sexo [x][ tx ]
Telefono [f008 ] Fecha de Nacimiento [p ]
Nacionalidad [p1] [p2 ] Licencia [m1 ]
Estado Civil [a] [c ] Tipo de Sangre [f03] Sueldo [s ]
Nomina[d] [d1 ] Fecha de Entrada [fe ]
Paga Seguro [z] Codigo Seguro [c1][c2][c3 ]
}
end
tables
adtb00007,adtb00003,
adtb00001,adtb00004
attributes
f000 = adtb00003.num_emp,noentry;
f001 = adtb00003.departamento;
f2 = adtb00003.nivel_emp;
f3 = adtb00003.cod_puesto;
b = formonly.descrip1,noentry;
l = adtb00004.nom_puesto,noentry;
m = adtb00001.nom_dpto,noentry;
f004 = adtb00003.calle,upshift;
f005 = adtb00003.casa_num,upshift;
f006 = adtb00003.barrio,upshift;
f007 = adtb00003.urbanizacion,upshift;
f010 = adtb00003.cedula,autonext,comments = "Digite la cedula del empleado";
f011 = adtb00003.serie,autonext,comments = "Digite la serie del empleado";
p = adtb00003.fech_nac,format = "dd/mm/yy",
comments = "Digite la fecha de nacimiento del empleado";
p1 = adtb00003.cod_nac,autonext,
comments = "Digite la nacionalidad del empleado";
p2 = adtb00007.nom_nac,noentry;
m1 = adtb00003.licencia,noentry;
f008 = adtb00003.telefono,upshift,picture="###-####";
a = adtb00003.estado_civil,upshift,include = ("S", "C"),
comments = "Digite S = Soltero, C = Casado";
c = formonly.descr,noentry;
f03 = adtb00003.tipo_sangre,
comments = "Digite el tipo de sangre del empleado";
s = adtb00003.sueldo_ac;
d = adtb00003.nomina, upshift,include = ("Q", "S", "V"),
comments = "Digite Q = Quincenal, S = Semanal, V = Vendedor";
d1 = formonly.descrip,noentry;
fe = adtb00003.fech_efec,format = "dd/mm/yy";
x = formonly.p_sexo type char,upshift,include= ("M","F"),comments =
"Digite M Para SEXO MASCULINO y F Para FEMENINO";
tx = formonly.tipo_sexo,noentry;
c1 = adtb00003.cod_seg1;
c2 = adtb00003.cod_seg2;
c3 = adtb00003.cod_seg3;
z = adtb00003.paga_seg,include=("S","N"),required,comments=
"Digite S si el empleado paga SEGURO, N en caso contario";
end
PROYECTO/nodir/adfmrp033.per
+26
View File
@@ -0,0 +1,26 @@
{
------------------------------------------------------------------------
FORMULARIO : ADFMRP033
OBJETIVO : Pantalla a ser utilizado por el programa que lista
los Empleados
DISENO : JUAN F. SOTO
FECHA REALIZACION : Noviembre 7, 1995
PROGRAMA Q. UTILI.: ADPRRP033
------------------------------------------------------------------------
}
database rayovac
screen size 24 by 80
{
Ficha del Empleado [f1 ]
Tipo De Empleados [a]
}
end
tables
adtb00003
attributes
f1 = adtb00003.num_emp,comments = "Deje en blanco Para Todos";
a = adtb00003.nomina,comments =
"Digite Q- Quincenales S- Semanales o Deje en Blanco Para todos",
include = ("Q","S","T"),upshift;
end
PROYECTO/nodir/adfmrp036.per
+23
View File
@@ -0,0 +1,23 @@
{
------------------------------------------------------------------------
FORMULARIO : ADFMRP036
OBJETIVO : Pantalla a ser utilizado por el programa que lista
los Empleados Quincenales, Semanales y Ex-Empleados
PROGRAMADOR : Juan F. Soto
FECHA REALIZACION : Marzo 22, 1996.
------------------------------------------------------------------------
}
database rayovac
screen size 24 by 80
{
Clasificacion Empleado [k]
}
end
tables
adtb00003
attributes
k = formonly.decide type char,required,autonext,
comments = "Digite Q - Quincenal S - Semanal T - Ex-Empleado",
include = ("Q","S","T"),upshift;
end
PROYECTO/nodir/adprmt001.4gl
+266
View File
@@ -0,0 +1,266 @@
{
------------------------------------------------------------------
PROGRAMA : ADPRMT001
OBJETIVO : Capturar, Modificar, Eliminar registros de la
Tabla de Departamentos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 19, 1993
------------------------------------------------------------------
}
GLOBALS "adprgb000.4gl"
FUNCTION adprmt001()
CLEAR SCREEN
OPTIONS
FORM LINE 9,
ERROR LINE 23,
COMMENT LINE 21
OPEN FORM adfmmt001 FROM "adfmmt001"
DISPLAY FORM adfmmt001
CALL pantalla()
DISPLAY "adprmt001" AT 4,3
DISPLAY "Departamentos" AT 6,36
MENU "OPCIONES"
COMMAND "Adicionar"
"<Esc> Adiciona Registro <Ctrl-C> Cancela Operacion"
let int_flag = false
CLEAR FORM
CALL adpcad001()
COMMAND "Consultar-modificar"
"<Esc> Realiza Busqueda <Ctrl-C> Cancela Operacion"
let int_flag = false
CALL adpcmf001()
COMMAND "Salir" "Retorna Menu Anterior"
EXIT MENU
END MENU
END FUNCTION
FUNCTION adpcad001()
WHENEVER ERROR CONTINUE
## CAPTURA LOS DATOS QUE VA A CONTENER EL REGISTRO
INPUT BY NAME depto.*
## VERIFICA QUE EL CODIGO NO EXISTA EN EL CATALOGO DE DEPARTAMENTO. SI EXISTE,
## ENTONCES DESPLEGA LOS DATOS DEL REGISTRO EXISTENTE.
AFTER FIELD departamento
IF depto.departamento IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD departamento
ELSE
SELECT * INTO depto.* FROM adtb00001
WHERE departamento = depto.departamento
IF status >= 0 THEN
IF status != NOTFOUND THEN
IF depto.status_t = "E" THEN
LET numero_msg = 36
CALL msg(numero_msg)
NEXT FIELD departamento
END IF
DISPLAY BY NAME depto.*
LET numero_msg = 12
CALL msg(numero_msg)
LET depto.nom_dpto = NULL
NEXT FIELD departamento
END IF
ELSE
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
END IF
END IF
AFTER FIELD nom_dpto
IF depto.nom_dpto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nom_dpto
END IF
AFTER INPUT
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
## SI NO HAY NINGUN PROBLEMA SE PROCEDE A INSERTAR EL REGISTRO
IF depto.nom_dpto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nom_dpto
ELSE
INSERT INTO adtb00001 VALUES (depto.departamento,depto.nom_dpto,
null, USER, CURRENT, null, null)
LET numero_msg = 1
CALL msg(numero_msg)
CLEAR FORM
LET depto.departamento = NULL
LET depto.nom_dpto = NULL
NEXT FIELD departamento
END IF
AFTER FIELD fech_mod
EXIT INPUT
END INPUT
END FUNCTION
FUNCTION adpcmf001()
## AQUI SE PREPARA PARA LA CAPTURA DEL CRITERIO DE SELECCION PARA LA
## MODIFICACION DE REGISTROS
WHENEVER ERROR CONTINUE
CONSTRUCT criterio ON adtb00001.* FROM adtb00001.*
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
LET SELEC = " SELECT UNIQUE * FROM adtb00001 where ",
" status_t is null and ",
criterio clipped,
" ORDER BY 1"
PREPARE busca FROM selec
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
DECLARE dato SCROLL CURSOR FOR busca
OPEN dato
FETCH FIRST dato INTO depto.*
IF status >= 0 THEN
IF STATUS = NOTFOUND THEN
LET numero_msg = 3
CALL msg(numero_msg)
RETURN
END IF
ELSE
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
END IF
DISPLAY BY NAME depto.*
MENU "OPCIONES "
COMMAND "Siguiente"
"Presenta en pantalla el proximo registro encontrado"
FETCH NEXT dato INTO depto.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 4
CALL msg(numero_msg)
END IF
DISPLAY BY NAME depto.*
COMMAND "Anterior"
"Presenta en pantalla el registro anterior encontrado"
FETCH PREVIOUS dato INTO depto.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 5
CALL msg(numero_msg)
END IF
DISPLAY BY NAME depto.*
COMMAND "Primero"
"Presenta en pantalla el primer registro encontrado"
FETCH FIRST dato INTO depto.*
DISPLAY BY NAME depto.*
LET numero_msg = 5
CALL msg(numero_msg)
COMMAND "Ultimo"
"Presenta en pantalla el ultimo registro encontrado"
FETCH LAST dato INTO depto.*
DISPLAY BY NAME depto.*
LET numero_msg = 4
CALL msg(numero_msg)
COMMAND "Escoger"
"<Esc> Actualiza Registro <Ctrl-C> Cancela Operacion"
IF depto.status_t = "E" THEN
LET numero_msg = 39
CALL msg(numero_msg)
RETURN
END IF
## SE SELECCIONAN LOS CAMPOS QUE SON MODIFICABLES
INPUT BY NAME depto.nom_dpto,
depto.us_crea,
depto.fech_crea,
depto.us_mod,
depto.fech_mod WITHOUT DEFAULTS
AFTER FIELD nom_dpto
IF depto.nom_dpto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nom_dpto
END IF
#### Verifica si el usuario presiono la tecla <Ctrl-C>
AFTER INPUT
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
CLEAR FORM
RETURN
END IF
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
## AQUI SE ACTUALIZA EL REGISTRO
UPDATE adtb00001 SET nom_dpto = depto.nom_dpto,
us_mod = USER,
fech_mod = CURRENT
WHERE departamento = depto.departamento
LET numero_msg = 13
CALL msg(numero_msg)
EXIT INPUT
END INPUT
## AQUI SE ELIMINAN LOS REGISTROS
COMMAND KEY ("L") "eLiminar"
UPDATE adtb00001 SET status_t = "E"
WHERE departamento = depto.departamento
LET numero_msg = 39
CALL msg(numero_msg)
COMMAND "Retornar"
"Retorna al menu anterior"
CLEAR FORM
EXIT MENU
END MENU
END FUNCTION
PROYECTO/nodir/adprmt003.4gl
+330
View File
@@ -0,0 +1,330 @@
{
------------------------------------------------------------------
PROGRAMA : ADPRMT003
OBJETIVO : Capturar, Modificar, Eliminar registros de la
Tabla de Puestos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 20, 1993
------------------------------------------------------------------
}
GLOBALS "adprgb000.4gl"
DEFINE nombre_p LIKE adtb00004.nom_puesto,
cod_p LIKE adtb00004.cod_puesto
FUNCTION adprmt003()
CLEAR SCREEN
OPTIONS
FORM LINE 9,
ERROR LINE 23,
COMMENT LINE 21
OPEN FORM adfmmt003 FROM "adfmmt003"
DISPLAY FORM adfmmt003
CALL pantalla()
DISPLAY "adprmt003" AT 4,3
DISPLAY "Puestos" AT 6,39
MENU "OPCIONES"
COMMAND "Adicionar"
"<Esc> Adiciona Registro <Ctrl-C> Cancela Operacion"
let int_flag = false
CLEAR FORM
CALL adpcad003()
COMMAND "Consultar-modificar"
"<Esc> Realiza Busqueda <Ctrl-C> Cancela Operacion"
let int_flag = false
CALL adpcmf003()
COMMAND "Salir" "Retorna Menu Anterior"
EXIT MENU
END MENU
END FUNCTION
FUNCTION adpcad003()
# WHENEVER ERROR CONTINUE
## Aqui se procede a la captura de los datos que va a contener el registro
INPUT BY NAME puesto.*
## Verifica que el codigo no exista en el catalogo de puestos. Si existe,
## entonces despliega los dato del registro existente.
AFTER FIELD cod_puesto
IF puesto.cod_puesto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD cod_puesto
ELSE
SELECT * INTO puesto.* FROM adtb00004
WHERE cod_puesto = puesto.cod_puesto
IF status >= 0 THEN
IF status != NOTFOUND THEN
IF puesto.status_t = "E" THEN
LET numero_msg = 36
CALL msg(numero_msg)
NEXT FIELD cod_puesto
END IF
DISPLAY BY NAME puesto.*
LET numero_msg = 12
CALL msg(numero_msg)
LET puesto.nom_puesto = NULL
NEXT FIELD cod_puesto
END IF
LET nombre_p = puesto.nom_puesto
LET cod_p = puesto.cod_puesto
INITIALIZE puesto.* TO NULL
LET puesto.nom_puesto = nombre_p
LET puesto.cod_puesto = cod_p
ELSE
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
END IF
END IF
AFTER FIELD nom_puesto
IF puesto.nom_puesto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nom_puesto
END IF
## CHEQUEA QUE SE DESCRIBAN LAS FUNCIONES DEL PUESTO
{ AFTER FIELD funciones
IF puesto.funciones IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD funciones
END IF}
## CHEQUEA QUE SE DESCRIBAN LAS FUNCIONES DEL PUESTO
{ AFTER FIELD funcion1
IF puesto.funcion1 IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD funcion1
END IF
## CHEQUEA QUE SE INDIQUE EL NIVEL SALARIAL CORRESPONDIENTE AL PUESTO
AFTER FIELD nivel_sal
IF puesto.nivel_sal IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nivel_sal
END IF
## CHEQUEA QUE SE INDIQUE EL SALARIO MININO CORRESPONDIENTE AL PUESTO
AFTER FIELD salario_min
IF puesto.salario_min IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD salario_min
END IF
## CHEQUEA QUE SE INDIQUE EL SALARIO MAXIMO CORRESPONDIENTE AL PUESTO
AFTER FIELD salario_max
IF puesto.salario_max IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD salario_max
END IF}
AFTER INPUT
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
## SI NO OCURRE NINGUN ERROR SE PROCEDE A INSERTAR EL REGISTRO
IF puesto.cod_puesto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD cod_puesto
ELSE
INSERT INTO adtb00004 VALUES (puesto.cod_puesto,puesto.nom_puesto,
puesto.funciones,puesto.funcion1,puesto.nivel_sal,
puesto.salario_min,puesto.salario_max,null,USER,
CURRENT,null,null)
LET numero_msg = 1
CALL msg(numero_msg)
CLEAR FORM
LET puesto.cod_puesto = NULL
LET puesto.nom_puesto = NULL
LET puesto.funciones = NULL
LET puesto.funcion1 = NULL
LET puesto.nivel_sal = NULL
LET puesto.salario_min = NULL
LET puesto.salario_max = NULL
NEXT FIELD cod_puesto
END IF
AFTER FIELD fech_mod
EXIT INPUT
END INPUT
END FUNCTION
FUNCTION adpcmf003()
## Aqui se prepara para la captura del criterio de seleccion para
## modificar/actualizar los registros
# WHENEVER ERROR CONTINUE
CONSTRUCT criterio ON adtb00004.cod_puesto FROM cod_puesto
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
LET SELEC = " SELECT UNIQUE * FROM adtb00004 where ",
" status_t is null and ",
criterio clipped,
" ORDER BY 1"
PREPARE busca FROM selec
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
DECLARE dato SCROLL CURSOR FOR busca
OPEN dato
FETCH FIRST dato INTO puesto.*
IF status >= 0 THEN
IF STATUS = NOTFOUND THEN
LET numero_msg = 3
CALL msg(numero_msg)
RETURN
END IF
ELSE
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
END IF
DISPLAY BY NAME puesto.*
MENU "OPCIONES "
COMMAND "Siguiente"
"Presenta en pantalla el proximo registro encontrado"
FETCH NEXT dato INTO puesto.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 4
CALL msg(numero_msg)
END IF
DISPLAY BY NAME puesto.*
COMMAND "Anterior"
"Presenta en pantalla el registro anterior encontrado"
FETCH PREVIOUS dato INTO puesto.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 5
CALL msg(numero_msg)
END IF
DISPLAY BY NAME puesto.*
COMMAND "Primero"
"Presenta en pantalla el primer registro encontrado"
FETCH FIRST dato INTO puesto.*
DISPLAY BY NAME puesto.*
LET numero_msg = 5
CALL msg(numero_msg)
COMMAND "Ultimo"
"Presenta en pantalla el ultimo registro encontrado"
FETCH LAST dato INTO puesto.*
DISPLAY BY NAME puesto.*
LET numero_msg = 4
CALL msg(numero_msg)
COMMAND "Escoger"
"<Esc> Actualiza Registro <Ctrl-C> Cancela Operacion"
IF puesto.status_t = "E" THEN
LET numero_msg = 39
CALL msg(numero_msg)
RETURN
END IF
## SE SELECCIONAN LOS CAMPOS MODIFICABLES
INPUT BY NAME puesto.nom_puesto,
puesto.funciones,
puesto.funcion1,
puesto.nivel_sal,
puesto.salario_min,
puesto.salario_max,
puesto.us_crea,
puesto.fech_crea,
puesto.us_mod,
puesto.fech_mod WITHOUT DEFAULTS
AFTER FIELD nom_puesto
IF puesto.nom_puesto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nom_puesto
END IF
#### Verifica si el usuario presiono la tecla <Ctrl-C>
AFTER INPUT
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
CLEAR FORM
RETURN
END IF
CALL integridad()
IF bandera = 1 THEN
CLEAR SCREEN
RETURN
END IF
## Aqui se actualizan los registros
UPDATE adtb00004 SET nom_puesto = puesto.nom_puesto,
funciones = puesto.funciones,
funcion1 = puesto.funcion1,
nivel_sal = puesto.nivel_sal,
salario_min = puesto.salario_min,
salario_max = puesto.salario_max,
us_mod = USER,
fech_mod = CURRENT
WHERE cod_puesto = puesto.cod_puesto
LET numero_msg = 13
CALL msg(numero_msg)
EXIT INPUT
END INPUT
## AQUI SE ELIMINAN LOS REGISTROS
COMMAND KEY ("L") "eLiminar"
UPDATE adtb00004 SET status_t = "E"
WHERE cod_puesto = puesto.cod_puesto
LET numero_msg = 39
CALL msg(numero_msg)
COMMAND "Retornar"
"Retorna al menu anterior"
CLEAR FORM
EXIT MENU
END MENU
END FUNCTION
PROYECTO/nodir/adprmt022.4gl
+332
View File
@@ -0,0 +1,332 @@
{
----------------------------------------------------------------------------
PROGRAMA : ADPRMT022
OBJETIVO : Modificar y Eliminar registros de la
Tabla de Maestra de Empleados
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Noviembre 19, 1993
----------------------------------------------------------------------------
}
GLOBALS "adprgb000.4gl"
DEFINE tipo_sexo CHAR(9)
DEFINE p_sexo CHAR(1)
FUNCTION adprmt022()
CLEAR SCREEN
OPTIONS
FORM LINE 9,
ERROR LINE 24,
COMMENT LINE 23
OPEN FORM adfmmt022 FROM "adfmmt022"
DISPLAY FORM adfmmt022
CALL pantalla()
DISPLAY "adprmt022" AT 4,3
DISPLAY "Maestra de Empleados" AT 6,33
MENU "OPCIONES"
COMMAND "Consultar-modificar"
"<Esc> Realiza Busqueda <Ctrl-C> Cancela Operacion"
let int_flag = false
CALL adpcmf022()
COMMAND "Salir" "Retorna Menu Anterior"
EXIT MENU
END MENU
END FUNCTION
FUNCTION adpcmf022()
## AQUI SE PREPARA PARA LA CAPTURA DEL CRITERIO DE SELECCION PARA CONSULTA Y
## MODIFICACION DE REGISTROS
DEFINE ant RECORD
num_emp SMALLINT,
departamento SMALLINT,
nivel_emp SMALLINT,
cod_puesto SMALLINT
END RECORD
# WHENEVER ERROR CONTINUE
CONSTRUCT criterio ON a.num_emp,a.departamento FROM num_emp,departamento
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
LET SELEC =
"SELECT UNIQUE a.* FROM adtb00003 a ",
"WHERE (a.status_t is null OR a.status_t NOT IN('T','E')) AND ",
criterio clipped," ORDER BY a.num_emp "
PREPARE busca FROM selec
DECLARE datos SCROLL CURSOR FOR busca
OPEN datos
FETCH FIRST datos INTO emplea.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 3
CALL msg(numero_msg)
RETURN
END IF
CALL selecta1()
MENU "OPCION"
COMMAND "Siguiente"
"Presenta en pantalla el proximo registro encontrado"
FETCH NEXT datos INTO emplea.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 4
CALL msg(numero_msg)
END IF
LET tipo_sexo = " "
CALL selecta1()
COMMAND "Anterior"
"Presenta en pantalla el registro anterior encontrado"
FETCH PREVIOUS datos INTO emplea.*
IF STATUS = NOTFOUND THEN
LET numero_msg = 5
CALL msg(numero_msg)
END IF
LET tipo_sexo = " "
CALL selecta1()
COMMAND "Primero"
"Presenta en pantalla el primer registro encontrado"
FETCH FIRST datos INTO emplea.*
CALL selecta1()
LET tipo_sexo = " "
LET numero_msg = 5
CALL msg(numero_msg)
COMMAND "Ultimo"
"Presenta en pantalla el ultimo registro encontrado"
FETCH LAST datos INTO emplea.*
CALL selecta1()
LET tipo_sexo = " "
LET numero_msg = 4
CALL msg(numero_msg)
COMMAND "Escoger" "<Esc> Actualiza Registro <Ctrl-C> Cancela Operacion"
## SE SELECCIONAN LOS CAMPOS QUE PUEDEN SER MODIFICABLES
INPUT BY NAME emplea.departamento,emplea.nivel_emp,emplea.cod_puesto,
emplea.calle,emplea.casa_num,emplea.barrio,
emplea.urbanizacion,emplea.cedula,emplea.serie,
emplea.telefono,emplea.fech_nac,emplea.cod_nac,
emplea.estado_civil,emplea.tipo_sangre,emplea.sueldo_ac,
emplea.nomina,emplea.paga_seg,emplea.cod_seg1,
emplea.cod_seg2,emplea.cod_seg3,p_sexo WITHOUT DEFAULTS
## VERIFICA QUE LOS CAMPOS MODIFICABLES NO ESTEN EN BLANCO
AFTER FIELD departamento
IF emplea.departamento IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD departamento
END IF
SELECT nom_dpto INTO depto.nom_dpto FROM adtb00001
WHERE departamento = emplea.departamento
DISPLAY BY NAME depto.nom_dpto
AFTER FIELD cod_puesto
IF emplea.cod_puesto IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD cod_puesto
END IF
SELECT @nom_puesto INTO puesto.nom_puesto FROM adtb00004
WHERE @cod_puesto = emplea.cod_puesto
DISPLAY BY NAME puesto.nom_puesto
AFTER FIELD nivel_emp
IF emplea.nivel_emp IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nivel_emp
END IF
AFTER FIELD estado_civil
IF emplea.estado_civil IS NOT NULL THEN
IF emplea.estado_civil = "S" THEN
LET descr = "SOLTERO"
END IF
IF emplea.estado_civil = "C" THEN
LET descr = "CASADO"
END IF
ELSE
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD estado_civil
END IF
DISPLAY BY NAME descr
AFTER FIELD sueldo_ac
IF emplea.sueldo_ac IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD sueldo_ac
END IF
AFTER FIELD fech_nac
IF emplea.fech_nac IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD fech_nac
END IF
IF YEAR(emplea.fech_nac) >= YEAR(today) THEN
ERROR "FECHA INCORRECTA"
NEXT FIELD fech_nac
END IF
AFTER FIELD nomina
IF emplea.nomina IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD nomina
END IF
IF emplea.nomina = "Q" THEN
LET descrip = "QUINCENAL"
END IF
IF emplea.nomina = "S" THEN
LET descrip = "SEMANAL"
END IF
IF emplea.nomina = "V" THEN
LET descrip = "VENDEDOR"
END IF
DISPLAY BY NAME descrip
AFTER FIELD p_sexo
IF p_sexo IS NULL THEN
LET numero_msg = 16
CALL msg(numero_msg)
NEXT FIELD p_sexo
END IF
IF p_sexo = "M" THEN
LET tipo_sexo = "MASCULINO"
ELSE
IF p_sexo = "F" THEN
LET tipo_sexo = "FEMENINO"
END IF
END IF
DISPLAY BY NAME tipo_sexo
#### Verifica si el usuario presiono la tecla <Ctrl-C>
AFTER INPUT
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
CLEAR FORM
RETURN
END IF
END INPUT
## AQUI SE ACTUALIZA EL REGISTRO
UPDATE adtb00003 SET (departamento,cod_puesto,nivel_emp,nom1_emp,nom2_emp,
apell1_emp,apell2_emp,calle,casa_num,barrio,
urbanizacion,telefono,cedula,serie,cod_nac,estado_civil,
tipo_sangre,sueldo_ac,nomina,paga_seg, us_mod,fech_mod)=
(emplea.departamento,emplea.cod_puesto,emplea.nivel_emp,
emplea.nom1_emp,emplea.nom2_emp,emplea.apell1_emp,
emplea.apell2_emp,emplea.calle,emplea.casa_num,
emplea.barrio,emplea.urbanizacion,emplea.telefono,
emplea.cedula,emplea.serie,emplea.cod_nac,
emplea.estado_civil,emplea.tipo_sangre,emplea.sueldo_ac,
emplea.nomina,emplea.paga_seg,USER,CURRENT)
WHERE @num_emp = emplea.num_emp
UPDATE adtb00021 SET sexo = p_sexo WHERE num_emp = emplea.num_emp AND
cod_par = 0 AND sec_par = 0
LET numero_msg = 13
CALL msg(numero_msg)
IF status < 0 THEN
CALL integridad()
END IF
## AQUI SE ELIMINAN LOS REGISTROS
COMMAND KEY ("L") "eLiminar"
UPDATE adtb00003 SET status_t = "E"
WHERE num_emp = emplea.num_emp
LET numero_msg = 39
CALL msg(numero_msg)
COMMAND "Retornar" "Retorna al menu anterior"
CLEAR FORM
EXIT MENU
END MENU
END FUNCTION
FUNCTION selecta1()
SELECT a.sexo INTO p_sexo FROM adtb00021 a
WHERE a.num_emp = emplea.num_emp AND a.cod_par = 0 AND a.sec_par = 0
LET descrip1 = emplea.nom1_emp CLIPPED," ",emplea.nom2_emp CLIPPED," ",
emplea.apell1_emp CLIPPED," ",emplea.apell2_emp CLIPPED
SELECT nom_dpto INTO depto.nom_dpto FROM adtb00001
WHERE departamento = emplea.departamento
SELECT @nom_puesto INTO puesto.nom_puesto FROM adtb00004
WHERE @cod_puesto = emplea.cod_puesto
IF emplea.estado_civil = "S" THEN
LET descr = "SOLTERO"
END IF
IF emplea.estado_civil = "C" THEN
LET descr = "CASADO"
END IF
IF p_sexo = "M" THEN
LET tipo_sexo = "MASCULINO"
END IF
IF p_sexo = "F" THEN
LET tipo_sexo = "FEMENINO"
END IF
IF emplea.nomina = "Q" THEN
LET descrip = "QUINCENAL"
END IF
IF emplea.nomina = "S" THEN
LET descrip = "SEMANAL"
END IF
SELECT nom_nac INTO nacion.nom_nac FROM adtb00007
WHERE cod_nac = emplea.cod_nac
DISPLAY BY NAME emplea.num_emp,emplea.departamento,emplea.nivel_emp,
emplea.cod_puesto,descrip1,emplea.calle,emplea.casa_num,
emplea.barrio,emplea.urbanizacion,emplea.cedula,
emplea.serie,emplea.fech_nac,emplea.cod_nac,
emplea.licencia,emplea.telefono,emplea.estado_civil,
emplea.tipo_sangre,emplea.sueldo_ac,emplea.nomina,
emplea.fech_efec,descr,descrip,nacion.nom_nac,
depto.nom_dpto,puesto.nom_puesto,p_sexo,tipo_sexo,
emplea.paga_seg,emplea.cod_seg1,emplea.cod_seg2,
emplea.cod_seg3
END FUNCTION
PROYECTO/nodir/adprrp033.4gl
+272
View File
@@ -0,0 +1,272 @@
{
-------------------------------------------------------------------------------
PROGRAMA : ADPRRP033
OBJETIVO : Listar las informaciones Complementarias del reporte
ADPRRP011
PROGRAMADOR : JUAN F. SOTO
FECHA REALIZACION : Noviembre 7, 1995
-------------------------------------------------------------------------------
}
GLOBALS "adprgb000.4gl"
DEFINE tipo_l CHAR(1)
FUNCTION adprrp033()
## SE DEFINE EL REGISTRO DE BUSQUEDA CON LOS CAMPOS NECESARIOS PARA EL REPORTE
DEFINE list_emp RECORD
num_emp LIKE adtb00003.num_emp,
nom1_emp LIKE adtb00003.nom1_emp,
nom2_emp LIKE adtb00003.nom1_emp,
apell1_emp LIKE adtb00003.apell1_emp,
apell2_emp LIKE adtb00003.apell1_emp,
cedula LIKE adtb00003.cedula,
serie LIKE adtb00003.serie,
fech_nac LIKE adtb00003.fech_nac,
fech_efec LIKE adtb00003.fech_efec,
estado_civil LIKE adtb00003.estado_civil,
sexo LIKE adtb00034.sexo
END RECORD
#WHENEVER ERROR CONTINUE
OPTIONS
FORM LINE 8,
ERROR LINE 23,
COMMENT LINE 21
CLEAR SCREEN
OPEN FORM adfmrp033 FROM "adfmrp033"
DISPLAY FORM adfmrp033
CALL pantalla()
DISPLAY "adprrp033" AT 4,3
DISPLAY "Empleados Activos" AT 6,34
## INDICA EL PAPEL NECESARIO PARA IMPRIMIR EL REPORTE. 1 - PAPEL 9 1/2 X 11
## 2 - PAPEL 14 7/8 X 11
LET tipo_papel = 2
CALL msgrp000(tipo_papel)
## AQUI SE DIGITA LA VARIABLE QUE INDICA LA CONDICION DEL REPORTE, ES DECIR
## SI SE TRATA DE EMPLEADOS SEMANALES O QUINCENALES
CONSTRUCT BY NAME criterio ON a.num_emp,a.nomina
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
LABEL pide:
PROMPT "Listado Numerico o Alfabetico (N/A)? " FOR CHAR tipo_l
LET tipo_l = UPSHIFT(tipo_l)
IF tipo_l IS NULL THEN
LET tipo_l = "K"
END IF
IF tipo_l != "N" AND tipo_l != "A" THEN
GOTO pide
END IF
IF decide IS NULL THEN
LET decide = "S"
END IF
## SE SELECCIONAN LOS CAMPOS NECESARIOS PARA EL REPORTE DE LOS QUINCENALES
IF decide = "N" THEN
LET SELEC =
"SELECT UNIQUE a.num_emp,a.nom1_emp,a.nom2_emp,",
" a.apell1_emp,a.apell2_emp,a.cedula,a.serie,a.fech_nac, ",
" a.fech_efec,a.estado_civil ",
"FROM adtb00003 a ",
"WHERE ",criterio clipped,
" AND a.status_t is null OR a.status_t = 'I' ",
"ORDER BY 1 "
ELSE
LET SELEC =
"SELECT UNIQUE a.num_emp,a.nom1_emp,a.nom2_emp,",
" a.apell1_emp,a.apell2_emp,a.cedula,a.serie,a.fech_nac, ",
" a.fech_efec,a.estado_civil ",
"FROM adtb00003 a ",
"WHERE ",criterio clipped,
" AND a.status_t is null OR a.status_t = 'I' ",
"ORDER BY 4 "
END IF
DISPLAY "Buscando Informacion ... Espere Por Favor" AT 19,14
ATTRIBUTE (REVERSE,BOLD)
## AQUI SE PREPARA LA INFORMACION SELECCIONADA
PREPARE busca FROM selec
DECLARE accion CURSOR FOR busca
OPEN accion
DISPLAY " " AT 19,14
DISPLAY "<< Reporte Generandose ... Por Favor Espere. >>"
AT 19,14 ATTRIBUTE (REVERSE)
START REPORT nace TO "C:\\archivo"
## AQUI SE BUSCA LA INFORMACION DE LOS CAMPOS DEL REGISTRO PARA DARLE
## SALIDA AL REPORTE
WHILE STATUS != NOTFOUND
FETCH accion INTO list_emp.*
IF STATUS = NOTFOUND THEN
EXIT WHILE
END IF
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
OUTPUT TO REPORT nace(list_emp.*)
END WHILE
FINISH REPORT nace
CLEAR SCREEN
RUN "type C:\\archivo > %USPRINT%" END FUNCTION
## AQUI SE DEFINE EL REGISTRO DE IMPRESION CON LOS CAMPOS NECESARIOS PARA
## EL REPORTE
REPORT nace(x)
DEFINE x RECORD
num_emp LIKE adtb00003.num_emp,
nom1_emp LIKE adtb00003.nom1_emp,
nom2_emp LIKE adtb00003.nom1_emp,
apell1_emp LIKE adtb00003.apell1_emp,
apell2_emp LIKE adtb00003.apell1_emp,
cedula LIKE adtb00003.cedula,
serie LIKE adtb00003.serie,
fech_nac LIKE adtb00003.fech_nac,
fech_efec LIKE adtb00003.fech_efec,
estado_civil LIKE adtb00003.estado_civil,
sexo LIKE adtb00034.sexo
END RECORD
## DEFINICION DE LAS VARIABLES DE IMPRESION
DEFINE doble_on CHAR(2)
DEFINE doble_off CHAR(2)
DEFINE negrillas_on CHAR(2)
DEFINE negrillas_off CHAR(2)
DEFINE comp_on CHAR(2)
DEFINE comp_off CHAR(2)
DEFINE doce CHAR(2)
DEFINE normal CHAR(2)
DEFINE hora CHAR(5)
DEFINE l SMALLINT
DEFINE varia CHAR(12),
m_sexo,m_civil CHAR(10),
nom_provincia CHAR(20),
cod_prov,codigo_sol SMALLINT
OUTPUT
## DEFINICION DE LOS MARGENES DE IMPRESION
TOP MARGIN 0
LEFT MARGIN 2
BOTTOM MARGIN 4
FORMAT
PAGE HEADER
LET doble_on = ASCII 14
LET doble_off = ASCII 20
LET negrillas_on = ASCII 27, ASCII 69
LET negrillas_off = ASCII 27, ASCII 70
LET comp_on = ASCII 15
LET comp_off = ASCII 18
LET doce = ASCII 27, ASCII 77
LET normal = ASCII 27, ASCII 80
LET hora = time
## AQUI SE INDICA LA IMPRESION DE LOS ENCABEZADOS
PRINT COLUMN 1, comp_on,
COLUMN 2, "adprrp033",
COLUMN 16, negrillas_on,
COLUMN 43, "R A Y . O . V A C D O M I N I C A N A, S. A.",
COLUMN 90, negrillas_off,
COLUMN 133, "Pag.",pageno using "###"
PRINT COLUMN 1,
COLUMN 44, "Sistema de Administracion de Personal",
COLUMN 128, today using "dd/mm/yy"
PRINT COLUMN 1,
COLUMN 44, " Maestra de Personal ",
COLUMN 131, hora
PRINT doce,comp_on
PRINT COLUMN 2, "---------------------------------------------------",
"---------------------------------------------------",
"------------------------------------------------------"
PRINT COLUMN 103, "Estado",
COLUMN 115, "Fecha de",
COLUMN 127, "Lugar de",
COLUMN 148, "Fecha de"
PRINT COLUMN 2, "Codigo No.",
COLUMN 13, "Nombre Empleado",
COLUMN 74, "Cedula-Serie",
COLUMN 91, "Sexo",
COLUMN 103, "Civil ",
COLUMN 115, "Entrada",
COLUMN 127, "Nacimiento",
COLUMN 148, "Nacimiento"
PRINT COLUMN 2, "---------------------------------------------------",
"---------------------------------------------------",
"------------------------------------------------------"
ON EVERY ROW
# Busca el sexo de cada empleado y como la tabla esta estructurada para el
# Sexo de los familiares tambien, entonces para identificar el sexo del empleado
# hay distinguirlo con el codigo del parentesco(cod_par) que es cero(0).
SELECT @sexo INTO x.sexo
FROM adtb00021
WHERE @num_emp = x.num_emp and
cod_par = 0
IF x.sexo = "M" THEN
LET m_sexo = "MASCULINO"
ELSE
LET m_sexo = "FEMENINO"
END IF
IF x.estado_civil = "C" THEN
LET m_civil = "CASADO"
ELSE
LET m_civil = "SOLTERO"
END IF
# Busqueda del codigo del solicitante
SELECT MAX(cod_sol) INTO codigo_sol
FROM adtb00017
WHERE num_emp = x.num_emp
# Busqueda del codigo de la provincia en que nacio
SELECT unique cod_provincia INTO cod_prov
FROM adtb00012
WHERE cod_sol = codigo_sol
# Busqueda del nombre de la provincia en que nacio
SELECT unique nombre_provincia INTO nom_provincia
FROM vetb00020
WHERE cod_provincia = cod_prov
PRINT COLUMN 3, x.num_emp USING "&&&&",
COLUMN 14, x.apell1_emp clipped," ",x.apell2_emp clipped," ",
x.nom1_emp clipped," ",x.nom2_emp clipped," ",
COLUMN 72, x.cedula using "#########","-",x.serie using "&&&&",
COLUMN 91, m_sexo clipped,
COLUMN 103, m_civil clipped,
COLUMN 115, x.fech_efec using "dd/mm/yy",
COLUMN 125, nom_provincia,
COLUMN 148, x.fech_nac using "dd/mm/yy"
ON LAST ROW
skip 1 line
PRINT COLUMN 2, "Total de Registros Impresos = ", count(*) using "###"
PRINT comp_off
END REPORT
PROYECTO/nodir/adprrp036.4gl
+228
View File
@@ -0,0 +1,228 @@
{
-------------------------------------------------------------------------------
PROGRAMA : ADPRRP036
OBJETIVO : Listar las informaciones generales de los
Empleados Quincenales y Semanales
PROGRAMADOR : Juan F. Soto
FECHA REALIZACION : Marzo 22, 1996
-------------------------------------------------------------------------------
}
GLOBALS "adprgb000.4gl"
DEFINE tipo_l CHAR(1)
FUNCTION adprrp036()
## SE DEFINE EL REGISTRO DE BUSQUEDA CON LOS CAMPOS NECESARIOS PARA EL REPORTE
DEFINE list_emp RECORD
num_emp LIKE adtb00003.num_emp,
nivel_emp LIKE adtb00003.nivel_emp,
cod_puesto LIKE adtb00003.cod_puesto,
nom1_emp LIKE adtb00003.nom1_emp,
nom2_emp LIKE adtb00003.nom2_emp,
apell1_emp LIKE adtb00003.apell1_emp,
apell2_emp LIKE adtb00003.apell2_emp,
cedula LIKE adtb00003.cedula,
serie LIKE adtb00003.serie,
nom_puesto LIKE adtb00004.nom_puesto,
tipo_sangre LIKE adtb00003.tipo_sangre
END RECORD
#WHENEVER ERROR CONTINUE
OPTIONS
FORM LINE 8,
ERROR LINE 23,
COMMENT LINE 21
CLEAR SCREEN
CALL pantalla()
DISPLAY "adprrp036" AT 4,3
DISPLAY "Maestra Empleado Resumen" AT 6,28
## INDICA EL PAPEL NECESARIO PARA IMPRIMIR EL REPORTE. 1 - PAPEL 9 1/2 X 11
## 2 - PAPEL 14 7/8 X 11
LET tipo_papel = 2
CALL msgrp000(tipo_papel)
## AQUI SE DIGITA LA VARIABLE QUE INDICA LA CONDICION DEL REPORTE, ES DECIR
## SI SE TRATA DE EMPLEADOS SEMANALES O QUINCENALES
LABEL pide:
PROMPT "Listado Numerico o Alfabetico (N/A)? " FOR CHAR tipo_l
LET tipo_l = UPSHIFT(tipo_l)
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
IF tipo_l IS NULL THEN
LET tipo_l = "K"
END IF
IF tipo_l != "N" AND tipo_l != "A" THEN
GOTO pide
END IF
IF decide IS NULL THEN
LET decide = "S"
END IF
## SE SELECCIONAN LOS CAMPOS NECESARIOS PARA EL REPORTE DE LOS QUINCENALES
IF tipo_l = "N" THEN
LET SELEC =
"SELECT UNIQUE a.num_emp,a.nivel_emp,a.cod_puesto, ",
" a.nom1_emp,a.nom2_emp,a.apell1_emp,a.apell2_emp,a.cedula,a.serie, ",
" b.nom_puesto,a.tipo_sangre ",
"FROM adtb00003 a,adtb00004 b ",
"WHERE a.cod_puesto=b.cod_puesto AND ",
" a.num_emp != 888 AND ",
" (a.status_t is null OR ",
" a.status_t NOT IN('D','E','T')) ",
"ORDER BY 1 "
ELSE
LET SELEC =
"SELECT UNIQUE a.num_emp,a.nivel_emp,a.cod_puesto, ",
" a.nom1_emp,a.nom2_emp,a.apell1_emp,a.apell2_emp,a.cedula,a.serie, ",
" b.nom_puesto,a.tipo_sangre ",
"FROM adtb00003 a,adtb00004 b ",
"WHERE a.cod_puesto=b.cod_puesto AND ",
" a.num_emp != 888 AND ",
" (a.status_t is null OR ",
" a.status_t NOT IN('D','E','T')) ",
"ORDER BY 6,7,4,5 "
END IF
DISPLAY "Buscando Informacion ... Espere Por Favor" AT 19,14
ATTRIBUTE (REVERSE,BOLD)
## AQUI SE PREPARA LA INFORMACION SELECCIONADA
PREPARE busca FROM selec
DECLARE accion CURSOR FOR busca
OPEN accion
DISPLAY " " AT 19,14
DISPLAY "<< Reporte Generandose ... Por Favor Espere. >>"
AT 19,14 ATTRIBUTE (REVERSE)
START REPORT emplear1 TO "C:\\archivo"
## AQUI SE BUSCA LA INFORMACION DE LOS CAMPOS DEL REGISTRO PARA DARLE
## SALIDA AL REPORTE
WHILE STATUS != NOTFOUND
FETCH accion INTO list_emp.*
IF STATUS = NOTFOUND THEN
EXIT WHILE
END IF
IF int_flag THEN
LET numero_msg = 2
CALL msg(numero_msg)
LET int_flag = FALSE
RETURN
END IF
OUTPUT TO REPORT emplear1(list_emp.*)
END WHILE
FINISH REPORT emplear1
CLEAR SCREEN
RUN "type C:\\archivo > %USPRINT%" END FUNCTION
## AQUI SE DEFINE EL REGISTRO DE IMPRESION CON LOS CAMPOS NECESARIOS PARA
## EL REPORTE
REPORT emplear1(x)
DEFINE x RECORD
num_emp LIKE adtb00003.num_emp,
nivel_emp LIKE adtb00003.nivel_emp,
cod_puesto LIKE adtb00003.cod_puesto,
nom1_emp LIKE adtb00003.nom1_emp,
nom2_emp LIKE adtb00003.nom2_emp,
apell1_emp LIKE adtb00003.apell1_emp,
apell2_emp LIKE adtb00003.apell2_emp,
cedula LIKE adtb00003.cedula,
serie LIKE adtb00003.serie,
nom_puesto LIKE adtb00004.nom_puesto,
tipo_sangre LIKE adtb00003.tipo_sangre
END RECORD
## DEFINICION DE LAS VARIABLES DE IMPRESION
DEFINE doble_on CHAR(2)
DEFINE doble_off CHAR(2)
DEFINE negrillas_on CHAR(2)
DEFINE negrillas_off CHAR(2)
DEFINE comp_on CHAR(2)
DEFINE comp_off CHAR(2)
DEFINE doce CHAR(2)
DEFINE normal CHAR(2)
DEFINE hora CHAR(5)
DEFINE l SMALLINT
DEFINE varia CHAR(12)
OUTPUT
## DEFINICION DE LOS MARGENES DE IMPRESION
TOP MARGIN 0
LEFT MARGIN 2
BOTTOM MARGIN 4
FORMAT
PAGE HEADER
LET doble_on = ASCII 14
LET doble_off = ASCII 20
LET negrillas_on = ASCII 27, ASCII 69
LET negrillas_off = ASCII 27, ASCII 70
LET comp_on = ASCII 15
LET comp_off = ASCII 18
LET doce = ASCII 27, ASCII 77
LET normal = ASCII 27, ASCII 80
LET hora = time
## AQUI SE INDICA LA IMPRESION DE LOS ENCABEZADOS
PRINT COLUMN 1, comp_on,negrillas_on
PRINT COLUMN 1, "adprrp036",
COLUMN 44, "R A Y . O . V A C D O M I N I C A N A, S. A.",
COLUMN 128, "Pag. ",pageno using "###"
PRINT COLUMN 44, " Sistema de Administracion de Personal",
COLUMN 128, today using "dd/mm/yy"
PRINT COLUMN 44, " Maestra de Personal ",
COLUMN 131, hora
PRINT COLUMN 2, "---------------------------------------------------",
"---------------------------------------------------" ,
"-------------------------------"
PRINT COLUMN 2, "FICHA NO.",
COLUMN 12, "NOMBRE EMPLEADO",
COLUMN 70, "CARGO",
COLUMN 110, "CEDULA",
COLUMN 125, "TIPO SANGRE"
PRINT COLUMN 2, "---------------------------------------------------",
"---------------------------------------------------" ,
"-------------------------------"
PRINT negrillas_off
## AQUI SE INDICA LA IMPRESION DEL DETALLE
ON EVERY ROW
PRINT COLUMN 3, x.num_emp USING "&&&&";
IF tipo_l = "N" THEN
PRINT COLUMN 12, x.nom1_emp clipped," ",x.nom2_emp clipped," ",
x.apell1_emp clipped," ",x.apell2_emp;
ELSE
PRINT COLUMN 12,x.apell1_emp clipped," ",x.apell2_emp clipped, " ",
x.nom1_emp clipped," ",x.nom2_emp;
END IF
PRINT COLUMN 70, x.nom_puesto,
COLUMN 105, x.cedula using "#<<<<<<<<","-",x.serie using "&&&&",
COLUMN 125, x.tipo_sangre
ON LAST ROW
SKIP 1 LINE
PRINT COLUMN 2, "Total de Registros Impresos = ", count(*) using "###"
PRINT comp_off
END REPORT
PROYECTO/nodir/adtb.sql
+22
View File
@@ -0,0 +1,22 @@
{ TABLE "informix".adtb00021 row size = 94 number of columns = 12 index size = 21 }
create table "informix".adtb00021
(
num_emp smallint,
cod_par smallint,
sec_par smallint,
nombre char(30),
cedula char(20),
sexo char(1),
fecha_nac date,
status_t char(1),
us_crea char(9),
fech_crea datetime year to minute,
us_mod char(9),
fech_mod datetime year to minute
);
revoke all on "informix".adtb00021 from "public";
create index "informix".ad21_1 on "informix".adtb00021 (num_emp);
create index "informix".ad21_2 on "informix".adtb00021 (cod_par,sec_par);
PROYECTO/nodir/adtb3.per
+77
View File
@@ -0,0 +1,77 @@
database marmotech
screen size 24 by 80
{
num_emp [f000 ]
departamento [f001 ]
nivel_emp [f002 ]
cod_puesto [f003 ]
nom1_emp [f004 ]
nom2_emp [f005 ]
apell1_emp [f006 ]
apell2_emp [f007 ]
calle [f008 ]
casa_num [f009 ]
barrio [f010 ]
urbanizacion [f011 ]
telefono [f012 ]
fech_nac [f013 ]
cod_nac [f014 ]
estado_civil [a]
tipo_sangre [a0 ]
cedula [f015 ]
serie [f016 ]
licencia [f017 ]
}
screen
{
sueldo_ac [f018 ]
nomina [b]
fech_efec [f019 ]
paga_seg [c]
cod_seg1 [f020 ]
cod_seg2 [f021 ]
cod_seg3 [f022 ]
status_t [d]
us_crea [f023 ]
fech_crea [f024 ]
us_mod [f025 ]
fech_mod [f026 ]
}
end
tables
adtb00003
attributes
f000 = adtb00003.num_emp;
f001 = adtb00003.departamento;
f002 = adtb00003.nivel_emp;
f003 = adtb00003.cod_puesto;
f004 = adtb00003.nom1_emp;
f005 = adtb00003.nom2_emp;
f006 = adtb00003.apell1_emp;
f007 = adtb00003.apell2_emp;
f008 = adtb00003.calle;
f009 = adtb00003.casa_num;
f010 = adtb00003.barrio;
f011 = adtb00003.urbanizacion;
f012 = adtb00003.telefono;
f013 = adtb00003.fech_nac;
f014 = adtb00003.cod_nac;
a = adtb00003.estado_civil;
a0 = adtb00003.tipo_sangre;
f015 = adtb00003.cedula;
f016 = adtb00003.serie;
f017 = adtb00003.licencia;
f018 = adtb00003.sueldo_ac;
b = adtb00003.nomina;
f019 = adtb00003.fech_efec;
c = adtb00003.paga_seg;
f020 = adtb00003.cod_seg1;
f021 = adtb00003.cod_seg2;
f022 = adtb00003.cod_seg3;
d = adtb00003.status_t;
f023 = adtb00003.us_crea;
f024 = adtb00003.fech_crea;
f025 = adtb00003.us_mod;
f026 = adtb00003.fech_mod;
end
PROYECTO/nodir/aleatorio.4gl
+24
View File
@@ -0,0 +1,24 @@
IMPORT util
MAIN
DEFINE i SMALLINT
DISPLAY "Before srand() call:"
FOR i=1 TO 3
DISPLAY util.Math.rand(100)
END FOR
CALL util.Math.srand()
DISPLAY "After srand() call:"
# FOR i=1 TO 3
DISPLAY util.Math.rand(150000)
# END FOR
END MAIN
{
65828
46131
112163
92251
38343
67513
}
PROYECTO/nodir/aumento.4gl
+65
View File
@@ -0,0 +1,65 @@
SCHEMA smarmotech
MAIN
DEFINE usuarios,clave CHAR(50),
pnumemp smallint,
pfecha char(10),
pfecha_r char(10),
pvalor DEC(12,2),
cuenta smallint
DEFER INTERRUPT
CALL ARG_VAL(1) RETURNING usuarios
CALL ARG_VAL(2) RETURNING clave
CONNECT TO "smarmotech" USER usuarios USING clave
DECLARE busca_empleados CURSOR FOR
SELECT a.num_emp,MAX(a.valor),CAST(b.fech_efec AS CHAR(10))
FROM tmpaumento a,adtb00003 b
WHERE a.cod_mov =1 AND a.valor <> 0 AND a.num_nomi IS NOT NULL AND
a.num_emp = b.num_emp AND b.status_t IS NULL
GROUP BY a.num_emp,b.fech_efec
DISPLAY "EN PROCESO...."
START REPORT emplea TO "EMPLEA.TXT"
DELETE FROM tmpfempleados
FOREACH busca_empleados INTO pnumEmp,pvalor,pfecha_r
LET pfecha = NULL
SELECT CAST(min(a.fecha) AS CHAR(10)) INTO pfecha
FROM tmpaumento a
WHERE a.num_emp = pnumemp AND a.valor = pvalor
OUTPUT TO REPORT emplea(pnumemp,pfecha,pfecha_r,pvalor)
END FOREACH
FINISH REPORT emplea
DISPLAY "PROCESO TERMINADO"
END MAIN
REPORT emplea(xnumemp,xfecha,xfecha1,xvalor)
DEFINE xnumemp smallint,
xfecha,xfecha1 char(10),
xvalor,xvalorant dec(12,2),
actualiza CHAR(1)
ORDER BY xnumemp,xfecha
FORMAT
BEFORE GROUP OF xfecha
LET actualiza = "N"
#LET xvalorant = xvalor
LET xvalorant = 0
SELECT MAX(a.valor) INTO xvalorant FROM notb00008 a WHERE a.num_emp=xnumemp AND a.fecha < xfecha AND
cod_mov = 1 AND num_nomi IS NOT NULL
IF xvalorant =0 OR xvalorant IS NULL THEN
LET xfecha=NULL
END IF
ON EVERY ROW
INSERT INTO tmpfempleados VALUES (xNUMEMP,xfecha,xfecha1,xvalorant,xvalor,null)
PRINT xnumemp,' ',xfecha,' ',xvalor
LET actualiza = "S"
END REPORT
PROYECTO/nodir/balances.ld
+32
View File
@@ -0,0 +1,32 @@
10|6101|1|0|25|1867.95|
20|4101|35|0|25|500.0|
40|6101|1|0|25|300.0|
50|6300|20|0|25|300.0|
60|6101|1|0|25|100.0|
160|5000|5|0|25|400.0|
162|5000|0|0|25|250.0|
170|5000|6|0|25|1200.01|
180|5000|7|0|25|333.32|
190|5000|7|0|25|200.0|
200|5000|9|0|25|2000.0|
210|5000|6|0|25|0.02|
230|5000|12|0|23|676.16|
230|5000|12|0|25|6910.4|
240|5000|7|0|25|1000.0|
250|5000|6|0|25|300.0|
260|5000|8|0|25|634.66|
301|5000|9|0|25|200.0|
320|6103|18|0|25|1329.0|
367|4101|35|0|25|21300.0|
420|6105|2|0|25|717.39|
450|6500|10|0|25|2000.0|
480|6107|3|0|25|2000.0|
500|6500|10|0|25|1120.08|
530|6101|1|0|25|400.0|
620|2100|27|0|25|3000.0|
630|1001|27|0|25|1808.0|
650|2100|15|0|25|3000.0|
670|2400|30|0|25|11800.0|
680|4101|31|0|23|2301.41|
750|2400|1|0|25|600.0|
800|6103|0|0|25|800.0|
PROYECTO/nodir/bb.sql
+5
View File
@@ -0,0 +1,5 @@
select salario_men_hasta
FROM notb00006
WHERE salario_men_desde <= 3000 and
salario_men_hasta >= 3000
PROYECTO/nodir/bb1.sql
+5
View File
@@ -0,0 +1,5 @@
SELECT MAX(salario_men_hasta),MAX(salario_men_hasta),MAX(porc_emp),
MAX(porc_pat)
FROM notb00006
WHERE salario_men_hasta <= 3033.31
PROYECTO/nodir/busca.sql
+3
View File
@@ -0,0 +1,3 @@
select MIN(salario_MEN_hasta)
FROM notb00006
WHERE salario_MEN_HASTA >= 1750
PROYECTO/nodir/busca1.sql
+5
View File
@@ -0,0 +1,5 @@
select salario_men_hasta
FROM notb00006
WHERE salario_men_desde <= 3000 and
salario_men_hasta >= 3000
PROYECTO/nodir/busca_b.sql
+7
View File
@@ -0,0 +1,7 @@
unload to balances.ld select num_emp,departamento,nivel_emp,cod_puesto,
cod_mov,sum(valor) from notb00008
where clase_mov not in ("I","E")
group by 1,2,3,4,5
having sum(valor) > 0
order by 1,5
PROYECTO/nodir/busca_i.sql
+3
View File
@@ -0,0 +1,3 @@
select num_nomi,sum(valor) from notb00008
where num_emp = 144 and clase_mov = "I" and num_nomi != 9806
group by 1
PROYECTO/nodir/busca_j1.sql
+11
View File
@@ -0,0 +1,11 @@
SELECT a.num_nomi,a.num_emp,b.apell1_emp,b.nom1_emp,b.cedula,b.serie,b.nomina
FROM notb00008 a, adtb00003 b
WHERE (a.num_nomi=a.num_nomi AND
a.tipo_emp = a.tipo_Emp AND
a.cod_mov IN(1,31) AND
a.departamento=a.departamento AND
a.num_emp = b.num_emp AND
a.num_emp = 330 AND
a.fecha BETWEEN '01011999' AND '12311999')
ORDER BY 7,1
PROYECTO/nodir/busca_s.sql
+5
View File
@@ -0,0 +1,5 @@
SELECT salario_sem_hasta
FROM notb00006
WHERE salario_men_desde <= 2700 and
salario_men_hasta >= 2700
PROYECTO/nodir/busca_ss.sql
+6
View File
@@ -0,0 +1,6 @@
select salario_sem_hasta,salario_men_hasta,porc_emp,
porc_pat
FROM notb00006
WHERE salario_men_hasta <= 1646.49
order by 1
PROYECTO/nodir/busca_u.sql
+15
View File
@@ -0,0 +1,15 @@
SELECT a.num_emp,a.cod_mov,b.clase_mov,a.cantidad,a.valor,b.cantidad_emp,cantidad_cia,
b.ch_encabeza
FROM notb00003 a,notb00002 b
WHERE
a.status_t is null and
a.cod_mov = b.cod_mov
UNION
SELECT a.num_emp,a.cod_mov,b.clase_mov,a.cantidad,a.valor,b.cantidad_emp,cantidad_cia,
b.ch_encabeza
FROM notb00007 a,notb00002 b
WHERE a.num_nomi = 9806 and
a.tipo_emp = "Q" and
a.status_t is null and
a.cod_mov = b.cod_mov
ORDER BY 1
PROYECTO/nodir/busqueda.txt
+230
View File
@@ -0,0 +1,230 @@
---------- ADPRMT001.4GL: 0
---------- ADPRMT003.4GL: 0
---------- ADPRMT022.4GL: 0
---------- ADPRRP033.4GL: 0
---------- ADPRRP036.4GL: 0
---------- ALEATORIO.4GL: 0
---------- AUMENTO.4GL: 0
---------- COPY OF NOPRMT008.4GL: 0
---------- CUMPLEANOS.4GL: 0
---------- CUMPLEANOS_1.4GL: 0
---------- NOCARNET.4GL: 0
---------- NODEPTORELACIONADOS.4GL: 0
---------- NOMN00000.4GL: 0
---------- NOMNCS000.4GL: 0
---------- NOMNCS001.4GL: 0
---------- NOMNMT000.4GL: 0
---------- NOMNRP000.4GL: 0
---------- NOMNRP001.4GL: 0
---------- NOMNRP002.4GL: 0
---------- NOPRCS001.4GL: 0
---------- NOPRCS002.4GL: 0
---------- NOPRCS003.4GL: 0
---------- NOPRCS004.4GL: 0
---------- NOPRCS005.4GL: 0
---------- NOPRCS006.4GL: 0
---------- NOPRCS007.4GL: 0
---------- NOPRCS008.4GL: 0
---------- NOPRFU000B.4GL: 0
---------- NOPRGB000.4GL: 0
---------- NOPRMT001.4GL: 0
---------- NOPRMT002.4GL: 0
---------- NOPRMT003.4GL: 2
---------- NOPRMT003_1.4GL: 0
---------- NOPRMT004.4GL: 0
---------- NOPRMT005.4GL: 0
---------- NOPRMT006.4GL: 0
---------- NOPRMT007.4GL: 0
---------- NOPRMT007_1.4GL: 0
---------- NOPRMT008 (COPY).4GL: 0
---------- NOPRMT008.4GL: 0
---------- NOPRMT008_1.4GL: 0
---------- NOPRMT008_2.4GL: 0
---------- NOPRMT009.4GL: 0
---------- NOPRMT010.4GL: 0
---------- NOPRMT011.4GL: 0
---------- NOPRMT012.4GL: 0
---------- NOPRMT013.4GL: 0
---------- NOPRMT014.4GL: 0
---------- NOPRMT015.4GL: 0
---------- NOPRMT016.4GL: 0
---------- NOPRMT017.4GL: 0
---------- NOPRMT018.4GL: 0
---------- NOPRMT019.4GL: 0
---------- NOPRMT020.4GL: 0
---------- NOPRMT021.4GL: 0
---------- NOPRMT022.4GL: 0
---------- NOPRMT023.4GL: 0
---------- NOPRMT024.4GL: 0
---------- NOPRMT025.4GL: 0
---------- NOPRMT026.4GL: 0
---------- NOPRMT026_2.4GL: 0
---------- NOPRMT027.4GL: 0
---------- NOPRMT028.4GL: 0
---------- NOPRMT029.4GL: 0
---------- NOPRMT030.4GL: 0
---------- NOPRMT038.4GL: 0
---------- NOPRRP001.4GL: 0
---------- NOPRRP001A.4GL: 0
---------- NOPRRP001_1.4GL: 0
---------- NOPRRP003.4GL: 0
---------- NOPRRP004.4GL: 0
---------- NOPRRP005.4GL: 0
---------- NOPRRP006.4GL: 0
---------- NOPRRP007.4GL: 0
---------- NOPRRP008.4GL: 0
---------- NOPRRP009.4GL: 0
---------- NOPRRP010.4GL: 0
---------- NOPRRP011.4GL: 0
---------- NOPRRP012.4GL: 0
---------- NOPRRP013.4GL: 0
---------- NOPRRP014.4GL: 0
---------- NOPRRP015.4GL: 0
---------- NOPRRP016.4GL: 0
---------- NOPRRP017.4GL: 0
---------- NOPRRP018.4GL: 0
---------- NOPRRP019.4GL: 0
---------- NOPRRP020.4GL: 0
---------- NOPRRP021.4GL: 0
---------- NOPRRP022.4GL: 0
---------- NOPRRP023.4GL: 0
---------- NOPRRP024.4GL: 0
---------- NOPRRP025.4GL: 0
---------- NOPRRP026.4GL: 0
---------- NOPRRP027.4GL: 0
---------- NOPRRP028.4GL: 0
---------- NOPRRP029.4GL: 0
---------- NOPRRP030.4GL: 0
---------- NOPRRP031.4GL: 0
---------- NOPRRP032.4GL: 0
---------- NOPRRP033.4GL: 0
---------- NOPRRP034.4GL: 0
---------- NOPRRP035.4GL: 0
---------- NOPRRP035_1.4GL: 0
---------- NOPRRP037.4GL: 0
---------- NOPRRP038.4GL: 0
---------- NOPRRP038_1.4GL: 0
---------- NOPRRP038_2.4GL: 0
---------- NOPRRP039.4GL: 0
---------- NOPRRP040.4GL: 0
---------- NOPRRP041.4GL: 0
---------- NOPRRP042.4GL: 0
---------- NOPRRP043.4GL: 0
---------- NOPRRP044.4GL: 0
---------- PANTALLA.4GL: 0
---------- SENDEMAIL.4GL: 0
PROYECTO/nodir/cambia
+6
View File
@@ -0,0 +1,6 @@
for i in `cat lista`
do
sed -e 's/"p_companias.nombre CLIPPED"/p_companias.nombre CLIPPED/g' < $i > /u/programas/nodir/tmp/$i
echo $i
done
PROYECTO/nodir/cc
+1694
View File
File diff suppressed because it is too large Load Diff
PROYECTO/nodir/copia.ld
+16
View File
@@ -0,0 +1,16 @@
1|3|0|0|3|RESINA||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:19|||
1|3|0|0|4|AUTOLUCIDANTE||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:25|||
1|3|0|0|5|RAIN||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:28|||
1|3|0|0|6|EXTRA M||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:29|||
1|3|0|0|7|EVER CLEAN||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:29|||
1|3|0|0|8|MONOCERAL||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:31|||
1|3|0|0|1|PRODUCTOS DE MANTENIMIENTOS||0||0|0.0|0.0|0||usacg01|1998-01-27 19:18|||
1|3|0|0|9|NETSAN||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:31|usacg01|1998-07-23 11:59|
1|3|0|0|17|DISCOS DIAMANTADOS 7"||UND||1|0.0|0.0|0||usacg01|1998-06-08 10:11|||
1|3|0|0|10|RESPLEND||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:32|||
1|3|0|0|11|IMPERSTON||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:33|||
1|3|0|0|12|UNIVERSAL SPRAY||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:33|||
1|3|0|0|13|PAGLIERINO||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:34|usacg01|1998-03-14 09:53|
1|3|0|0|14|NEUTREX||UND||1|0.0|0.0|0||usccg01|1998-03-11 15:35|||
1|3|0|0|15|LIJAS PARA PULIR 5"||UND||1|0.0|0.0|0||usacg01|1998-04-07 14:47|||
1|3|0|0|16|LIJAS PARA PULIR 7"||MT2||1|0.0|0.0|0||usacg01|1998-04-07 14:48|||
PROYECTO/nodir/cumpleanos.4gl
+72
View File
@@ -0,0 +1,72 @@
GLOBALS
DEFINE idx smallint
END GLOBALS
MAIN
DEFER INTERRUPT
CALL STARTLOG("cumpleano.txt")
CONNECT to "smarmotech" USER "conecta_mtech" USING "conecta"
CALL cumpleanos()
END MAIN
FUNCTION cumpleanos()
DEFINE rcumple RECORD
nombre VARCHAR(100),
departamento VARCHAR(100)
END RECORD,
archivo VARCHAR(20),
HANDLER om.SaxDocumentHandler
DECLARE busca_cumple CURSOR FOR
SELECT RTRIM(a.nom1_emp)||' '||a.apell1_emp,b.nom_dpto FROM adtb00003 a,adtb00001 b
WHERE a.departamento = b.departamento AND
DAY(a.fech_nac) = DAY(TODAY) AND
MONTH(a.fech_nac) = MONTH(TODAY) AND a.status_t IS NULL
# "file:///f:/master/IMAGENES/logo_cumple.png"
LET idx=1
LET archivo = 'cumpleanos.4rp'
FOREACH busca_cumple INTO rcumple.*
IF idx = 1 THEN
IF fgl_report_loadCurrentSettings(archivo) THEN -- load the .4rp file
CALL fgl_report_selectDevice("PDF")
CALL fgl_report_selectPreview(false)
CALL fgl_report_setOutputFileName("cumpleanos.pdf")
LET handler = fgl_report_commitCurrentSettings() -- commit changes
START REPORT r_cumple TO XML HANDLER HANDLER
ELSE
EXIT PROGRAM
END IF
END IF
OUTPUT TO REPORT r_cumple(rcumple.*)
LET idx = idx + 1
END FOREACH
IF idx > 1 THEN
FINISH REPORT r_cumple
END IF
END FUNCTION
REPORT r_cumple(x)
DEFINE X RECORD
nombre VARCHAR(100),
departamento VARCHAR(100)
END RECORD,
fecha VARCHAR(10),
chlable VARCHAR(100)
FORMAT
ON EVERY ROW
LET fecha = TODAY USING "dd/mm/yyyy"
LET chlable='CUMPLEAÑOS DEL DIA ',fecha
PRINTX x.*,idx,chlable
END REPORT
PROYECTO/nodir/cumpleanos1.4rp
+37
View File
@@ -0,0 +1,37 @@
<?xml version="1.0" encoding="UTF-8"?>
<report:Report xmlns:rtl="http://www.4js.com/2004/RTL" xmlns:report="http://www.4js.com/2007/REPORT" xmlns="http://www.4js.com/2004/PXML" version="3.01">
<report:Settings RWPageWidth="letterwidth" RWPageLength="letterlength" RWLeftMargin="0.5inch" RWTopMargin="0.5inch" RWRightMargin="0.5inch" RWBottomMargin="0.5inch">
<report:FormatList>
<report:Format-SVG/>
<report:Format-PDF/>
<report:Format-image/>
</report:FormatList>
</report:Settings>
<report:Data RWDataLocation="cumpleanos.rdd" RWFglReportName="r_email"/>
<rtl:stylesheet>
<PXML>
<rtl:match nameConstraint="Report">
<MINIPAGE name="Page Root" width="max" length="max">
<LAYOUTNODE name="Page Header" width="max" length="min" port="anyPageHeader">
<MINIPAGE name="StripeLayouter3" width="min" length="max" layoutDirection="leftToRight">
<IMAGEBOX name="ImageBox" floatingBehavior="enclosed" url="{{&quot;file:///f:/master/IMAGENES/logo_cumple.png&quot;}}" intendedResolution="120"/>
<WORDBOX name="WordBox1" width="15cm" color="#af1f59" fontSize="14" fontBold="true" floatingBehavior="enclosed" textAlignment="center" text="CUMPLEAÑOS DEL DIA"/>
</MINIPAGE>
<MINIPAGE name="Table Header" width="min" length="max" layoutDirection="leftToRight">
<WORDBOX name="Spacer" alignment="baseline" baselineType="leftleft" port="itemSeparator" text=" "/>
</MINIPAGE>
<MINIPAGE name="Separator" width="1" length="max" bgColor="#000000" layoutDirection="leftToRight"/>
</LAYOUTNODE>
<rtl:match nameConstraint="OnEveryRow" minOccurs="0" maxOccurs="unbounded">
<LAYOUTNODE name="LayoutNode" width="min" length="min" layoutDirection="leftToRight" floatingBehavior="enclosed">
<rtl:input-variable name="X.nombre" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="X.nombre Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{X.nombre}}"/>
<rtl:input-variable name="X.departamento" type="FGLString" expectedLocation="expectedHere"/>
<WORDWRAPBOX name="X.departamento Value" width="width(&quot;M&quot;)*20" floatingBehavior="enclosed" text="{{X.departamento}}"/>
</LAYOUTNODE>
</rtl:match>
</MINIPAGE>
</rtl:match>
</PXML>
</rtl:stylesheet>
</report:Report>
PROYECTO/nodir/cumpleanos_1.4gl
+112
View File
@@ -0,0 +1,112 @@
{
PROGRAMA : CUMPLEANOS_1
OBJETIVO : LISTAR LOS EMPLEADOS QUE ESTAN DE CUMPLEANOS EN EL MES
DESARROLLADO POR : ING. JUAN SOTO
FECHA : ABRIL 20, 2018
}
GLOBALS
DEFINE idx,mes smallint,
usuario,clave STRING,
nombre_file,fecha CHAR(30),
xusername,xsmtphost,xsmtpport,xpassword,vendedorEmail,subject,cuerpo_correo,attachment,rutafile STRING
END GLOBALS
MAIN
DEFER INTERRUPT
CALL STARTLOG("cumpleano.txt")
CALL ARG_VAL(1) RETURNING usuario
CALL ARG_VAL(2) RETURNING clave
CALL ARG_VAL(3) RETURNING vendedorEmail
IF vendedorEmail IS NULL THEN
DISPLAY "NO SE HA ESPECIFICADO EL EMAIL DESTINO"
EXIT PROGRAM
END IF
CONNECT to "smarmotech" USER usuario USING clave
CALL cumpleanos()
END MAIN
FUNCTION cumpleanos()
DEFINE rcumple RECORD
nombre VARCHAR(100),
departamento VARCHAR(100),
dia SMALLINT
END RECORD,
archivo VARCHAR(20),
HANDLER om.SaxDocumentHandler
LET mes = MONTH(TODAY) +1
IF mes = 13 THEN LET mes = 1 END IF
SELECT a.descrip INTO fecha FROM mestable a WHERE a.mes = mes
DECLARE busca_cumple CURSOR FOR
SELECT RTRIM(a.nom1_emp)||' '||a.apell1_emp,b.nom_dpto,DAY(a.fech_nac) FROM adtb00003 a,adtb00001 b
WHERE a.departamento = b.departamento AND
# DAY(a.fech_nac) = DAY(TODAY) AND
MONTH(a.fech_nac) = mes AND a.status_t IS NULL
# "file:///f:/master/IMAGENES/logo_cumple.png"
LET idx=1
LET archivo = 'cumpleanos_1.4rp'
LET attachment=NULL
LET rutafile ='.\\FILES\\'
FOREACH busca_cumple INTO rcumple.*
IF idx = 1 THEN
IF fgl_report_loadCurrentSettings(archivo) THEN -- load the .4rp file
CALL fgl_report_selectDevice("XLSX")
CALL fgl_report_selectPreview(FALSE)
LET attachment = rutafile CLIPPED,'cumpleanos_mes1.xlsx'
CALL fgl_report_setOutputFileName(attachment)
LET handler = fgl_report_commitCurrentSettings() -- commit changes
START REPORT r_cumple_mes TO XML HANDLER HANDLER
ELSE
EXIT PROGRAM
END IF
END IF
OUTPUT TO REPORT r_cumple_mes(rcumple.*)
LET idx = idx + 1
END FOREACH
IF idx > 1 THEN
FINISH REPORT r_cumple_mes
LET xusername ='notificacion@marmotech.com.do'
LET xsmtphost ='smtp.office365.com'
LET xsmtpport = '587'
LET xpassword = 'Lmmjvsd2020'
# LET vendedorEmail = 'jsoto@marmotech.com.do'
LET subject ='CUMPLEANOS PARA EL MES DE ',fecha
LET cuerpo_correo = 'FAVOR DE VERIFICADR EL ATTACHMENT'
CALL enviaemail(vendedorEmail,subject,cuerpo_correo,attachment,xusername,xsmtphost,xsmtpport,xpassword)
END IF
END FUNCTION
REPORT r_cumple_mes(x)
DEFINE X RECORD
nombre VARCHAR(100),
departamento VARCHAR(100),
dia SMALLINT
END RECORD,
chlable VARCHAR(100)
FORMAT
ON EVERY ROW
# LET fecha = MONTH(today)
LET chlable='CUMPLEANOS DEL MES DE ',fecha
PRINTX x.*,idx,chlable
END REPORT
PROYECTO/nodir/datos_nomi.ld
+10
View File
@@ -0,0 +1,10 @@
||144||||||||||||||
1726|Q|230|5000|12|0||||600.0|F||informix|1998-03-28 17:15|||
680|Q||||||||10000.0|F||informix|1998-03-28 17:40|||
|Q|680|4101|31|0||||10000.0|F||informix|1998-03-28 17:51|||
|Q||||||||3150.0|F||usacg01|1998-06-18 11:29|||
|Q||||||||513.54|F||usacg01|1998-09-29 12:43|||
|Q||||||||2000.0|F||usacg01|1998-10-14 09:07|||
||||||||||F||usacg01|1998-10-28 07:28|||
|Q||||||||1000.0|F||usacg01|1998-10-28 07:54|||
|Q||||||||220.65|F||usacg01|1998-10-28 07:58|||
PROYECTO/nodir/duplicados.sql
+12
View File
@@ -0,0 +1,12 @@
SELECT a.sexo FROM adtb00021 a
WHERE a.num_emp = 752
;
SELECT nom_dpto FROM adtb00001
WHERE departamento = 601
;
SELECT nom_puesto FROM adtb00004
WHERE cod_puesto = 21
delete from adtb00021 where sexo is null
select *from adtb00003 where num_emp = 752
PROYECTO/nodir/encab
+29
View File
@@ -0,0 +1,29 @@
LET l = (171 - LENGTH(varia))/2
LET l = (120 - LENGTH(p_companias.nombre CLIPPED))/2
## AQUI SE INDICA LA IMPRESION DE LOS ENCABEZADOS
PRINT COLUMN 1, doce,comp_on,
COLUMN 2, "Nomina No.:",
COLUMN 15, no_nomina,
COLUMN 31, doble_on,
COLUMN l, p_companias.nombre CLIPPED,doble_off clipped,
COLUMN 104," Pag. ",pageno using "###"
LET l = (132 - LENGTH("Nomina Empleados "))/2
PRINT COLUMN 2, "noprrp001",
COLUMN l, "Nomina Empleados ",
COLUMN L, varia ,
COLUMN 145, today using "dd/mm/yy"
LET l = (132 - LENGTH("Nomina Regular del "))/2
PRINT COLUMN l, "Nomina Regular del ",
COLUMN 62, DAY(fecha1) using "&&",
COLUMN 66, " de ",
COLUMN 70, nombre clipped,
COLUMN 83, " Al ",
COLUMN 87, DAY(fecha2) using "&&"," ",
COLUMN 91, nombre2 clipped,
COLUMN 103, " de ",
COLUMN 107, YEAR(fecha2) using "####",
COLUMN 145, time
SKIP 1 LINE
PROYECTO/nodir/inserta.sql
+2
View File
@@ -0,0 +1,2 @@
load from balances.ld insert into notb00008(num_emp,departamento,
nivel_emp,cod_puesto,cod_mov,valor)
PROYECTO/nodir/jh
+330
View File
@@ -0,0 +1,330 @@

09-01-99 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 1998
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
VELOZ FAVIO 63336-002 39,900.00 2,020.83 41,920.83 0.00 9,072.00 0.00 0.00 9,072.00
RANCIER JUDELKA 10099516-006 52,500.00 0.00 52,500.00 0.00 9,072.00 0.00 0.00 9,072.00
BAEZ SANDRA 130024135-001 28,000.00 0.00 28,000.00 0.00 9,072.00 0.00 0.00 9,072.00
VILLAR THOMAS 66812-002 25,410.00 1,128.11 26,538.11 0.00 9,072.00 0.00 0.00 9,072.00
MERCEDES TORIBIO 120020-001 29,400.00 1,263.58 30,663.58 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO WILSON 12329-002 34,650.00 1,151.16 35,801.16 0.00 9,072.00 0.00 0.00 9,072.00
PUELLO SERGIO 12329-002 25,410.00 1,031.94 26,441.94 0.00 9,072.00 0.00 0.00 9,072.00
DE LA CRUZ JUAN 2583-002 25,410.00 558.60 25,968.60 0.00 9,072.00 0.00 0.00 9,072.00
SUBERO JORGE 4866-012 260,000.00 0.00 260,000.00 176,000.00 14,032.00 1,491.16 0.00 12,540.84
ARIAS MARCIAL 44992- 31,500.00 904.52 32,404.52 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO ANDRES 322878-002 28,000.00 0.00 28,000.00 0.00 9,072.00 0.00 0.00 9,072.00
CORPORAN MARCIAL 20031973-009 29,250.00 0.00 29,250.00 0.00 9,072.00 0.00 0.00 9,072.00
PAULINO JOSE 10453581-000 28,196.22 0.00 28,196.22 0.00 9,072.00 0.00 0.00 9,072.00
CORPORAN DAMIAN 59262-002 32,400.00 2,530.95 34,930.95 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO FELLIPE 32236-002 27,300.00 1,423.92 28,723.92 0.00 9,072.00 0.00 0.00 9,072.00
MARTE JUAN 55747-002 27,300.00 1,351.62 28,651.62 0.00 9,072.00 0.00 0.00 9,072.00
CASADO RAMON 64854-013 50,500.00 0.00 50,500.00 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO MARIO 55747-002 32,550.00 1,369.89 33,919.89 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO APOLINAR 32230-002 27,300.00 136.40 27,436.40 0.00 9,072.00 0.00 0.00 9,072.00
MUMOZ ROLANDO 826759-001 214,800.00 0.00 214,800.00 130,800.00 6,012.00 676.16 0.00 6,688.16
CASTILLO RUFINO 40632-002 47,250.00 2,434.34 49,684.34 0.00 9,072.00 0.00 0.00 9,072.00
ADAMES MAXIMO 32177-002 21,780.00 1,165.53 22,945.53 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO VIRGILIO 42621-002 47,250.00 2,561.78 49,811.78 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO MARCO 109200-002 25,410.00 800.07 26,210.07 0.00 9,072.00 0.00 0.00 9,072.00
CANDELARIO TEODORO 311135-002 22,500.00 1,600.14 24,100.14 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO PRIMITIVO 32248-002 14,520.00 0.00 14,520.00 0.00 9,072.00 0.00 0.00 9,072.00
DE LOS SANTOS RAFAEL 747093-001 60,250.00 750.10 61,000.10 0.00 9,072.00 0.00 0.00 9,072.00
MARMOLEJOS ISIDRO 7808-087 27,300.00 0.00 27,300.00 0.00 9,072.00 0.00 0.00 9,072.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,316,036.22 24,183.48 1,340,219.70 306,800.00 255,916.00 815.00 0.00 255,101.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

09-01-99 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 1998
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
MARINEZ ALFREDO 32063-013 20,250.00 248.56 20,498.56 0.00 9,072.00 0.00 0.00 9,072.00
MONTERO JUSTO 97759-001 51,000.00 0.00 51,000.00 0.00 9,072.00 0.00 0.00 9,072.00
ISA ALTAGRACIA 65034-001 75,000.00 0.00 75,000.00 0.00 9,072.00 117.82 0.00 8,954.18
RAMIREZ JUAN 107813-002 23,396.30 255.06 23,651.36 0.00 9,072.00 0.00 0.00 9,072.00
LARA SANTOS 77078-002 1,350.00 0.00 1,350.00 0.00 9,072.00 0.00 0.00 9,072.00
ROMERO TIRSO 72263-002 25,410.00 563.40 25,973.40 0.00 9,072.00 0.00 0.00 9,072.00
MATOS JULIA 832413-001 8,750.00 0.00 8,750.00 0.00 9,072.00 0.00 0.00 9,072.00
MENDEZ NORIS 50003-054 26,250.00 0.00 26,250.00 0.00 9,072.00 0.00 0.00 9,072.00
SUBERO FERNANDO 130033635-009 11,250.00 0.00 11,250.00 0.00 9,072.00 0.00 0.00 9,072.00
VERAS FRANCIS 72263-001 9,750.00 0.00 9,750.00 0.00 9,072.00 0.00 0.00 9,072.00
FERNANDEZ JESUS 481741-001 26,400.00 0.00 26,400.00 0.00 9,072.00 0.00 0.00 9,072.00
BONIFACIO JOSE 76576-001 25,410.00 0.00 25,410.00 0.00 9,072.00 0.00 0.00 9,072.00
CARDERON FRANCISCO 100524-002 25,410.00 707.43 26,117.43 0.00 9,072.00 0.00 0.00 9,072.00
MEJIA ALADINO 3972-002 26,250.00 667.32 26,917.32 0.00 9,072.00 0.00 0.00 9,072.00
ARIAS ANGEL 19028-013 30,450.00 0.00 30,450.00 0.00 9,072.00 0.00 0.00 9,072.00
DE LOS SANTOS RAFAEL 2039645-005 11,905.74 0.00 11,905.74 0.00 9,072.00 0.00 0.00 9,072.00
BAUTISTA DAVID 104806-002 29,000.00 1,425.10 30,425.10 0.00 9,072.00 0.00 0.00 9,072.00
MALONE MODESTO 2682861-001 170,500.00 0.00 170,500.00 86,500.00 9,072.00 485.08 0.00 8,586.92
DE LA ROSA JUAN 104008972-007 29,400.00 1,624.11 31,024.11 0.00 9,072.00 0.00 0.00 9,072.00
VALDEZ JUAN 66395-002 34,650.00 1,583.39 36,233.39 0.00 9,072.00 0.00 0.00 9,072.00
HERNANDEZ JUAN 66395-003 27,300.00 1,801.66 29,101.66 0.00 9,072.00 0.00 0.00 9,072.00
ARIAS SANTIAGO 63044-002 25,410.00 391.47 25,801.47 0.00 9,072.00 0.00 0.00 9,072.00
PINALES MELVIN 27361-002 22,990.00 0.00 22,990.00 0.00 9,072.00 0.00 0.00 9,072.00
DE LA ROSA JOSE 111-001 6,050.00 670.02 6,720.02 0.00 9,072.00 0.00 0.00 9,072.00
SANTANA ALEXIS 104806-002 18,150.00 154.17 18,304.17 0.00 9,072.00 0.00 0.00 9,072.00
MARTE DOMINGO 5123-095 28,000.00 623.00 28,623.00 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO LUIS 2784-013 33,600.00 0.00 33,600.00 0.00 9,072.00 0.00 0.00 9,072.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 823,282.04 10,714.69 833,996.73 86,500.00 244,944.00 602.90 0.00 244,341.10
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

09-01-99 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 1998
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
HERRERAS MARIANO 31899-003 26,250.00 1,419.84 27,669.84 0.00 9,072.00 0.00 0.00 9,072.00
SOLANO CARLO 19305-013 25,410.00 1,157.32 26,567.32 0.00 9,072.00 0.00 0.00 9,072.00
MINAYA VENTURA 2485-002 25,410.00 1,270.87 26,680.87 0.00 9,072.00 0.00 0.00 9,072.00
BELTRE OSCAR 24638-013 25,000.00 0.00 25,000.00 0.00 9,072.00 0.00 0.00 9,072.00
HERNANDEZ RAFAEL 66397-002 25,000.00 0.00 25,000.00 0.00 9,072.00 0.00 0.00 9,072.00
SEPULVEDA RAMON 106264-002 27,720.00 93.50 27,813.50 0.00 9,072.00 0.00 0.00 9,072.00
RAMIREZ GUILLERMO 45106-013 33,600.00 1,144.36 34,744.36 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO ROGELIO - 21,780.00 1,445.97 23,225.97 0.00 9,072.00 0.00 0.00 9,072.00
RUIZ RAFAEL - 27,300.00 694.89 27,994.89 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO TEOFILO - 26,000.00 1,325.01 27,325.01 0.00 9,072.00 0.00 0.00 9,072.00
FERRERAS CARMEN 158154-001 277,200.00 0.00 277,200.00 193,200.00 17,472.00 277.28 0.00 17,194.72
RODRIGUEZ LETICIA - 42,000.00 0.00 42,000.00 0.00 9,072.00 0.00 0.00 9,072.00
MATEO JENNY 64449-002 48,000.00 0.00 48,000.00 0.00 9,072.00 0.00 0.00 9,072.00
GENAO JUSTO ODAMIS 17063-001 2,500.00 0.00 2,500.00 0.00 9,072.00 0.00 0.00 9,072.00
PINALES LOURDES 16843-002 110,000.00 0.00 110,000.00 26,000.00 9,072.00 246.66 0.00 8,825.34
SUBERO CESAR - 52,500.00 0.00 52,500.00 0.00 9,072.00 0.00 0.00 9,072.00
PUJOLS RAMON 2426-013 63,000.00 0.00 63,000.00 0.00 9,072.00 0.00 0.00 9,072.00
CALDERON ANGEL 104003535-007 10,890.00 0.00 10,890.00 0.00 9,072.00 0.00 0.00 9,072.00
ARAMBOLES JUAN - 60,000.00 0.00 60,000.00 0.00 9,072.00 2,301.41 0.00 11,373.41
DIAZ LUIS - 25,410.00 1,077.36 26,487.36 0.00 9,072.00 0.00 0.00 9,072.00
DEL ROSARIO DANIEL 20031746-009 11,014.69 0.00 11,014.69 0.00 9,072.00 0.00 0.00 9,072.00
CANELO GABINO 71757-002 24,200.00 621.78 24,821.78 0.00 9,072.00 0.00 0.00 9,072.00
CASTILLO CARMELO - 25,410.00 850.20 26,260.20 0.00 9,072.00 0.00 0.00 9,072.00
MEJIA JUAN 79342-002 6,050.00 171.30 6,221.30 0.00 9,072.00 0.00 0.00 9,072.00
ANDUJAR LUIS 18995-012 25,410.00 154.17 25,564.17 0.00 9,072.00 0.00 0.00 9,072.00
SAMBOY RAFAEL 17707-004 47,250.00 318.60 47,568.60 0.00 9,072.00 0.00 0.00 9,072.00
FELIX EFRAIN 20088906-001 17,600.00 0.00 17,600.00 0.00 9,072.00 0.00 0.00 9,072.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 1,111,904.69 11,745.17 1,123,649.86 219,200.00 253,344.00 1,777.47 0.00 255,121.47
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

09-01-99 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 1998
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
MUNOZ DOMINGO 1435194-001 2,420.00 0.00 2,420.00 0.00 9,072.00 0.00 0.00 9,072.00
PEREZ DANIEL 20079375-000 19,360.00 0.00 19,360.00 0.00 9,072.00 0.00 0.00 9,072.00
PUENTE GABRIEL - 22,990.00 867.96 23,857.96 0.00 9,072.00 0.00 0.00 9,072.00
MATA JORGE 92718-004 20,570.00 888.24 21,458.24 0.00 9,072.00 0.00 0.00 9,072.00
FERANDEZ CARLOS 1223922-002 24,200.00 1,311.45 25,511.45 0.00 9,072.00 0.00 0.00 9,072.00
CARMONA ELEUTERIO 35588-002 24,200.00 682.68 24,882.68 0.00 9,072.00 0.00 0.00 9,072.00
SIERRA JUAN 105018-002 25,410.00 678.90 26,088.90 0.00 9,072.00 0.00 0.00 9,072.00
LARA ELAINE 755774-003 87,308.50 0.00 87,308.50 3,308.50 9,072.00 0.00 0.00 9,072.00
JIMENEZ JOSE 91360-002 21,027.08 0.00 21,027.08 0.00 9,072.00 0.00 0.00 9,072.00
GOMEZ LORENZO 34800-006 15,000.00 2,863.68 17,863.68 0.00 9,072.00 0.00 0.00 9,072.00
MATOS LEONARDO 9319170-008 9,301.15 391.86 9,693.01 0.00 9,072.00 0.00 0.00 9,072.00
BRITO MARINO 104003901-001 12,620.57 0.00 12,620.57 0.00 9,072.00 0.00 0.00 9,072.00
DE LOS SANTOS TEODORO 20031765-009 19,880.57 0.00 19,880.57 0.00 9,072.00 0.00 0.00 9,072.00
TAVERAS JOSE 20072329-004 19,880.57 0.00 19,880.57 0.00 9,072.00 0.00 0.00 9,072.00
===================================================================================================================================================================================================================================
TOTAL PAGINA --> 324,168.44 7,684.77 331,853.21 3,308.50 127,008.00 0.00 0.00 127,008.00
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

09-01-99 noprrp014
 IR-13 DECLARACION JURADA ANUAL DEL AGENTE DE RETENCION DE ASALARIADOS
 DATOS GENERALES DEL AGENTE DE RETENCION ANO FISCAL 1998
===================================================================================================================================================================================================================================
RAZON SOCIAL  M A R M O T E C H, S. A. RNC  101-52126-2
DIRECCION  C/CENTRAL, MADRE VIEJA NORTE, S. C. MUNICIPIO
PROVINCIA  SAN CRISTOBAL TELEFONO No.  (809) 528-0650 FAX No.  (809) 528-0640
===================================================================================================================================================================================================================================
 DATOS DE LOS ASALARIADOS
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTAL DE TOTAL SUELDOS Y IMPUESTO IMPUESTO SALDO A DIFERENCIA
APELLIDOS CEDULA O SALARIOS OTRAS PAGADO OTROS PAGOS LIQUIDADO RETENIDO Y FAVOR DEL A
Y NOMBRES PASAPORTE PAGADOS REMUNERACIONES EN EL ANO SUJETOS A PAGADO EMPLEADO PAGAR
EN EL ANO RETENCION
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
A B C D E F G H I J
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
TOTALES RD$ ==> 3,575,391.39 54,328.11 3,629,719.50 615,808.50 881,212.00 359.57 0.00 881,571.57
===================================================================================================================================================================================================================================
 RESUMEN PARA EL PAGO
------------------------------------- Yo_______________________________________________________________________________________________________ _______________________________________________________________________
| NUMERO DE | 96 | en calidad de Agente de Retencion, por la presente declaro bajo juramento que los datos consignados en la | IMPUESTO A PAGAR | |
| ASALARIADOS | | presente declaracion son correctos y completos y que no he omitido dato alguno que la misma deba contener |---------------------------------------|-----------------------------|
|---------------------|-------------| siendo en consecuencia todo su contenido la fiel expresion de la verdad. | RECARGOS ART.252 ( )% | |
| NUMERO DE | | |---------------------------------------|-----------------------------|
| ASALARIADOS | 6 | | INTERES INDENNIZATORIO ART.27 ( )% | |
| SUJETOS A RETENCION | | _____________________________________________ _____________________________________________ |---------------------------------------|-----------------------------|
------------------------------------- Nombres y Apellidos del Representante Firma | TOTAL A PAGAR RD$ | |
-----------------------------------------------------------------------
(COLOQUE EL SELLO DE LA EMPRESA)
PROYECTO/nodir/lista
+34
View File
@@ -0,0 +1,34 @@
noprrp001.4gl
noprrp003.4gl
noprrp004.4gl
noprrp005.4gl
noprrp006.4gl
noprrp007.4gl
noprrp008.4gl
noprrp009.4gl
noprrp010.4gl
noprrp011.4gl
noprrp012.4gl
noprrp013.4gl
noprrp014.4gl
noprrp015.4gl
noprrp016.4gl
noprrp017.4gl
noprrp018.4gl
noprrp019.4gl
noprrp020.4gl
noprrp021.4gl
noprrp022.4gl
noprrp023.4gl
noprrp024.4gl
noprrp025.4gl
noprrp026.4gl
noprrp027.4gl
noprrp028.4gl
noprrp029.4gl
noprrp030.4gl
noprrp031.4gl
noprrp032.4gl
noprrp033.4gl
noprrp034.4gl
noprrp035.4gl
PROYECTO/nodir/nocarnet.4gl
+92
View File
@@ -0,0 +1,92 @@
GLOBALS
"noprgb000.4gl"
DEFINE direccion_suc,telefono_suc VARCHAR(100),
provincia VARCHAR(60),
xpais CHAR(10)
FUNCTION cardnet(xnumemp)
DEFINE tmpfile STRING,
foto BYTE,
xnumemp INT
LET direccion_suc = NULL
LET telefono_suc = NULL
LOCATE foto IN MEMORY
LET selec = "SELECT
a.nom1_emp,
a.apell1_emp,
a.num_emp,
a.cedula,
b.nom_puesto,
a.foto_empleado,
c.direccion,
c.telefono,
e.abreviatura,
f.nombre_provincia
FROM adtb00003 a
LEFT JOIN adtb00004 b ON a.cod_puesto = b.cod_puesto
LEFT JOIN sucursales c ON c.sucid = a.sucid
LEFT JOIN vetb00017 e ON e.codigo = c.pais
LEFT JOIN vetb00020 f ON f.cod_provincia = c.cod_provincia
WHERE a.num_emp = ",xnumemp USING "<<<<<",
" AND a.status_t IS NULL"
PREPARE bcarnet FROM selec
EXECUTE bcarnet INTO datos_cheque.nom1_emp,
datos_cheque.apell1_emp ,
datos_cheque.num_emp,
datos_cheque.cedula,
puesto.nom_puesto ,
foto ,
direccion_suc ,
p_Companias.telefono ,
xpais ,provincia
LET r_filename = 'noprrp044.4rp'
LET tmpfile = '.\\TMP\\tmpfoto.jpg'
IF fgl_report_loadCurrentSettings(r_filename) THEN -- load the .4rp file
LET preview=1
LET r_output = 'SVG'
CALL fgl_report_selectDevice(r_output) -- changing default
CALL fgl_report_selectPreview(preview) -- changing default
CALL fgl_report_setPrinterSides("two-sided-short-edge")
LET handler = fgl_report_commitCurrentSettings() -- commit changes
END IF
IF handler IS NOT NULL THEN -- report engine was configured ok
START REPORT reporte TO XML HANDLER handler
END IF
IF foto IS NOT NULL THEN
CALL foto.writeFile(tmpfile)
ELSE
LET tmpfile='.\\TMP\\fotodefault.jpg'
END IF
OUTPUT TO REPORT reporte(tmpfile)
FINISH REPORT reporte
END FUNCTION
REPORT reporte(xtmpfile)
DEFINE xtmpfile STRING
FORMAT
ON EVERY ROW
#DISPLAY "ubicacion ",ubicacionhtml
IF direccion_suc IS NOT NULL THEN
LET p_companias.direccion = direccion_suc
ELSE
SELECT c.direccion,c.telefono
INTO direccion_suc,p_companias.telefono
FROM sucursales c WHERE sucid = 1
END IF
PRINTX datos_cheque.nom1_emp,datos_cheque.apell1_emp,datos_cheque.num_emp,
direccion_suc,p_Companias.telefono,datos_cheque.cedula,
puesto.nom_puesto,xtmpfile,
xpais,provincia
END REPORT
PROYECTO/nodir/nocs.bat
+12
View File
@@ -0,0 +1,12 @@
fgl2p noprcs001.4gl
fgl2p noprcs002.4gl
fgl2p noprcs003.4gl
fgl2p noprcs004.4gl
fgl2p noprcs005.4gl
fgl2p noprcs006.4gl
fgl2p noprcs007.4gl
fgl2p noprcs008.4gl
fgl2p nomncs000.4gl
fgl2p nomncs001.4gl
fgl2p -o nomncs000.42r nomncs000.42m msg.42m seg000.42m noprcs001.42m noprcs002.42m noprcs003.42m noprcs004.42m noprcs005.42m noprcs006.42m noprcs007.42m nomncs001.42m noprcs008.42m
PROYECTO/nodir/nodeptorelacionados.4gl
+17
View File
@@ -0,0 +1,17 @@
FUNCTION deptorelacionado()
DEFINE pdepartamento SMALLINT,pdescripcion CHAR(30),
kdepto ui.ComboBox
LET kdepto = ui.ComboBox.forName("formonly.departamento_relaciona")
CALL kdepto.clear()
DECLARE busca_dpto CURSOR FOR
SELECT a.departamento,a.nom_dpto FROM adtb00001 a
WHERE a.status_t IS NULL
ORDER BY a.nom_dpto
FOREACH busca_dpto INTO pdepartamento,pdescripcion
CALL kdepto.additem(pdepartamento,pdescripcion)
END FOREACH
END FUNCTION
PROYECTO/nodir/nofm.bat
+66
View File
@@ -0,0 +1,66 @@
fglform nofmcs001.per
fglform nofmcs002.per
fglform nofmcs003.per
fglform nofmcs004.per
fglform nofmcs005.per
fglform nofmcs006.per
fglform nofmcs007.per
fglform nofmcs008.per
fglform nofmm1008.per
fglform nofmmt001.per
fglform nofmmt002.per
fglform nofmmt003.per
fglform nofmmt005.per
fglform nofmmt006.per
fglform nofmmt007.per
fglform nofmmt008.per
fglform nofmmt009.per
fglform nofmmt010.per
fglform nofmmt011.per
fglform nofmmt012.per
fglform nofmmt013.per
fglform nofmmt014.per
fglform nofmmt015.per
fglform nofmmt016.per
fglform nofmmt017.per
fglform nofmmt018.per
fglform nofmmt019.per
fglform nofmmt020.per
fglform nofmmt021.per
fglform nofmmt022.per
fglform nofmmt023.per
fglform nofmmt024.per
fglform nofmmt034.per
fglform nofmmt108.per
fglform nofmrp001.per
fglform nofmrp003.per
fglform nofmrp004.per
fglform nofmrp005.per
fglform nofmrp006.per
fglform nofmrp007.per
fglform nofmrp008.per
fglform nofmrp009.per
fglform nofmrp010.per
fglform nofmrp011.per
fglform nofmrp012.per
fglform nofmrp013.per
fglform nofmrp014.per
fglform nofmrp015.per
fglform nofmrp017.per
fglform nofmrp018.per
fglform nofmrp019.per
fglform nofmrp020.per
fglform nofmrp021.per
fglform nofmrp022.per
fglform nofmrp024.per
fglform nofmrp025.per
fglform nofmrp026.per
fglform nofmrp027.per
fglform nofmrp028.per
fglform nofmrp030.per
fglform nofmrp031.per
fglform nofmrp032.per
fglform nofmrp033.per
fglform nofmrp034.per
fglform nofmrp035.per
fglform nofmwd001.per
PROYECTO/nodir/nofm.per
+21
View File
@@ -0,0 +1,21 @@
database marmotech
screen size 24 by 80
{
num_emp [f001 ] [b ][c ]
departamento [f002 ] [a ]
fecha [f005 ]
cod_mov [f006 ]
valor [f008 ]
}
end
tables
notb00008,adtb00001,adtb00003
attributes
f001 = notb00008.num_emp,lookup b=adtb00003.nom1_emp,c= adtb00003.apell1_emp
joining adtb00003.num_emp;
f002 = notb00008.departamento, lookup a=adtb00001.nom_dpto joining
adtb00001.departamento;
f005 = notb00008.fecha;
f006 = notb00008.cod_mov;
f008 = notb00008.valor;
end
PROYECTO/nodir/nofmcs001.per
+50
View File
@@ -0,0 +1,50 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS001
OBJETIVO : Pantalla que consulta los movimientos de la nomina
totalizados
Es utilizada por: NOFMCS001
PROGRAMADOR : Ing. Juan Soto
FECHA REALIZACION : Diciembre 16, 1993
------------------------------------------------------------------------
}
schema smarmotech
screen size 24 by 80
{
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
\g--------------------------------------------------------------------------
Movimiento Cantidad Valor
\g--------------------------------------------------------------------------
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
No Movimientos: [k2 ] Neto: [k1 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
f4 = notb00008.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
b = notb00002.descrip_mov,noentry;
f005 = notb00008.cantidad,noentry;
f006 = notb00008.valor,noentry;
k1 = formonly.c_neto;
k2 = formonly.idx_n;
instructions
screen record consart[10] (cod_mov,descrip_mov,cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmcs002.per
+59
View File
@@ -0,0 +1,59 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS002
OBJETIVO : Pantalla que consulta los ingresos que tienen los
empleados
Es utilizada por: NOFMCS002
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Septiembre 01, 1993
------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
Codigo Empleado[f000][f001][f2][f3][a ]
\g--------------------------------------------------------------------------
Movimiento Cantidad Valor
\g--------------------------------------------------------------------------
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
Monto Pagado [f7 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
f000 = adtb00003.num_emp,autonext,
comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
f001 = adtb00003.departamento,autonext,
comments = "Digite el departamento del empleado";
f2 = adtb00003.nivel_emp,noentry;
f3 = adtb00003.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f4 = notb00008.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
b = notb00002.descrip_mov,noentry;
f005 = notb00008.cantidad,noentry;
f006 = notb00008.valor,noentry;
j = notb00008.status_t,noentry;
f007 = notb00008.us_crea,noentry;
f008 = notb00008.fech_crea,noentry;
f009 = notb00008.us_mod,noentry;
f010 = notb00008.fech_mod,noentry;
f7 = formonly.monto,noentry;
instructions
screen record consart[4] (cod_mov,descrip_mov,cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmcs003.per
+43
View File
@@ -0,0 +1,43 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS003
OBJETIVO : Pantalla para desplegar informacion referente a los
cheques emitidos a travez de la nomina.
PROGRAMA Q. LO USA: NOPRCS003
PROGRAMADOR : Tadeo A. Ferreras F.
FECHA REALIZACION : Agosto 23, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Numero de la Nomina [nom ] Tipo de Nomina [t]
\g---------------------------------------------------------------------\g
Cheque No. Empleado Monto Cheque
\g---------------------------------------------------------------------\g
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
[f000 ] [f001] [f005 ][f006 ] [valor ]
}
end
tables
notb00009
attributes
nom = formonly.numero_nom type integer,comments =
"Digite el numero de la nomina a que se aplicaron los cheques";
t = formonly.tipo_emp,upshift;
f000 = notb00009.cheque_no;
f001 = notb00009.num_emp;
f005 = formonly.nombre type char,noentry;
f006 = formonly.apellido type char,noentry;
valor= notb00009.monto,noentry;
instructions
screen record cheque1[8] (cheque_no,num_emp,nombre,apellido,monto)
delimiters " "
end
PROYECTO/nodir/nofmcs004.4fd
+54
View File
@@ -0,0 +1,54 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="31408" name="ManagedForm" uid="{8d01960a-aaab-47bd-82a5-c54b382026c6}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{76fad15b-32dd-44a6-ae02-81ca2dcd24db}" where="">
<RecordField colName="num_emp" fieldIdRef="0" name="num_emp" sqlTabName="formonly" sqlType="INTEGER" table_alias_name="" uid="{d3d5a20e-b53c-44cd-8a50-f1cfc72dd77f}"/>
<RecordField colName="departamento" fieldIdRef="1" name="departamento" sqlTabName="formonly" table_alias_name="" uid="{a8d8da23-3d8f-4040-b028-79065aeb910c}"/>
<RecordField colName="nivel_emp" fieldIdRef="2" name="nivel_emp" sqlTabName="formonly" table_alias_name="" uid="{aafc00f8-2172-4a34-89ca-37d83ffce667}"/>
<RecordField colName="cod_puesto" fieldIdRef="3" name="cod_puesto" sqlTabName="formonly" table_alias_name="" uid="{47acfb42-a462-40b4-94ed-6e31f24027d3}"/>
<RecordField colName="nombre" fieldIdRef="4" name="nombre" sqlTabName="formonly" sqlType="CHAR" table_alias_name="" uid="{9a0c8228-b680-47bd-bd83-2732a6a82c23}"/>
<RecordField colName="nom_dpto" fieldIdRef="5" name="nom_dpto" sqlTabName="formonly" sqlType="CHAR" table_alias_name="" uid="{79959716-d71a-41a4-9b02-d843c0a74b9c}"/>
<RecordField colName="" fieldIdRef="6" name="psalario_dia" sqlTabName="" table_alias_name="" uid="{d628a9db-952f-4991-8202-93ed1e42b70f}"/>
<RecordField colName="" fieldIdRef="7" name="pfecha1" sqlTabName="" table_alias_name="" uid="{8344a2b6-9bbe-474d-b430-e4568235f3db}"/>
<RecordField colName="" fieldIdRef="8" name="pfecha2" sqlTabName="" table_alias_name="" uid="{ed4a8e49-8819-484d-a73f-fa0f3b21c7e6}"/>
<RecordField colName="" fieldIdRef="12" name="fecha_entrada" sqlTabName="" table_alias_name="" uid="{c9705367-01f0-4141-b41e-d957aaff0159}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="acumul1" order="" uid="{ec789317-641e-4f1b-bb37-75f7915e52c9}" where="">
<RecordField colName="" fieldIdRef="9" name="cod_mov" sqlTabName="" table_alias_name="" uid="{b16a4bef-2246-4011-aea1-be65b1e99d5e}"/>
<RecordField colName="" fieldIdRef="10" name="descrip_mov" sqlTabName="" table_alias_name="" uid="{8b900968-58c8-49f2-8a5d-3ae0b440b5a9}"/>
<RecordField colName="" fieldIdRef="11" name="valor" sqlTabName="" sqlType="DECIMAL" table_alias_name="" uid="{184e9e11-0f45-4e39-bed6-b11170a860e1}"/>
</Record>
<Form gridHeight="26" gridWidth="84" name="nofmcs004" text="Acumulado por empleado">
<Grid gridHeight="23" gridWidth="72" name="Grid1" posX="3" posY="1">
<Group gridHeight="10" gridWidth="56" name="Group1" posX="2" posY="1">
<Label gridHeight="1" gridWidth="10" name="l1" posX="2" posY="1" text="Fecha Inicial"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="7" gridHeight="1" gridWidth="10" name="pfecha1" posX="18" posY="1" sqlTabName="" tabIndex="11" table_alias_name="" title="DateEdit1" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="10" name="l2" posX="31" posY="1" text="Fecha Final"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="8" gridHeight="1" gridWidth="10" name="pfecha2" posX="45" posY="1" sqlTabName="" tabIndex="12" table_alias_name="" title="DateEdit2" widget="DateEdit"/>
<Label posX="2" posY="3" text="Codigo del Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="num_emp" comment="Digite el numero del empleado" fieldId="0" gridHeight="1" gridWidth="6" name="num_emp" posX="23" posY="3" sqlTabName="formonly" sqlType="INTEGER" tabIndex="1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="departamento" fieldId="1" gridHeight="1" gridWidth="4" name="departamento" noEntry="true" posX="30" posY="3" sqlTabName="formonly" tabIndex="2" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nivel_emp" fieldId="2" gridHeight="1" gridWidth="2" name="nivel_emp" noEntry="true" posX="35" posY="3" sqlTabName="formonly" tabIndex="3" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_puesto" fieldId="3" gridHeight="1" gridWidth="4" name="cod_puesto" noEntry="true" posX="38" posY="3" sqlTabName="formonly" tabIndex="4" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nombre" fieldId="4" gridHeight="1" gridWidth="31" name="nombre" noEntry="true" posX="23" posY="4" sqlTabName="formonly" sqlType="CHAR" tabIndex="5" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nom_dpto" fieldId="5" gridHeight="1" gridWidth="31" name="nom_dpto" noEntry="true" posX="23" posY="5" sqlTabName="formonly" sqlType="CHAR" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label2" posX="2" posY="6" text="Fecha Entrada"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="12" gridHeight="1" gridWidth="13" name="fecha_entrada" posX="23" posY="6" sqlTabName="" tabIndex="13" table_alias_name="" title="Edit1" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="17" name="Label1" posX="2" posY="8" text="Salario Prom Diario"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="6" gridHeight="1" gridWidth="10" name="psalario_dia" posX="23" posY="8" sqlTabName="" tabIndex="10" table_alias_name="" title="Edit1" widget="Edit"/>
</Group>
<Group gridHeight="10" gridWidth="56" name="Group2" posX="3" posY="12">
<Table gridHeight="6" gridWidth="40" name="Table1" posX="2" posY="1" totalRows="5">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="9" gridHeight="1" gridWidth="8" name="cod_mov" posX="0" posY="0" sqlTabName="" tabIndex="7" table_alias_name="" title="Codigo" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="10" gridHeight="1" gridWidth="8" name="descrip_mov" posX="8" posY="0" sqlTabName="" tabIndex="8" table_alias_name="" title="Descripcion Mov" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="11" format="##,###,###.##" gridHeight="1" gridWidth="20" name="valor" posX="16" posY="0" sqlTabName="" sqlType="DECIMAL" tabIndex="9" table_alias_name="" title="Valor" widget="Edit"/>
</Table>
</Group>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewBlAGMANwA4ADkAMwAxADcALQA2ADQAMQBlAC0ANABmADEAYgAtAGIAYgAzADcALQA3ADUAZgA3ADkAMQA1AGUANQAyAGMAOQB9QDAAAAgAAAFAMAAACAAAAT90euFHrhR7AQAAAEwAewA3ADYAZgBhAGQAMQA1AGIALQAzADIAZABkAC0ANAA0AGEANgAtAGEAZQAwADIALQA4ADEAYwBhADIAZABjAGQAMgA0AGQAYgB9QCAAAAgAAAFAIAAACAAAAQAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmcs004.per
+41
View File
@@ -0,0 +1,41 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS004
OBJETIVO : Pantalla para desplegar informacion referente al
acumulado por movimiento de los empleados.
PROGRAMA Q. LO USA: NOPRCS004
PROGRAMADOR : Tadeo A. Ferreras F.
FECHA REALIZACION : Agosto 23, 1993
------------------------------------------------------------------------
}
schema smarmotech
screen size 24 by 80
{
Codigo del Empleado [empl]-[dept]-[a1]-[a2]
[nomb ]
[dpto ]
\g----------------------------------------------------------\g
Movimiento Acumulado
\g----------------------------------------------------------\g
[f00] [des ][val ]
[f00] [des ][val ]
[f00] [des ][val ]
[f00] [des ][val ]
}
end
attributes
empl = formonly.num_emp type integer,comments =
"Digite el numero del empleado";
dept = formonly.departamento,noentry;
a1 = formonly.nivel_emp,noentry;
a2 = formonly.cod_puesto,noentry;
nomb = formonly.nombre type char,noentry;
dpto = formonly.nom_dpto type char,noentry;
f00 = formonly.cod_mov;
des = formonly.descrip_mov type char,noentry;
val = formonly.valor,noentry;
instructions
delimiters " "
screen record acumul1(cod_mov,descrip_mov,valor)
end
PROYECTO/nodir/nofmcs005.per
+52
View File
@@ -0,0 +1,52 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS005
OBJETIVO : Pantalla que consulta los empleados atado al
movimiento que genera el prog. GENERACION NOMINA
Es utilizada por: NOFMCS005
PROGRAMADOR : Ing. Juan Soto
FECHA REALIZACION : Diciembre 17, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
Codigo Movimiento [c1][ca ]
\g--------------------------------------------------------------------------
Empleados Cantidad Valor
\g--------------------------------------------------------------------------
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
[f4 ][b ][f005 ][f006 ]
Total [t4 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
c1 = notb00008.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
ca = formonly.descripcion,noentry;
f4 = notb00008.num_emp;
t4 = formonly.p_total;
b = formonly.nombre;
f005 = notb00008.cantidad,noentry;
f006 = notb00008.valor,noentry;
instructions
screen record consart[10] (num_emp,nombre,cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmcs006.4fd
+66
View File
@@ -0,0 +1,66 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="31408" name="ManagedForm" uid="{c5802a50-a728-4881-a399-0093b777bf0b}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="consart" order="" uid="{60a43d76-ee23-429b-ae1f-e91dd615fef6}" where="">
<RecordField colName="num_nomi" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00008.num_nomi" sqlTabName="notb00008" sqlType="INTEGER" table_alias_name="" uid="{f3fc9fa0-2cfb-4b8a-a25a-2181c6b22765}"/>
<RecordField colName="fecha" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00008.fecha" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="notb00008" sqlType="DATETIME" table_alias_name="" uid="{d59aa922-fa43-4096-b243-7092e0ad25cd}"/>
<RecordField colName="cantidad" fieldIdRef="12" fieldType="TABLE_COLUMN" name="notb00008.cantidad" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00008" sqlType="DECIMAL" table_alias_name="" uid="{2d7f5f99-e398-44d0-8ddb-c93d599cde63}"/>
<RecordField colName="valor" fieldIdRef="13" fieldType="TABLE_COLUMN" name="notb00008.valor" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00008" sqlType="DECIMAL" table_alias_name="" uid="{c8b9c4f9-0870-4275-a00a-d75be01a3572}"/>
<RecordField colName="balance" fieldIdRef="11" name="balance" sqlTabName="formonly" table_alias_name="" uid="{beecbd65-c38b-4182-bbef-7d574bcb35d8}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{5876588b-2da4-409a-bab0-34ff84191764}" where="">
<RecordField colName="num_emp" fieldIdRef="3" fieldType="TABLE_COLUMN" name="adtb00003.num_emp" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{4a7d7d83-0592-49c6-a1cb-10ecb0a5d034}"/>
<RecordField colName="departamento" fieldIdRef="4" fieldType="TABLE_COLUMN" name="adtb00003.departamento" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{0ada584e-dbab-435b-b2b4-31aa736375ac}"/>
<RecordField colName="nivel_emp" fieldIdRef="5" fieldType="TABLE_COLUMN" name="adtb00003.nivel_emp" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{efd47dec-f7c1-47a6-aef7-c02273c3385b}"/>
<RecordField colName="cod_puesto" fieldIdRef="6" fieldType="TABLE_COLUMN" name="adtb00003.cod_puesto" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{966c70ef-bc8f-4b4f-b1fc-e5c26819607d}"/>
<RecordField colName="descrip1" fieldIdRef="7" name="descrip1" sqlTabName="formonly" table_alias_name="" uid="{c9e0fefa-6b2e-499a-9057-9d174ba57fb2}"/>
<RecordField colName="tipo_emp" fieldIdRef="1" fieldType="TABLE_COLUMN" name="notb00008.tipo_emp" sqlTabName="notb00008" sqlType="CHAR" table_alias_name="" uid="{d79f6772-7a99-41f8-a3d4-050ac0f190ce}"/>
<RecordField colName="descr" fieldIdRef="2" name="descr" sqlTabName="formonly" table_alias_name="" uid="{1e0d2e9a-a63d-4a96-84a0-c3f10cbc7e9c}"/>
<RecordField colName="cod_mov" fieldIdRef="8" fieldType="TABLE_COLUMN" name="notb00008.cod_mov" sqlTabName="notb00008" sqlType="SMALLINT" table_alias_name="" uid="{bf8e5744-7c55-49b2-97e3-8c76bea9720f}"/>
<RecordField colName="descrip_mov" fieldIdRef="9" fieldType="TABLE_COLUMN" name="notb00002.descrip_mov" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{edc7eef9-8257-4647-971a-e5c035b5f968}"/>
<RecordField colName="status_t" fieldIdRef="14" fieldType="TABLE_COLUMN" name="notb00008.status_t" sqlTabName="notb00008" sqlType="CHAR" table_alias_name="" uid="{f7e63012-05f7-4768-9227-eaef767b6a08}"/>
<RecordField colName="us_crea" fieldIdRef="15" fieldType="TABLE_COLUMN" name="notb00008.us_crea" sqlTabName="notb00008" sqlType="CHAR" table_alias_name="" uid="{c3a9c330-7cc4-4e4c-acf5-829565932c35}"/>
<RecordField colName="us_mod" fieldIdRef="17" fieldType="TABLE_COLUMN" name="notb00008.us_mod" sqlTabName="notb00008" sqlType="CHAR" table_alias_name="" uid="{d03be0ff-0d96-49b7-9b2b-04cdb8b9551f}"/>
<RecordField colName="fech_crea" fieldIdRef="16" fieldType="TABLE_COLUMN" name="notb00008.fech_crea" sqlTabName="notb00008" sqlType="DATE" table_alias_name="" uid="{6d9073c6-ab26-4cb6-bd53-4019bb017f57}"/>
<RecordField colName="fech_mod" fieldIdRef="18" fieldType="TABLE_COLUMN" name="notb00008.fech_mod" sqlTabName="notb00008" sqlType="DATE" table_alias_name="" uid="{120324b6-f5ef-4bdc-b5c9-a2b8ef79ca0e}"/>
</Record>
<Form gridHeight="13" gridWidth="82" name="nofmcs006" text="Consulta Balances Empleados">
<Grid gridHeight="13" gridWidth="82" name="Grid1" posX="0" posY="0">
<Group gridHeight="4" gridWidth="80" name="Group1" posX="2" posY="0">
<Label posX="1" posY="1" text="Codigo Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_emp" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="adtb00003.num_emp" notNull="true" posX="19" posY="1" required="true" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="departamento" comment="Digite el departamento del empleado" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="adtb00003.departamento" posX="25" posY="1" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="2" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nivel_emp" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="adtb00003.nivel_emp" noEntry="true" posX="31" posY="1" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="3" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_puesto" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="adtb00003.cod_puesto" noEntry="true" posX="35" posY="1" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="4" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip1" fieldId="7" gridHeight="1" gridWidth="30" name="descrip1" noEntry="true" posX="39" posY="1" sqlTabName="formonly" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="2" text="Tipo de Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" case="upper" colName="tipo_emp" comment="Digite Q- Quincenal, S- Semanal, V- Vendedor" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00008.tipo_emp" posX="19" posY="2" sqlTabName="notb00008" sqlType="CHAR" tabIndex="6" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descr" fieldId="2" gridHeight="1" gridWidth="9" name="descr" noEntry="true" posX="23" posY="2" sqlTabName="formonly" tabIndex="7" table_alias_name="" widget="Edit"/>
<Label posX="33" posY="2" text="Movimiento"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="cod_mov" fieldId="8" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="notb00008.cod_mov" posX="44" posY="2" sqlTabName="notb00008" sqlType="SMALLINT" tabIndex="8" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip_mov" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="27" name="notb00002.descrip_mov" noEntry="true" posX="49" posY="2" sqlTabName="notb00002" sqlType="CHAR" tabIndex="9" table_alias_name="" widget="Edit"/>
</Group>
<Table gridHeight="5" gridWidth="80" name="Table1" posX="2" posY="4" totalRows="4" unitWidth="characters" width="80">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_nomi" comment="Digite el numero de nomina" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00008.num_nomi" posX="0" posY="0" sqlTabName="notb00008" sqlType="INTEGER" tabIndex="10" table_alias_name="" title="Nomina" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha" fieldId="10" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="notb00008.fecha" posX="12" posY="0" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="notb00008" sqlType="DATETIME" tabIndex="11" table_alias_name="" title="Fecha" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cantidad" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="5" name="notb00008.cantidad" posX="22" posY="0" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00008" sqlType="DECIMAL" tabIndex="12" table_alias_name="" title="Cantidad" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="valor" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="7" name="notb00008.valor" posX="27" posY="0" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00008" sqlType="DECIMAL" tabIndex="13" table_alias_name="" title="Valor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="balance" fieldId="11" gridHeight="1" gridWidth="11" name="balance" posX="34" posY="0" sqlTabName="formonly" tabIndex="14" table_alias_name="" title="Balance" widget="Edit"/>
</Table>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00008.status_t" noEntry="true" posX="2" posY="10" sqlTabName="notb00008" sqlType="CHAR" tabIndex="15" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="11" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00008.us_crea" noEntry="true" posX="19" posY="11" sqlTabName="notb00008" sqlType="CHAR" tabIndex="16" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="11" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" fieldId="17" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00008.us_mod" noEntry="true" posX="64" posY="11" sqlTabName="notb00008" sqlType="CHAR" tabIndex="17" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="12" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" fieldId="16" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00008.fech_crea" noEntry="true" posX="19" posY="12" sqlTabName="notb00008" sqlType="DATE" tabIndex="18" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="12" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" fieldId="18" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00008.fech_mod" noEntry="true" posX="64" posY="12" sqlTabName="notb00008" sqlType="DATE" tabIndex="19" table_alias_name="" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA2ADAAYQA0ADMAZAA3ADYALQBlAGUAMgAzAC0ANAAyADkAYgAtAGEAZQAxAGYALQBlADkAMQBkAGQANgAxADUAZgBlAGYANgB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewA1ADgANwA2ADUAOAA4AGIALQAyAGQAYQA0AC0ANAAwADkAYQAtAGIAYQBiADAALQAzADQAZgBmADgANAAxADkAMQA3ADYANAB9QCAAAAgAAAFAIAAACAAAAQAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmcs006.per
+60
View File
@@ -0,0 +1,60 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS006
OBJETIVO : Pantalla que consulta los ingresos que tienen los
empleados
Es utilizada por: NOFMCS006
PROGRAMADOR : Ing. Juan Soto
FECHA REALIZACION : Enero 27, 1993
------------------------------------------------------------------------
}
database smarmotech
LAYOUT
GRID
{
<g >
Codigo Empleado [f000][f001][f2][f3][a ]
Tipo de Empleado [c] [te ]Movimiento[f4 ][b ]
<t >
[f002 ] [f20 ] [f005 ] [f006 ] [f21 ]
[f002 ] [f20 ] [f005 ] [f006 ] [f21 ]
[f002 ] [f20 ] [f005 ] [f006 ] [f21 ]
[f002 ] [f20 ] [f005 ] [f006 ] [f21 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,TITLE="Nomina",
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
f000 = adtb00003.num_emp,autonext;
f001 = adtb00003.departamento,autonext,
comments = "Digite el departamento del empleado";
f2 = adtb00003.nivel_emp,noentry;
f3 = adtb00003.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f4 = notb00008.cod_mov,autonext;
b = notb00002.descrip_mov,noentry;
f20 = notb00008.fecha,format = "dd/mm/yyyy",TITLE="Fecha";
f21 = formonly.balance,TITLE="Balance";
f005 = notb00008.cantidad,TITLE="Cantidad";
f006 = notb00008.valor,TITLE="Valor";
j = notb00008.status_t,noentry;
f007 = notb00008.us_crea,noentry;
f008 = notb00008.fech_crea,noentry;
f009 = notb00008.us_mod,noentry;
f010 = notb00008.fech_mod,noentry;
instructions
screen record consart[4] (num_nomi,fecha,cantidad,valor,balance)
delimiters " "
end
PROYECTO/nodir/nofmcs007.per
+57
View File
@@ -0,0 +1,57 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMCS002
OBJETIVO : Pantalla que consulta los ingresos que tienen los
empleados
Es utilizada por: NOFMCS002
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Septiembre 01, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Numero de Nomina [f002] Tipo de Empleado [c] [te ]
Codigo Empleado[f000][f001][f2][f3][a ]
\g--------------------------------------------------------------------------
Movimiento Cantidad Valor
\g--------------------------------------------------------------------------
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00008,notb00002,
adtb00003
attributes
f002 = notb00008.num_nomi,autonext,
comments = "Digite el numero de nomina";
c = notb00008.tipo_emp,autonext,upshift,
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
te = formonly.descr,noentry;
f000 = adtb00003.num_emp,autonext,
comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
f001 = adtb00003.departamento,autonext,
comments = "Digite el departamento del empleado";
f2 = adtb00003.nivel_emp,noentry;
f3 = adtb00003.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f4 = notb00008.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
b = notb00002.descrip_mov,noentry;
f005 = notb00008.cantidad,noentry;
f006 = notb00008.valor,noentry;
j = notb00008.status_t,noentry;
f007 = notb00008.us_crea,noentry;
f008 = notb00008.fech_crea,noentry;
f009 = notb00008.us_mod,noentry;
f010 = notb00008.fech_mod,noentry;
instructions
screen record consart[4] (cod_mov,descrip_mov,cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmcs008.per
+35
View File
@@ -0,0 +1,35 @@
{
=============================================================================
FORMULARIO : NOFMCS008
OBJETIVO : CAPTURAR Y DESPLEGAR INFORMACIONES PARA LOS ACUMULADOS DE LOS
MOVIMIENTOS ANUALES.
DISENO : JUAN F. SOTO
FECHA : MARZO 6, 1995
=============================================================================
}
DATABASE marmotech
screen size 24 by 80
{
ANO :[F001]
\g---------------------------------------------------------------------\g
CODIGO DESCRIPCION VALOR
\g---------------------------------------------------------------------\g
[f02] [a ][f003 ]
[f02] [a ][f003 ]
[f02] [a ][f003 ]
[f02] [a ][f003 ]
[f02] [a ][f003 ]
[f02] [a ][f003 ]
[f02] [a ][f003 ]
}
tables
notb00008
attributes
f001 = formonly.p_ano,comments = "Digite Ano Formato 1995";
f02 = notb00008.cod_mov,noentry;
a = formonly.descrip_mov;
f003 = formonly.valor;
instructions
screen record s_datos[7] (cod_mov,descrip_mov,valor)
end
PROYECTO/nodir/nofmm1008.per
+37
View File
@@ -0,0 +1,37 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT108
OBJETIVO : Pantalla que captura Informacion para generar la
nomina de pagos
PROGRAMADOR : Juan F. Soto
PROGRAMA Q. LO USA: NOPRMT008
FECHA REALIZACION : Septiembre 10, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Reporte de Movimientos de Nomina
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
[d][d1][n1 ][d][d1][n1 ]
}
tables
notb00008
attributes
d = formonly.clasifica,comments =
"Digite una S si desea generar este movimiento",upshift;
d1 = formonly.cod_mov type smallint,noentry;
n1 = formonly.nombre,noentry;
instructions
screen record s_mov[22](clasifica,cod_mov,nombre)
end
PROYECTO/nodir/nofmmt001.4fd
+118
View File
@@ -0,0 +1,118 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{2590cee9-4ae6-480b-830a-33c68e0c04f2}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="undefined1" order="" uid="{1dacb1a1-800a-4f08-b5a6-3605c0348f27}" where="">
<RecordField colName="cod_mov" fieldIdRef="1" fieldType="TABLE_COLUMN" name="notb00002.cod_mov" sqlTabName="notb00002" sqlType="SMALLINT" table_alias_name="" uid="{d2bd09a8-11f9-4d83-bd54-af3a177036ca}"/>
<RecordField colName="descrip_mov" fieldIdRef="2" fieldType="TABLE_COLUMN" name="notb00002.descrip_mov" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{5c62454d-c83e-492f-8880-18296c8a4f8f}"/>
<RecordField colName="primer_enc" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00002.primer_enc" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{3a1ecc7e-0002-4967-acd9-b8282ea5cc27}"/>
<RecordField colName="segundo_enc" fieldIdRef="4" fieldType="TABLE_COLUMN" name="notb00002.segundo_enc" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{b1e5523c-432d-4404-8027-d4a1a42d44a2}"/>
<RecordField colName="tercer_enc" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00002.tercer_enc" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{d2b327ed-9086-48e3-9e0f-6c2884db6f38}"/>
<RecordField colName="ch_encabeza" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00002.ch_encabeza" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{2ff870ba-1792-43d6-b9e4-639c2f5b2892}"/>
<RecordField colName="tipo_mov" defaultValue="V" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00002.tipo_mov" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{ef1b8fd1-2f25-4691-9a83-6be21c95bb19}"/>
<RecordField colName="clase_mov" fieldIdRef="8" name="clase_mov" sqlTabName="formonly" table_alias_name="" uid="{43d6aaa2-f8d8-49d3-8613-6c48e16613ec}"/>
<RecordField colName="afecta_tss" fieldIdRef="9" name="afecta_tss" sqlTabName="formonly" table_alias_name="" uid="{5dc88bf4-7044-48d4-b931-532eea99d4b7}"/>
<RecordField colName="cantidad_cia" fieldIdRef="12" fieldType="TABLE_COLUMN" name="notb00002.cantidad_cia" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00002" sqlType="DECIMAL" table_alias_name="" uid="{47276ba3-cd5f-4a6a-a37f-a42ecd2a6ebc}"/>
<RecordField colName="cantidad_emp" fieldIdRef="13" fieldType="TABLE_COLUMN" name="notb00002.cantidad_emp" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00002" sqlType="DECIMAL" table_alias_name="" uid="{a3087acb-7d76-4a71-9ec6-0a040c5aca4c}"/>
<RecordField colName="cta_control" fieldIdRef="14" fieldType="TABLE_COLUMN" name="notb00002.cta_control" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{4b2eca36-1a55-4fa2-8b57-d6efbaa4ab52}"/>
<RecordField colName="cta_aux" fieldIdRef="15" fieldType="TABLE_COLUMN" name="notb00002.cta_aux" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{c4c46e51-81e4-4742-9440-ff4e4fa62b72}"/>
<RecordField colName="status_t" fieldIdRef="16" fieldType="TABLE_COLUMN" name="notb00002.status_t" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{d2865925-0828-4840-a8cb-d1d6f585422d}"/>
<RecordField colName="us_crea" fieldIdRef="17" fieldType="TABLE_COLUMN" name="notb00002.us_crea" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{c8818344-d9b5-4ef0-9ee2-8a37aecdb195}"/>
<RecordField colName="us_mod" fieldIdRef="18" fieldType="TABLE_COLUMN" name="notb00002.us_mod" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{1095132e-8b95-4694-9f6b-e6a7ec194d26}"/>
<RecordField colName="fech_crea" fieldIdRef="19" fieldType="TABLE_COLUMN" name="notb00002.fech_crea" sqlTabName="notb00002" sqlType="DATE" table_alias_name="" uid="{ed7e6d84-d107-4b90-b9bc-444786057024}"/>
<RecordField colName="fech_mod" fieldIdRef="20" fieldType="TABLE_COLUMN" name="notb00002.fech_mod" sqlTabName="notb00002" sqlType="DATE" table_alias_name="" uid="{a2bf5c05-a75e-4dff-8d4a-8a84a61d7a24}"/>
<RecordField colName="" defaultValue="SI" fieldIdRef="10" name="modifica" sqlTabName="" table_alias_name="" uid="{a17af26f-50e2-45f0-8143-2e407d3988a9}"/>
<RecordField colName="" fieldIdRef="11" name="vacaciones" sqlTabName="" table_alias_name="" uid="{ace58748-a659-4f99-8cd6-c3a958d44eec}"/>
</Record>
<Record name="smovimientos" uid="{a0a9e539-2958-42a1-bcf1-e152f0241799}">
<RecordField fieldIdRef="21" name="codmov" uid="{693f8d79-589a-42f6-aec1-73a27e205561}"/>
<RecordField fieldIdRef="22" name="descripmov1" uid="{792a563c-58d7-4e2c-bf54-34c6ff12a00c}"/>
<RecordField fieldIdRef="23" name="tipomov1" uid="{ceab48e4-9b15-4378-a567-8ba729f43d52}"/>
<RecordField fieldIdRef="24" name="clasificacion" uid="{046a9cf3-969c-44cf-9a56-c04fe72f25b7}"/>
<RecordField fieldIdRef="25" name="afectatss1" uid="{de2525c1-1598-45d4-b034-f5f6f5d8da63}"/>
<RecordField fieldIdRef="26" name="modificanovedad1" uid="{306ca84e-132a-44c2-953d-a3155ed38e6c}"/>
<RecordField fieldIdRef="27" name="afectavacacion1" uid="{115171c3-4702-40bf-98b9-2a72a04f8844}"/>
</Record>
<Form gridHeight="23" gridWidth="101" name="nofmmt001" style="basic" text="CREACION CONCEPTOS NOMINAS">
<Folder gridHeight="22" gridWidth="84" name="folder1" posX="2" posY="1">
<Page name="page1" text="Tabla Movimientos">
<Table gridHeight="9" gridWidth="64" name="table1" posX="2" posY="3" totalRows="5">
<Edit fieldId="21" gridHeight="1" gridWidth="8" name="codmov" posX="0" posY="0" tabIndex="-1" title="Codigo" widget="Edit"/>
<Edit fieldId="22" gridHeight="1" gridWidth="8" name="descripmov1" posX="8" posY="0" scroll="true" tabIndex="-1" title="Descripcion" widget="Edit"/>
<Edit fieldId="23" gridHeight="1" gridWidth="8" name="tipomov1" posX="16" posY="0" scroll="true" tabIndex="-1" title="Tipo Movimiento" widget="Edit"/>
<Edit fieldId="24" gridHeight="1" gridWidth="8" name="clasificacion" posX="24" posY="0" scroll="true" tabIndex="-1" title="Clasificacion" widget="Edit"/>
<Edit fieldId="25" gridHeight="1" gridWidth="8" name="afectatss1" posX="32" posY="0" scroll="true" tabIndex="-1" title="Afecta TSS" widget="Edit"/>
<Edit fieldId="26" gridHeight="1" gridWidth="8" name="modificanovedad1" posX="40" posY="0" scroll="true" tabIndex="-1" title="Modifica Novedad" widget="Edit"/>
<Edit fieldId="27" gridHeight="1" gridWidth="8" name="afectavacacion1" posX="48" posY="0" scroll="true" tabIndex="-1" title="Aftecta Vacaciones" widget="Edit"/>
</Table>
</Page>
<Page name="page2" text="Administracion">
<Grid gridHeight="19" gridWidth="81" name="Grid1" posX="3" posY="2">
<Label gridHeight="1" gridWidth="10" name="Label2" posX="1" posY="2" text="Movimiento"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="cod_mov" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="notb00002.cod_mov" posX="31" posY="2" sqlTabName="notb00002" sqlType="SMALLINT" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="descrip_mov" comment="Digite la descripcion del movimiento" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="notb00002.descrip_mov" posX="37" posY="2" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="17" name="Label3" posX="1" posY="3" text="Primer Encabezado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="primer_enc" comment="Digite el primer encabezado" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="notb00002.primer_enc" posX="31" posY="3" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="18" name="Label4" posX="1" posY="4" text="Segundo Encabezado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="segundo_enc" comment="Digite el segundo encabezado" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="notb00002.segundo_enc" posX="31" posY="4" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="17" name="Label5" posX="1" posY="5" text="Tercer Encabezado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="tercer_enc" comment="Digite el tercer encabezado" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="notb00002.tercer_enc" posX="31" posY="5" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="24" name="Label6" posX="1" posY="6" text="Encabezado En El Volante"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="ch_encabeza" comment="Digite el encabezado para el cheque" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="notb00002.ch_encabeza" posX="31" posY="6" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="18" name="Label7" posX="1" posY="7" text="Tipo de Movimiento"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="tipo_mov" comment="Digite F- Fijo, V- Variable" defaultValue="V" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="22" items="VARIABLE, FIJO" name="notb00002.tipo_mov" posX="31" posY="7" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="ComboBox">
<Item lstrtext="false" name="V" text="VARIABLE"/>
<Item lstrtext="false" name="F" text="FIJO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="28" name="Label8" posX="1" posY="8" text="Clasificacion del Movimiento"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="clase_mov" fieldId="8" gridHeight="1" gridWidth="23" items="ISR, INGRESOS, INGRESOS SIN RETENCION ISR, DESCUENTOS, HORAS EXTRAS, SEGURO SOCIAL, DESCUENTO CALCULADO, INGRESOS CALCULADO" name="clase_mov" posX="31" posY="8" sqlTabName="formonly" tabIndex="-1" table_alias_name="" widget="ComboBox">
<Item name="R" text="ISR"/>
<Item name="I" text="INGRESOS"/>
<Item name="P" text="INGRESOS SIN RETENCION ISR"/>
<Item name="D" text="DESCUENTOS"/>
<Item name="E" text="HORAS EXTRAS"/>
<Item name="S" text="SEGURO SOCIAL"/>
<Item name="C" text="DESCUENTO CALCULADO"/>
<Item name="G" text="INGRESOS CALCULADO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="Label9" posX="1" posY="9" text="Afecta TSS"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="afecta_tss" fieldId="9" gridHeight="1" gridWidth="7" include="SI|NO" items="SI, NO" name="afecta_tss" posX="31" posY="9" sqlTabName="formonly" tabIndex="-1" table_alias_name="" widget="ComboBox">
<Item name="SI" text="SI"/>
<Item name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="18" name="Label1" posX="1" posY="10" text="Modifica Novedad"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" comment="Si esta transaccion no se permite modificar en Novedades colocar NO" defaultValue="SI" fieldId="10" gridHeight="1" gridWidth="10" items="NO, SI" name="modifica" posX="31" posY="10" sqlTabName="" tabIndex="-1" table_alias_name="" title="Edit1" widget="ComboBox">
<Item lstrtext="false" name="NO" text="NO"/>
<Item lstrtext="false" name="SI" text="SI"/>
</ComboBox>
<Label gridHeight="1" gridWidth="17" name="Label18" posX="1" posY="11" text="Afecta Vacaiones"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="11" gridHeight="1" gridWidth="10" items="SI, NO" name="vacaciones" posX="31" posY="11" sqlTabName="" tabIndex="-1" table_alias_name="" title="ComboBox1" widget="ComboBox">
<Item lstrtext="false" name="SI" text="SI"/>
<Item lstrtext="false" name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="17" name="Label10" posX="1" posY="12" text="Cantidad Compania"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cantidad_cia" comment="Digite el monto que aporta la compania" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00002.cantidad_cia" posX="22" posY="12" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00002" sqlType="DECIMAL" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="17" name="Label17" posX="41" posY="12" text="Cantidad Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cantidad_emp" comment="Digite el monto que aporta el empleado" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00002.cantidad_emp" posX="61" posY="12" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00002" sqlType="DECIMAL" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="14" name="Label11" posX="1" posY="13" text="Cuenta Control"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="cta_control" comment="Digite la cuenta control del movimiento" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00002.cta_control" posX="22" posY="13" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="15" name="Label16" posX="41" posY="13" text="Cuenta Auxiliar"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cta_aux" comment="Digite la cuenta auxiliar del movimiento" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="8" name="notb00002.cta_aux" posX="61" posY="13" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" fieldId="16" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00002.status_t" noEntry="true" posX="2" posY="14" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="15" name="Label12" posX="1" posY="15" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" fieldId="17" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00002.us_crea" noEntry="true" posX="19" posY="15" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="19" name="Label14" posX="41" posY="15" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" fieldId="18" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00002.us_mod" noEntry="true" posX="63" posY="15" sqlTabName="notb00002" sqlType="CHAR" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="14" name="Label13" posX="1" posY="16" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" fieldId="19" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00002.fech_crea" noEntry="true" posX="19" posY="16" sqlTabName="notb00002" sqlType="DATE" tabIndex="-1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="18" name="Label15" posX="41" posY="16" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" fieldId="20" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00002.fech_mod" noEntry="true" posX="63" posY="16" sqlTabName="notb00002" sqlType="DATE" tabIndex="-1" table_alias_name="" widget="Edit"/>
</Grid>
</Page>
</Folder>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewBhADAAYQA5AGUANQAzADkALQAyADkANQA4AC0ANAAyAGEAMQAtAGIAYwBmADEALQBlADEANQAyAGYAMAAyADQAMQA3ADkAOQB9QDAAAAwAAANAMAAADAAAAz9QYk3S8an8AQAAAEwAewAxAGQAYQBjAGIAMQBhADEALQA4ADAAMABhAC0ANABmADAAOAAtAGIANQBhADYALQAzADYAMAA1AGMAMAAzADQAOABmADIANwB9QCAAAAwAAANAIAAADAAAAwAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt001.per
+71
View File
@@ -0,0 +1,71 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT001
OBJETIVO : Pantalla que captura los codigos de movimientos
Es utilizada por: NOPRMT001
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Agosto 19, 1993
------------------------------------------------------------------------
}
schema smarmotech
TOOLBAR
ITEM nuevo (TEXT="Codigos", IMAGE="new", COMMENT="Nuevo Codigo")
ITEM buscar (TEXT="Buscar Codigos", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="CREACION CONCEPTOS NOMINAS", STYLE="basic")
GRID
{
Movimiento [f0 ] [a ]
Primer Encabezado [f001 ]
Segundo Encabezado [f002 ]
Tercer Encabezado [f003 ]
Encabezado En El Volante [f021 ]
Tipo de Movimiento [b] [d ]
Clasificacion del Movimiento [c ]
Afecta TSS [af ]
Cantidad Compania [f005 ] Cantidad Empleado [f006 ]
Cuenta Control [cc ] Cuenta Auxiliar [ca ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00002
attributes
COMBOBOX af =formonly.afecta_tss,include=("SI","NO");
f0 = notb00002.cod_mov,autonext;
a = notb00002.descrip_mov,upshift,
comments = "Digite la descripcion del movimiento";
f001 = notb00002.primer_enc,upshift,
comments = "Digite el primer encabezado";
f002 = notb00002.segundo_enc,upshift,
comments = "Digite el segundo encabezado";
f003 = notb00002.tercer_enc,upshift,
comments = "Digite el tercer encabezado";
b = notb00002.tipo_mov,upshift,comments = "Digite F- Fijo, V- Variable";
d = formonly.descr,noentry;
COMBOBOX c = formonly.clase_mov,ITEMS = (("R","ISR"),("I","INGRESOS"),("P","INGRESOS SIN RETENCION ISR"),("D","DESCUENTOS"),("E","HORAS EXTRAS"),("S","SEGURO SOCIAL"),("C","DESCUENTO CALCULADO"),("G","INGRESOS CALCULADO"));
f005 = notb00002.cantidad_cia,
comments = "Digite el monto que aporta la compania";
f006 = notb00002.cantidad_emp,
comments = "Digite el monto que aporta el empleado";
cc = notb00002.cta_control,autonext,
comments = "Digite la cuenta control del movimiento";
ca = notb00002.cta_aux,
comments = "Digite la cuenta auxiliar del movimiento";
j = notb00002.status_t,noentry;
f007 = notb00002.us_crea,noentry;
f008 = notb00002.fech_crea,noentry;
f009 = notb00002.us_mod,noentry;
f010 = notb00002.fech_mod,noentry;
f021 = notb00002.ch_encabeza,comments =
"Digite el encabezado para el cheque";
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt002.4fd
+56
View File
@@ -0,0 +1,56 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" gstVersion="22800" name="ManagedForm" uid="{26d012ee-0484-4f82-b50f-46a84f758c08}">
<AGSettings/>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="consart" order="" uid="{304e6aca-a381-48d8-bd66-0345023cc112}" where="">
<RecordField colName="cod_mov" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00003.cod_mov" sqlTabName="notb00003" sqlType="SMALLINT" table_alias_name="" uid="{19123375-6dd4-4197-8a54-d04338e2a54b}"/>
<RecordField colName="descrip_mov" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00002.descrip_mov" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{78fac00f-e84a-40c0-b8ca-1005f0a312e1}"/>
<RecordField colName="cantidad" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00003.cantidad" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00003" sqlType="DECIMAL" table_alias_name="" uid="{1b264920-dd2c-480d-a946-d11e7f3ceedd}"/>
<RecordField colName="valor" fieldIdRef="8" fieldType="TABLE_COLUMN" name="notb00003.valor" precisionDecimal="10" scaleDecimal="2" sqlTabName="notb00003" sqlType="DECIMAL" table_alias_name="" uid="{d003c5a2-df4d-4a62-bb74-0e3de1fb36d8}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{db6e0512-d7f9-4b40-a0f7-b6eff4bfc0f8}" where="">
<RecordField colName="num_emp" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00003.num_emp" sqlTabName="notb00003" sqlType="SMALLINT" table_alias_name="" uid="{858d6be5-b045-4a21-a610-446d713a7a26}"/>
<RecordField colName="departamento" fieldIdRef="1" fieldType="TABLE_COLUMN" name="notb00003.departamento" sqlTabName="notb00003" sqlType="SMALLINT" table_alias_name="" uid="{a651d77b-eb25-450b-94d6-4cdce74df8a4}"/>
<RecordField colName="nivel_emp" fieldIdRef="2" fieldType="TABLE_COLUMN" name="notb00003.nivel_emp" sqlTabName="notb00003" sqlType="SMALLINT" table_alias_name="" uid="{77d228c5-1dd5-4625-9926-bd2d2d80aa19}"/>
<RecordField colName="cod_puesto" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00003.cod_puesto" sqlTabName="notb00003" sqlType="SMALLINT" table_alias_name="" uid="{033582a1-ccd5-4e21-9c94-a4ed5d07b480}"/>
<RecordField colName="descrip1" fieldIdRef="4" name="descrip1" sqlTabName="formonly" table_alias_name="" uid="{7efe3b7c-e3bd-4896-8910-dc405f7aacd2}"/>
<RecordField colName="status_t" fieldIdRef="9" fieldType="TABLE_COLUMN" name="notb00003.status_t" sqlTabName="notb00003" sqlType="CHAR" table_alias_name="" uid="{a15b8a38-4e70-4f9c-9b91-87ac8bf9243b}"/>
<RecordField colName="us_crea" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00003.us_crea" sqlTabName="notb00003" sqlType="CHAR" table_alias_name="" uid="{3330ed8b-8ff3-43cd-b8b5-2a6b8b1db1da}"/>
<RecordField colName="us_mod" fieldIdRef="12" fieldType="TABLE_COLUMN" name="notb00003.us_mod" sqlTabName="notb00003" sqlType="CHAR" table_alias_name="" uid="{869d8c53-7d21-4202-954c-6808d1ddaf81}"/>
<RecordField colName="fech_crea" fieldIdRef="11" fieldType="TABLE_COLUMN" name="notb00003.fech_crea" sqlTabName="notb00003" sqlType="DATE" table_alias_name="" uid="{c9b3e220-e58e-4586-b5d8-bff5b33c7779}"/>
<RecordField colName="fech_mod" fieldIdRef="13" fieldType="TABLE_COLUMN" name="notb00003.fech_mod" sqlTabName="notb00003" sqlType="DATE" table_alias_name="" uid="{e5a0c942-a6ef-4a9f-a0a9-32e9440b7bc5}"/>
</Record>
<Form gridHeight="13" gridWidth="81" name="nofmmt002" style="basic" text="MAESTRA CODIGOS NOVEDADES">
<ToolBar name="ToolBar1">
<ToolBarItem comment="Nuevo Codigo" image="new" name="nuevo" text="Codigos"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Codigos"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Grid gridHeight="13" gridWidth="81" name="Grid1" posX="0" posY="0">
<Label posX="1" posY="0" text="Codigo Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_emp" columnCount="" comment="Digite la ficha del empleado o Presione Ctrl-W para busqueda" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00003.num_emp" notNull="true" posX="17" posY="0" required="true" rowCount="" sqlTabName="notb00003" sqlType="SMALLINT" stepX="" stepY="" tabIndex="1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="departamento" columnCount="" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00003.departamento" posX="23" posY="0" rowCount="" sqlTabName="notb00003" sqlType="SMALLINT" stepX="" stepY="" tabIndex="2" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nivel_emp" columnCount="" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00003.nivel_emp" noEntry="true" posX="29" posY="0" rowCount="" sqlTabName="notb00003" sqlType="SMALLINT" stepX="" stepY="" tabIndex="3" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_puesto" columnCount="" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00003.cod_puesto" noEntry="true" posX="33" posY="0" rowCount="" sqlTabName="notb00003" sqlType="SMALLINT" stepX="" stepY="" tabIndex="4" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip1" columnCount="" fieldId="4" gridHeight="1" gridWidth="41" name="descrip1" noEntry="true" posX="37" posY="0" rowCount="" sqlTabName="formonly" stepX="" stepY="" tabIndex="5" table_alias_name="" widget="Edit"/>
<Group gridHeight="11" gridWidth="80" name="Group1" posX="1" posY="2">
<Label posX="2" posY="1" text="Movimiento"/>
<Label posX="42" posY="1" text="Cantidad"/>
<Label posX="65" posY="1" text="Valor"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="cod_mov" columnCount="1" comment="Digite el codigo de movimiento o Presione Ctrl-W para busqueda" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00003.cod_mov" notNull="true" posX="3" posY="2" repeat="true" required="true" rowCount="5" sqlTabName="notb00003" sqlType="SMALLINT" stepX="1" stepY="0" tabIndex="6" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip_mov" columnCount="1" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="notb00002.descrip_mov" noEntry="true" posX="8" posY="2" repeat="true" rowCount="5" sqlTabName="notb00002" sqlType="CHAR" stepX="1" stepY="0" tabIndex="7" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cantidad" columnCount="1" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00003.cantidad" posX="42" posY="2" precisionDecimal="10" repeat="true" rowCount="5" scaleDecimal="2" sqlTabName="notb00003" sqlType="DECIMAL" stepX="1" stepY="0" tabIndex="8" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="valor" columnCount="1" fieldId="8" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00003.valor" posX="61" posY="2" precisionDecimal="10" repeat="true" rowCount="5" scaleDecimal="2" sqlTabName="notb00003" sqlType="DECIMAL" stepX="1" stepY="0" tabIndex="9" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" columnCount="" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00003.status_t" noEntry="true" posX="3" posY="7" rowCount="" sqlTabName="notb00003" sqlType="CHAR" stepX="" stepY="" tabIndex="10" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="8" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" columnCount="" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00003.us_crea" noEntry="true" posX="20" posY="8" rowCount="" sqlTabName="notb00003" sqlType="CHAR" stepX="" stepY="" tabIndex="11" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="8" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" columnCount="" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00003.us_mod" noEntry="true" posX="62" posY="8" rowCount="" sqlTabName="notb00003" sqlType="CHAR" stepX="" stepY="" tabIndex="12" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="9" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" columnCount="" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00003.fech_crea" noEntry="true" posX="20" posY="9" rowCount="" sqlTabName="notb00003" sqlType="DATE" stepX="" stepY="" tabIndex="13" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="9" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" columnCount="" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00003.fech_mod" noEntry="true" posX="62" posY="9" rowCount="" sqlTabName="notb00003" sqlType="DATE" stepX="" stepY="" tabIndex="14" table_alias_name="" widget="Edit"/>
</Group>
</Grid>
</Form>
</ManagedForm>
PROYECTO/nodir/nofmmt002.per
+59
View File
@@ -0,0 +1,59 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT002
OBJETIVO : Pantalla que captura los movimientos fijos de
los empleados
Es utilizada por: NOPRMT002
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Agosto 20, 1993
------------------------------------------------------------------------
}
database smarmotech
TOOLBAR
ITEM nuevo (TEXT="Codigos", IMAGE="new", COMMENT="Nuevo Codigo")
ITEM buscar (TEXT="Buscar Codigos", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="MAESTRA CODIGOS NOVEDADES", STYLE="basic")
GRID
{
Codigo Empleado[f000][f001][f2][f3][a ]
<G >
Movimiento Cantidad Valor
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[f4] [b ] [f005 ] [f006 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00003,notb00002
attributes
f000 = notb00003.num_emp,autonext,
comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
f001 = notb00003.departamento,autonext;
f2 = notb00003.nivel_emp,noentry;
f3 = notb00003.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f4 = notb00003.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
b = notb00002.descrip_mov,noentry;
f005 = notb00003.cantidad;
f006 = notb00003.valor;
j = notb00003.status_t,noentry;
f007 = notb00003.us_crea,noentry;
f008 = notb00003.fech_crea,noentry;
f009 = notb00003.us_mod,noentry;
f010 = notb00003.fech_mod,noentry;
instructions
screen record consart[5] (cod_mov,descrip_mov,cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmmt003.4fd
+360
View File
@@ -0,0 +1,360 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="40100" gstVersion="60003" name="ManagedForm" uid="{5bf98cc1-b062-4aac-994b-1a85d5a86fdc}">
<AGSettings>
<DynamicProperties version="4"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{490c8c5c-b330-43bd-aa59-a3860119ae91}" where="">
<RecordField colName="num_emp" fieldIdRef="6" fieldType="TABLE_COLUMN" name="adtb00003.num_emp" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{4feb0513-abfb-4b70-8499-21c92fd11753}"/>
<RecordField colName="" fieldIdRef="7" fieldType="NON_DATABASE" name="departamento" sqlTabName="" sqlType="SMALLINT" table_alias_name="" uid="{081e8811-7d0d-4d9c-b03e-460eb2cf5dec}"/>
<RecordField colName="" fieldIdRef="9" fieldType="NON_DATABASE" name="cod_puesto" sqlTabName="" sqlType="SMALLINT" table_alias_name="" uid="{98692374-598f-4135-bd52-1b9a5de2b55b}"/>
<RecordField colName="fotos" fieldIdRef="2" name="fotos" sqlTabName="formonly" table_alias_name="" uid="{5375c60d-38e3-4385-84dd-079727a2e943}"/>
<RecordField colName="nom1_emp" fieldIdRef="10" fieldType="TABLE_COLUMN" name="adtb00003.nom1_emp" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{2dc450d3-aa01-44ed-a8ce-e9bc8dd30999}"/>
<RecordField colName="nom2_emp" fieldIdRef="11" fieldType="TABLE_COLUMN" name="adtb00003.nom2_emp" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{0f8c40d8-ce4b-409e-ae3f-13d664146844}"/>
<RecordField colName="apell1_emp" fieldIdRef="12" fieldType="TABLE_COLUMN" name="adtb00003.apell1_emp" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{2ee8839c-b094-4265-9df4-b1e6c297e3d9}"/>
<RecordField colName="apell2_emp" fieldIdRef="13" fieldType="TABLE_COLUMN" name="adtb00003.apell2_emp" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{f5fcc1e4-a1b6-4b99-8116-35a56583997d}"/>
<RecordField colName="nom_puesto" fieldIdRef="14" fieldType="TABLE_COLUMN" name="adtb00004.nom_puesto" sqlTabName="adtb00004" sqlType="CHAR" table_alias_name="" uid="{3937d342-cbef-4d86-8ddb-b219f3266e3c}"/>
<RecordField colName="nom_dpto" fieldIdRef="15" fieldType="TABLE_COLUMN" name="adtb00001.nom_dpto" sqlTabName="adtb00001" sqlType="CHAR" table_alias_name="" uid="{e63f176e-6785-4264-9c4f-333d938f82f0}"/>
<RecordField colName="calle" fieldIdRef="16" fieldType="TABLE_COLUMN" name="adtb00003.calle" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{5bab2a43-0644-4814-80b0-5468ab21a59d}"/>
<RecordField colName="barrio" fieldIdRef="18" fieldType="TABLE_COLUMN" name="adtb00003.barrio" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{9163e4e4-0468-4086-9129-ef219a1e7004}"/>
<RecordField colName="urbanizacion" fieldIdRef="19" fieldType="TABLE_COLUMN" name="adtb00003.urbanizacion" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{6d5bac99-2518-452c-9699-917f69a25241}"/>
<RecordField fieldIdRef="20" fieldType="NON_DATABASE" length="11" name="cedula" sqlType="CHAR" table_alias_name="" uid="{d8f19aa3-9af4-4eaf-97d6-f6cf347c5b8b}"/>
<RecordField colName="serie" fieldIdRef="21" fieldType="TABLE_COLUMN" name="adtb00003.serie" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{ff2361ba-847d-4264-a4f6-bd7a906baf3f}"/>
<RecordField colName="telefono" fieldIdRef="26" name="telefono" sqlTabName="formonly" table_alias_name="" uid="{2403c8ca-2915-4bc0-8e61-ad9ac59d1af7}"/>
<RecordField colName="fech_nac" fieldIdRef="22" fieldType="TABLE_COLUMN" name="adtb00003.fech_nac" sqlTabName="adtb00003" sqlType="DATE" table_alias_name="" uid="{a436bb39-2337-42ad-999c-636881481a86}"/>
<RecordField colName="cod_nac" fieldIdRef="23" fieldType="TABLE_COLUMN" name="adtb00003.cod_nac" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{3b8f576a-9c8c-49ff-9501-0a90922909dd}"/>
<RecordField colName="nom_nac" fieldIdRef="24" fieldType="TABLE_COLUMN" name="adtb00007.nom_nac" sqlTabName="adtb00007" sqlType="CHAR" table_alias_name="" uid="{8f620000-0694-472f-b5de-0e24adb061b8}"/>
<RecordField colName="estado_civil" fieldIdRef="27" fieldType="TABLE_COLUMN" name="adtb00003.estado_civil" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{45e29cdd-6c02-4d3d-b787-fe08d4e101b9}"/>
<RecordField colName="tipo_sangre" fieldIdRef="29" fieldType="TABLE_COLUMN" name="adtb00003.tipo_sangre" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{024a7ab0-ce3e-45d5-a735-26421d2ff1ec}"/>
<RecordField colName="nomina" fieldIdRef="31" fieldType="TABLE_COLUMN" name="adtb00003.nomina" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{ca455153-595d-4863-808c-489142306153}"/>
<RecordField colName="descrip" fieldIdRef="32" name="descrip" sqlTabName="formonly" table_alias_name="" uid="{04438030-690f-4fd8-aaa2-83e1c027f1cc}"/>
<RecordField colName="fech_efec" fieldIdRef="33" fieldType="TABLE_COLUMN" name="adtb00003.fech_efec" sqlTabName="adtb00003" sqlType="DATE" table_alias_name="" uid="{75116c66-c029-4375-b161-4266dc5c8497}"/>
<RecordField colName="paga_seg" fieldIdRef="39" fieldType="TABLE_COLUMN" name="adtb00003.paga_seg" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{970d97eb-8d78-477d-b6e4-21b61e4c89cf}"/>
<RecordField colName="cod_seg1" fieldIdRef="36" fieldType="TABLE_COLUMN" name="adtb00003.cod_seg1" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{4c841bde-c6a1-4acb-b898-3d9190d51412}"/>
<RecordField colName="cod_seg2" fieldIdRef="37" fieldType="TABLE_COLUMN" name="adtb00003.cod_seg2" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{3794cf6b-4e5d-4fd0-8a18-5a1c718bd892}"/>
<RecordField colName="localidad" fieldIdRef="1" name="localidad" sqlTabName="formonly" table_alias_name="" uid="{4f1c881a-9d71-4d55-b09e-07df6d063466}"/>
<RecordField colName="descrip_st" fieldIdRef="5" name="descrip_st" sqlTabName="formonly" table_alias_name="" uid="{d44c1245-2fc3-4423-a1f3-1c8c000764fc}"/>
<RecordField colName="casa_num" fieldIdRef="17" fieldType="TABLE_COLUMN" name="adtb00003.casa_num" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{111bf751-06b7-4dff-944d-e2b930f046e0}"/>
<RecordField colName="credito" fieldIdRef="0" name="credito" sqlTabName="formonly" table_alias_name="" uid="{7894fd9c-4095-4233-8283-7ea87b343bfa}"/>
<RecordField colName="licencia" fieldIdRef="25" fieldType="TABLE_COLUMN" name="adtb00003.licencia" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{5c751079-1303-4ce4-acb1-b0c3b7673794}"/>
<RecordField colName="p_sexo" fieldIdRef="34" name="p_sexo" sqlTabName="formonly" sqlType="CHAR" table_alias_name="" uid="{3b6f1e9e-8a35-4bf9-92be-a084d3d9f799}"/>
<RecordField colName="tipo_sexo" fieldIdRef="35" name="tipo_sexo" sqlTabName="formonly" table_alias_name="" uid="{cd8e0645-387e-443c-984e-33307ed137d6}"/>
<RecordField colName="cod_seg3" defaultValue="1" fieldIdRef="38" fieldType="TABLE_COLUMN" name="adtb00003.cod_seg3" sqlTabName="adtb00003" sqlType="SMALLINT" table_alias_name="" uid="{a6011d93-8ed9-4413-b5a6-2fda05931cb6}"/>
<RecordField colName="sueldo_ac" fieldIdRef="30" fieldType="TABLE_COLUMN" name="adtb00003.sueldo_ac" precisionDecimal="10" scaleDecimal="2" sqlTabName="adtb00003" sqlType="DECIMAL" table_alias_name="" uid="{b8e6fc34-0883-4d61-84bc-5af562c0914b}"/>
<RecordField colName="fecha_salida" fieldIdRef="3" name="fecha_salida" sqlTabName="formonly" sqlType="DATE" table_alias_name="" uid="{274f2ebc-ed68-4c84-b93a-bd05f9c9bc26}"/>
<RecordField colName="cuenta_no" fieldIdRef="4" fieldType="TABLE_COLUMN" name="adtb00003.cuenta_no" sqlTabName="adtb00003" sqlType="VARCHAR" table_alias_name="" uid="{d6e44c3a-0ebb-4f95-a907-aec3572a66d8}"/>
<RecordField colName="status_t" fieldIdRef="40" fieldType="TABLE_COLUMN" name="adtb00003.status_t" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{6406bdfc-baa3-4ae1-8cbc-a27e94f80087}"/>
<RecordField colName="us_crea" fieldIdRef="41" fieldType="TABLE_COLUMN" name="adtb00003.us_crea" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{dcb5b900-e5b7-41fb-a209-e4a20a25d78b}"/>
<RecordField colName="us_mod" fieldIdRef="43" fieldType="TABLE_COLUMN" name="adtb00003.us_mod" sqlTabName="adtb00003" sqlType="CHAR" table_alias_name="" uid="{54f0e4da-9591-4237-8410-1d86f9b928aa}"/>
<RecordField colName="fech_crea" fieldIdRef="42" fieldType="TABLE_COLUMN" name="adtb00003.fech_crea" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="adtb00003" sqlType="DATETIME" table_alias_name="" uid="{75ef7ce8-7920-4307-bbd5-d9abe540b50f}"/>
<RecordField colName="fech_mod" fieldIdRef="44" fieldType="TABLE_COLUMN" name="adtb00003.fech_mod" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="adtb00003" sqlType="DATETIME" table_alias_name="" uid="{5240b45f-83a6-4d2b-8948-ea05adb49fdb}"/>
<RecordField colName="fecha_salida" fieldIdRef="45" name="fecha_ultimo_aumento" sqlTabName="formonly" sqlType="DATE" table_alias_name="" uid="{515ff4ef-a63a-4afb-8956-1e9b3856d1d4}"/>
<RecordField colName="" fieldIdRef="46" name="sec_vend_sup" sqlTabName="" table_alias_name="" uid="{447e0eb3-7e79-49f0-ad7f-8ee5340d744d}"/>
<RecordField colName="" fieldIdRef="58" name="sec_vend_supervisor" sqlTabName="" table_alias_name="" uid="{dc4a28ee-6dc7-482f-bdd8-7599eb260431}"/>
<RecordField colName="" fieldIdRef="59" name="nombre_supervisor" sqlTabName="" table_alias_name="" uid="{75342cd2-3685-48de-8efa-6542b501d001}"/>
<RecordField colName="" defaultValue="1" fieldIdRef="60" name="tipocuenta" sqlTabName="" table_alias_name="" uid="{3ddb28a4-0d03-4daa-8d5d-56bf41ad4b48}"/>
<RecordField colName="" defaultValue="10101070" fieldIdRef="61" name="codbancodestino" sqlTabName="" table_alias_name="" uid="{de0451f9-623b-4b44-8c57-62b0e84617f6}"/>
<RecordField colName="" fieldIdRef="62" name="digiverbancodestino" sqlTabName="" table_alias_name="" uid="{c49fb61c-0e8a-4fa8-b210-9c2f9f4fe19c}"/>
<RecordField colName="" defaultValue="FIJO" fieldIdRef="63" name="tipo_sueldo" sqlTabName="" table_alias_name="" uid="{e750b10f-ad62-408b-b65f-71094d6f91ae}"/>
<RecordField colName="" fieldIdRef="64" name="email" sqlTabName="" table_alias_name="" uid="{cd560286-be50-4ca8-a2d3-c2fd5c6ce871}"/>
<RecordField colName="" defaultValue="NO" fieldIdRef="65" name="instalador" sqlTabName="" table_alias_name="" uid="{074c6cbc-0aaa-4841-940d-8654653666d0}"/>
<RecordField colName="" fieldIdRef="66" name="cuenta_aux" sqlTabName="" table_alias_name="" uid="{837e19e0-6f11-45bb-8636-46775a954700}"/>
<RecordField colName="" fieldIdRef="67" name="descripcion_cuenta" sqlTabName="" table_alias_name="" uid="{22b9abe4-5dd7-4e65-9dc8-c8483aaad9bc}"/>
<RecordField colName="" defaultValue="1" fieldIdRef="68" name="moneda" sqlTabName="" table_alias_name="" uid="{28072654-ebbe-4fb6-b449-7e5d9a162bb0}"/>
<RecordField colName="" fieldIdRef="69" name="valorrd" sqlTabName="" table_alias_name="" uid="{e9141fd0-b3b9-472d-9205-50d59673c275}"/>
<RecordField colName="" fieldIdRef="70" name="tasa" sqlTabName="" table_alias_name="" uid="{b02c7437-47fe-48c7-af7b-c1a1939ad755}"/>
<RecordField colName="" fieldIdRef="71" name="cuenta_out" sqlTabName="" table_alias_name="" uid="{32a4052e-b473-48b6-b724-12aed7a43f88}"/>
<RecordField colName="" fieldIdRef="72" name="departamento_out" sqlTabName="" table_alias_name="" uid="{759e2be4-f8d0-457f-874a-43fbae5a06b6}"/>
<RecordField colName="" fieldIdRef="73" name="nombre_out" sqlTabName="" table_alias_name="" uid="{fc6d87c6-7fe3-453f-8fe7-42bc1ef3f05f}"/>
<RecordField colName="" fieldIdRef="74" name="num_emp_supervisor" sqlTabName="" table_alias_name="" uid="{aa382c09-48a7-4298-ac66-535a21a2455c}"/>
<RecordField colName="" fieldIdRef="75" name="nombre_super" sqlTabName="" table_alias_name="" uid="{84c5ff1f-1f23-4a99-88cc-87080807a3ba}"/>
<RecordField colName="" fieldIdRef="76" name="nivel_emp" sqlTabName="" table_alias_name="" uid="{00c17420-b5f8-4fb5-ab3c-104e116c0d8e}"/>
<RecordField fieldIdRef="8" name="fecha_suspension" uid="{2745f11b-199a-40f3-a254-572aa945d7e0}"/>
<RecordField fieldIdRef="77" name="codigo_retiro_bco" uid="{4aabc8f7-bd3b-4959-b98f-b19ec374ba67}"/>
<RecordField defaultValue="NO" fieldIdRef="78" name="retiro_comercial" uid="{90b270e5-7681-40b2-b54b-d74ec6fddd36}"/>
<RecordField fieldIdRef="79" name="estado_legal" uid="{a8ea96fa-dc1f-43d2-8b39-1f533c6c45e7}"/>
<RecordField defaultValue="SI" fieldIdRef="80" name="genera_file_bco" uid="{22e6b273-6354-4690-aceb-a6a6f0cf088e}"/>
<RecordField fieldIdRef="81" name="observacion" uid="{386331f5-b16d-47c4-b771-bba34d2695d6}"/>
<RecordField fieldIdRef="82" name="combobox1" uid="{f4f1f6e8-9dbc-41e6-bd16-22e62d72ec18}"/>
<RecordField defaultValue="CEDULA" fieldIdRef="83" name="tipo_documento" uid="{ff65f57a-feb3-41b3-a3d0-eda9db81de3f}"/>
<RecordField defaultValue="NO" fieldIdRef="84" name="gerentemarcas" uid="{893f39f1-feea-4ccf-8817-0973928269de}"/>
<RecordField fieldIdRef="85" name="alias" uid="{8b28d403-2cfa-4509-9024-d48ad2b14368}"/>
<RecordField defaultValue="NO" fieldIdRef="86" name="enviar_volante" uid="{4983a089-4097-4fb0-9d09-6a8c63a0e25e}"/>
<RecordField defaultValue="NO" fieldIdRef="87" name="enviar_encuesta" uid="{211240e2-5f56-4fd1-885e-3c15e421b9ec}"/>
<RecordField fieldIdRef="88" name="telefonoCorporativo" uid="{d81c8030-2426-4b8f-8a18-7a5252bdae11}"/>
<RecordField fieldIdRef="89" name="numeroOficina" uid="{4e05b2fc-d82a-4fab-972b-a364da855cfc}"/>
<RecordField fieldIdRef="90" name="extension" uid="{d6637114-3d62-4201-a5ed-08e8971c47bd}"/>
<RecordField colName="" fieldIdRef="91" name="email_corporativo" sqlTabName="" table_alias_name="" uid="{beb90f8a-330e-438a-9bda-44c361411505}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="s_comisiones" order="" uid="{2fd34cfe-7434-4588-9701-90230b646d4d}" where="">
<RecordField colName="" fieldIdRef="47" name="sec_vend" sqlTabName="" table_alias_name="" uid="{dc61578e-3442-4a67-a552-797118da9e81}"/>
<RecordField colName="" fieldIdRef="48" name="nombre_vend" sqlTabName="" table_alias_name="" uid="{9e620625-d063-405c-9d8a-ef723c6910b6}"/>
<RecordField colName="" fieldIdRef="49" name="porc_cobros" sqlTabName="" table_alias_name="" uid="{705695e0-9906-483a-8d75-f3dff325fb65}"/>
<RecordField colName="" fieldIdRef="50" name="porc_cobros_a" sqlTabName="" table_alias_name="" uid="{72d31938-3a8f-49ed-9ad5-fb94291aa89d}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="s_adicionales" order="" uid="{d4a05e54-66e4-432d-ae50-e1dfdfa37f00}" where="">
<RecordField colName="" fieldIdRef="51" name="sec_vend1" sqlTabName="" table_alias_name="" uid="{337b6444-84de-4ddd-a61a-15acba688cd5}"/>
<RecordField colName="" fieldIdRef="57" name="nombre_vend1" sqlTabName="" table_alias_name="" uid="{4d915661-7886-4e5a-9445-7c6df960bb70}"/>
<RecordField colName="" fieldIdRef="52" name="cod_n" sqlTabName="" table_alias_name="" uid="{9a965de9-1dad-457c-b36d-029c6edf5d8a}"/>
<RecordField colName="" fieldIdRef="53" name="descripcion" sqlTabName="" table_alias_name="" uid="{d91ca76d-d57d-4f97-8e61-5a48da9f6b8d}"/>
<RecordField colName="" fieldIdRef="54" name="porc_vendedor" sqlTabName="" table_alias_name="" uid="{7eedc394-7d47-40fa-a302-af3f8baa754d}"/>
<RecordField colName="" fieldIdRef="55" name="porc_supervisor" sqlTabName="" table_alias_name="" uid="{8a401a6b-c4e7-49cc-bcf3-be7b374a14f5}"/>
<RecordField colName="" fieldIdRef="56" name="porc_directo" sqlTabName="" table_alias_name="" uid="{2a8c5b53-4611-452b-8687-65472f2d7724}"/>
</Record>
<Record additionalTables="" name="s_herramientas" uid="{a1c2e3f4-0001-4a10-9b20-11aa22bb3301}">
<RecordField colName="" fieldIdRef="92" name="h_codigo" sqlTabName="" table_alias_name="" uid="{a1c2e3f4-0002-4a10-9b20-11aa22bb3302}"/>
<RecordField colName="" fieldIdRef="93" name="h_descripcion" sqlTabName="" table_alias_name="" uid="{a1c2e3f4-0003-4a10-9b20-11aa22bb3303}"/>
<RecordField colName="" fieldIdRef="94" name="h_fecha" sqlTabName="" table_alias_name="" uid="{a1c2e3f4-0004-4a10-9b20-11aa22bb3304}"/>
<RecordField colName="" fieldIdRef="95" name="h_documento" sqlTabName="" table_alias_name="" uid="{a1c2e3f4-0005-4a10-9b20-11aa22bb3305}"/>
<RecordField colName="" fieldIdRef="96" name="h_cantidad" sqlTabName="" table_alias_name="" uid="{a1c2e3f4-0006-4a10-9b20-11aa22bb3306}"/>
</Record>
<Form gridHeight="44" gridWidth="247" name="nofmmt003" style="basic" text="MAESTRA EMPLEADOS">
<ActionDefaultList name="ActionDefaultList1">
<ActionDefault name="busca_foto" text="Buscar Fotos"/>
</ActionDefaultList>
<ToolBar name="ToolBar1">
<ToolBarItem comment="Nuevo Empleado" image="new" name="nuevo" text="Empleados"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Empleado"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Folder gridHeight="43" gridWidth="246" name="Folder1" posX="1" posY="1">
<Page name="General" text="General">
<Grid gridHeight="40" gridWidth="116" name="Grid1" posX="0" posY="0">
<Group gridHeight="8" gridWidth="98" name="Group1" posX="1" posY="1" text="Empleados">
<Label posX="2" posY="1" text="Ficha No."/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="num_emp" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="7" name="adtb00003.num_emp" notNull="true" posX="14" posY="1" required="true" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="1" table_alias_name="" widget="Edit"/>
<FFImage aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoScale="true" colName="fotos" fieldId="2" gridHeight="5" gridWidth="23" name="fotos" posX="73" posY="1" sqlTabName="formonly" stretch="both" table_alias_name="" unitWidth="characters" widget="FFImage" width="17"/>
<Label gridHeight="1" gridWidth="10" name="Label42" posX="2" posY="2" text="Departamento"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="7" fieldType="NON_DATABASE" gridHeight="1" gridWidth="43" items="" length="1" name="departamento" posX="14" posY="2" sqlTabName="" sqlType="SMALLINT" tabIndex="2" table_alias_name="" widget="ComboBox"/>
<Label gridHeight="1" gridWidth="10" name="Label43" posX="2" posY="3" text="Puesto"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="9" fieldType="NON_DATABASE" gridHeight="1" gridWidth="43" items="" length="1" name="cod_puesto" posX="14" posY="3" sqlTabName="" sqlType="SMALLINT" tabIndex="3" table_alias_name="" widget="ComboBox"/>
<Button gridHeight="1" gridWidth="8" name="busca_foto" posX="62" posY="3" tabIndex="8"/>
<Label gridHeight="1" gridWidth="6" name="Label44" posX="2" posY="4" text="Nombre"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="nom1_emp" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="21" name="adtb00003.nom1_emp" posX="14" posY="4" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="4" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="nom2_emp" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="21" name="adtb00003.nom2_emp" posX="37" posY="4" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="9" name="Label45" posX="2" posY="5" text="Apellidos"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="apell1_emp" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="21" name="adtb00003.apell1_emp" posX="14" posY="5" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="6" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="apell2_emp" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="21" name="adtb00003.apell2_emp" posX="37" posY="5" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="7" table_alias_name="" widget="Edit"/>
<CheckBox defaultValue="NO" fieldId="84" gridHeight="1" gridWidth="11" name="gerentemarcas" posX="2" posY="6" tabIndex="-1" text="Gerente Marcas" title="checkbox1" valueChecked="SI" valueUnchecked="NO" widget="CheckBox"/>
<CheckBox defaultValue="NO" fieldId="86" gridHeight="1" gridWidth="11" name="enviar_volante" posX="20" posY="6" tabIndex="-1" text="Envia Volante" title="checkbox1" valueChecked="SI" valueUnchecked="NO" widget="CheckBox"/>
<CheckBox defaultValue="NO" fieldId="87" gridHeight="1" gridWidth="11" name="enviar_encuesta" posX="40" posY="6" tabIndex="-1" text="Envia Encuesta" title="checkbox1" valueChecked="SI" valueUnchecked="NO" widget="CheckBox"/>
</Group>
<Group gridHeight="23" gridWidth="45" name="Group3" posX="60" posY="9">
<Label gridHeight="1" gridWidth="13" justify="right" name="Label1" posX="4" posY="1" text="LOCALIDAD:"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="localidad" fieldId="1" gridHeight="1" gridWidth="19" items="" name="localidad" posX="18" posY="1" sqlTabName="formonly" tabIndex="28" table_alias_name="" widget="ComboBox"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label2" posX="4" posY="2" text="STATUS:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip_st" fieldId="5" gridHeight="1" gridWidth="13" name="descrip_st" posX="18" posY="2" sqlTabName="formonly" tabIndex="29" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label3" posX="4" posY="3" text="Casa No:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="casa_num" fieldId="17" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="adtb00003.casa_num" posX="18" posY="3" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="30" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label4" posX="4" posY="4" text="Credito"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="credito" fieldId="0" gridHeight="1" gridWidth="5" include="SI|NO" items="SI, NO" name="credito" posX="18" posY="4" sqlTabName="formonly" tabIndex="31" table_alias_name="" widget="ComboBox">
<Item name="SI" text="SI"/>
<Item name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label5" posX="4" posY="5" text="Licencia"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="licencia" fieldId="25" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="adtb00003.licencia" posX="18" posY="5" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="32" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label6" posX="4" posY="6" text="Sexo"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="p_sexo" comment="Digite M Para SEXO MASCULINO y F Para FEMENINO" fieldId="34" gridHeight="1" gridWidth="2" include="M|F" name="p_sexo" posX="18" posY="6" sqlTabName="formonly" sqlType="CHAR" tabIndex="33" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="tipo_sexo" fieldId="35" gridHeight="1" gridWidth="13" name="tipo_sexo" noEntry="true" posX="21" posY="6" sqlTabName="formonly" tabIndex="34" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label7" posX="4" posY="7" text="Poncha"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_seg3" comment="1- CONTROL ASISTENCIA 0- NO CONTROL" defaultValue="1" fieldId="38" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="5" include="1|0" items="1, 0" name="adtb00003.cod_seg3" posX="18" posY="7" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="35" table_alias_name="" widget="ComboBox">
<Item name="1" text="1"/>
<Item name="0" text="0"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label8" posX="4" posY="8" text="Sueldo"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="sueldo_ac" fieldId="30" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="adtb00003.sueldo_ac" posX="18" posY="8" precisionDecimal="10" scaleDecimal="2" sqlTabName="adtb00003" sqlType="DECIMAL" tabIndex="36" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="69" gridHeight="1" gridWidth="12" name="valorrd" posX="30" posY="8" sqlTabName="" tabIndex="68" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label20" posX="4" posY="9" text="Moneda"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="1" fieldId="68" gridHeight="1" gridWidth="18" items="RD$, USD$" name="moneda" posX="18" posY="9" sqlTabName="" tabIndex="67" table_alias_name="" title="Edit1" widget="ComboBox">
<Item lstrtext="false" name="1" text="RD$"/>
<Item lstrtext="false" name="2" text="USD$"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label21" posX="4" posY="10" text="Tasa"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="70" gridHeight="1" gridWidth="11" name="tasa" posX="18" posY="10" sqlTabName="" tabIndex="69" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label9" posX="4" posY="11" text="F.Salida"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_salida" fieldId="3" format="dd/mm/yyyy" gridHeight="1" gridWidth="11" name="fecha_salida" posX="18" posY="11" sqlTabName="formonly" sqlType="DATE" tabIndex="37" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label13" posX="4" posY="12" text="Tipo Cuenta"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="1" fieldId="60" gridHeight="1" gridWidth="19" items="CUENTA CORRIENTE, CUENTA AHORRO" name="tipocuenta" posX="18" posY="12" sqlTabName="" tabIndex="59" table_alias_name="" title="Edit1" widget="ComboBox">
<Item lstrtext="false" name="1" text="CUENTA CORRIENTE"/>
<Item lstrtext="false" name="2" text="CUENTA AHORRO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label14" posX="4" posY="13" text="Banco"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="10101070" fieldId="61" gridHeight="1" gridWidth="19" items="BANCO POPULAR, BANCO RESERVAS" name="codbancodestino" posX="18" posY="13" sqlTabName="" tabIndex="60" table_alias_name="" title="Edit1" widget="ComboBox">
<Item lstrtext="false" name="10101070" text="BANCO POPULAR"/>
<Item lstrtext="false" name="10101010" text="BANCO RESERVAS"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label15" posX="4" posY="14" text="Digito Ver Banco"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="62" gridHeight="1" gridWidth="19" items="BANCO POPULAR, BANCO RESERVAS" name="digiverbancodestino" posX="18" posY="14" sqlTabName="" tabIndex="61" table_alias_name="" title="Edit1" widget="ComboBox">
<Item lstrtext="false" name="8" text="BANCO POPULAR"/>
<Item lstrtext="true" name="6" text="BANCO RESERVAS"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label10" posX="4" posY="15" text="Cuenta_no"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cuenta_no" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="adtb00003.cuenta_no" posX="18" posY="15" sqlTabName="adtb00003" sqlType="VARCHAR" tabIndex="38" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="label50" posX="4" posY="16" text="Genera File Banco"/>
<ComboBox defaultValue="SI" fieldId="80" gridHeight="1" gridWidth="11" items="SI, NO" name="genera_file_bco" posX="18" posY="16" tabIndex="-1" title="combobox1" widget="ComboBox">
<Item lstrtext="false" name="SI" text="SI"/>
<Item lstrtext="false" name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label11" posX="4" posY="17" text="Fecha Aumento"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_salida" fieldId="45" format="dd/mm/yyyy" gridHeight="1" gridWidth="11" name="fecha_ultimo_aumento" posX="18" posY="17" sqlTabName="formonly" sqlType="DATE" tabIndex="44" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="label46" posX="4" posY="18" text="Fecha Suspension"/>
<Edit fieldId="8" gridHeight="1" gridWidth="11" name="fecha_suspension" posX="18" posY="18" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="label47" posX="4" posY="19" text="Codigo RETIRO"/>
<Edit fieldId="77" gridHeight="1" gridWidth="11" name="codigo_retiro_bco" noEntry="true" posX="18" posY="19" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label comment="Adiciona este empleado en el file Retiro Comercial" gridHeight="1" gridWidth="13" justify="right" name="label48" posX="4" posY="20" text="Retiro Comercial"/>
<ComboBox defaultValue="NO" fieldId="78" gridHeight="1" gridWidth="11" items="NO, SI" name="retiro_comercial" posX="18" posY="20" tabIndex="-1" title="edit1" widget="ComboBox">
<Item lstrtext="false" name="NO" text="NO"/>
<Item lstrtext="false" name="SI" text="SI"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" justify="right" name="label49" posX="4" posY="21" text="Estado Legal"/>
<ComboBox fieldId="79" gridHeight="1" gridWidth="20" items="ACTIVO, FASE, FASE-ACTIVO" name="estado_legal" posX="18" posY="21" tabIndex="-1" title="combobox1" widget="ComboBox">
<Item lstrtext="false" name="ACTIVO" text="ACTIVO"/>
<Item lstrtext="false" name="FASE" text="FASE"/>
<Item lstrtext="false" name="FASE-ACTIVO" text="FASE-ACTIVO"/>
</ComboBox>
</Group>
<Group gridHeight="24" gridWidth="59" name="Group2" posX="1" posY="10" text="Generales">
<Label gridHeight="1" gridWidth="10" name="Label25" posX="1" posY="1" text="Nivel Educacion"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="76" gridHeight="1" gridWidth="30" items="" name="nivel_emp" posX="14" posY="1" sqlTabName="" tabIndex="75" table_alias_name="" title="Edit1" widget="ComboBox"/>
<Label gridHeight="1" gridWidth="10" name="label37" posX="45" posY="1" text="Alias"/>
<Label gridHeight="1" gridWidth="6" name="Label39" posX="1" posY="2" text="Puesto"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nom_puesto" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="adtb00004.nom_puesto" noEntry="true" posX="14" posY="2" sqlTabName="adtb00004" sqlType="CHAR" tabIndex="9" table_alias_name="" widget="Edit"/>
<Edit case="upper" fieldId="85" gridHeight="1" gridWidth="10" name="alias" posX="45" posY="2" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="6" name="Label40" posX="1" posY="3" text="Depto."/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nom_dpto" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="adtb00001.nom_dpto" noEntry="true" posX="14" posY="3" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="10" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="5" hidden="true" name="Label33" posX="45" posY="3" text="Serie"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="serie" comment="Digite la serie del empleado" fieldId="21" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" hidden="true" name="adtb00003.serie" posX="51" posY="3" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="15" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label24" posX="1" posY="4" text="Supervisor"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="74" gridHeight="1" gridWidth="10" name="num_emp_supervisor" posX="14" posY="4" sqlTabName="" tabIndex="73" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="75" gridHeight="1" gridWidth="19" name="nombre_super" posX="25" posY="4" scroll="true" sqlTabName="" tabIndex="74" table_alias_name="" title="Edit2" widget="Edit"/>
<Label gridHeight="1" gridWidth="4" name="Label38" posX="1" posY="5" text="Dir."/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="calle" fieldId="16" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="26" name="adtb00003.calle" posX="14" posY="5" scroll="true" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="11" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="12" name="Label36" posX="1" posY="6" text="Urbanizacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="barrio" fieldId="18" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="15" name="adtb00003.barrio" posX="14" posY="6" scroll="true" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="12" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="urbanizacion" fieldId="19" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="10" name="adtb00003.urbanizacion" posX="43" posY="6" scroll="true" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="13" table_alias_name="" widget="Edit"/>
<ComboBox defaultValue="CEDULA" fieldId="83" gridHeight="1" gridWidth="12" items="CEDULA, PASAPORTE" name="tipo_documento" posX="1" posY="7" tabIndex="-1" title="combobox2" widget="ComboBox">
<Item lstrtext="false" name="CEDULA" text="CEDULA"/>
<Item lstrtext="false" name="PASAPORTE" text="PASAPORTE"/>
</ComboBox>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="false" comment="Digite la cedula del empleado en formato 99999999999" fieldId="20" fieldType="NON_DATABASE" gridHeight="1" gridWidth="11" length="11" name="cedula" posX="14" posY="7" sqlType="CHAR" tabIndex="14" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="14" name="Label34" posX="29" posY="7" text="Fecha de Naci."/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_nac" comment="Digite la fecha de nacimiento del empleado" fieldId="22" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="adtb00003.fech_nac" posX="44" posY="7" sqlTabName="adtb00003" sqlType="DATE" tabIndex="17" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="8" name="Label35" posX="1" posY="8" text="Telefono"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="telefono" fieldId="26" format="(###)###-####" gridHeight="1" gridWidth="13" name="telefono" posX="14" posY="8" scroll="true" sqlTabName="formonly" tabIndex="16" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="11" name="label54" posX="29" posY="8" text="Num. Oficina"/>
<Edit fieldId="89" format="(###)###-####" gridHeight="1" gridWidth="13" name="numeroOficina" posX="41" posY="8" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="12" name="label53" posX="1" posY="9" text="Tel. Corporativo (flota)"/>
<Edit fieldId="88" format="(###)###-####" gridHeight="1" gridWidth="13" name="telefonoCorporativo" posX="14" posY="9" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="7" name="label55" posX="30" posY="9" text="Extension"/>
<Edit fieldId="90" format="####" gridHeight="1" gridWidth="9" name="extension" posX="43" posY="9" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="12" name="Label32" posX="1" posY="10" text="Nacionalidad"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="cod_nac" comment="Digite la nacionalidad del empleado" fieldId="23" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="adtb00003.cod_nac" posX="14" posY="10" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="18" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nom_nac" fieldId="24" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="27" name="adtb00007.nom_nac" noEntry="true" posX="19" posY="10" sqlTabName="adtb00007" sqlType="CHAR" tabIndex="19" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="12" name="Label28" posX="1" posY="11" text="Estado Civil"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="estado_civil" comment="Digite S = Soltero, C = Casado" fieldId="27" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="13" include="S|C" items="CASADO, SOLTERO, DIVORCIADO, UNION LIBRE" name="adtb00003.estado_civil" posX="14" posY="11" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="20" table_alias_name="" widget="ComboBox">
<Item lstrtext="false" name="C" text="CASADO"/>
<Item lstrtext="false" name="S" text="SOLTERO"/>
<Item lstrtext="false" name="D" text="DIVORCIADO"/>
<Item lstrtext="false" name="U" text="UNION LIBRE"/>
</ComboBox>
<Label gridHeight="1" gridWidth="14" name="Label27" posX="28" posY="11" text="Tipo de Sangre"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="tipo_sangre" comment="Digite el tipo de sangre del empleado" fieldId="29" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="adtb00003.tipo_sangre" posX="43" posY="11" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="21" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="6" name="Label29" posX="1" posY="12" text="Nomina"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="nomina" comment="Digite Q = Quincenal, S = Semanal, V = Vendedor J-Jornales" fieldId="31" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" include="Q|S|V|J" name="adtb00003.nomina" posX="8" posY="12" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="22" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip" fieldId="32" gridHeight="1" gridWidth="13" name="descrip" noEntry="true" posX="14" posY="12" sqlTabName="formonly" tabIndex="23" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" name="Label41" posX="28" posY="12" text="Fecha Entrada"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_efec" fieldId="33" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="adtb00003.fech_efec" posX="43" posY="12" sqlTabName="adtb00003" sqlType="DATE" tabIndex="24" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="11" name="Label30" posX="1" posY="13" text="Paga Seguro"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="paga_seg" comment="Digite S si el empleado paga SEGURO, N en caso contario" fieldId="39" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" include="S|N" name="adtb00003.paga_seg" posX="14" posY="13" required="true" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="25" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label26" posX="28" posY="13" text="Codigo TSS"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_seg1" fieldId="36" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="10" name="adtb00003.cod_seg1" posX="43" posY="13" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="26" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_seg2" fieldId="37" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="adtb00003.cod_seg2" posX="55" posY="13" sqlTabName="adtb00003" sqlType="SMALLINT" tabIndex="27" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label31" posX="1" posY="14" text="Supervisor"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="46" gridHeight="1" gridWidth="10" name="sec_vend_sup" posX="14" posY="14" sqlTabName="" tabIndex="45" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label52" posX="28" posY="14" text="Horario"/>
<ComboBox fieldId="82" gridHeight="1" gridWidth="10" items="" name="combobox1" posX="43" posY="14" required="true" tabIndex="-1" title="combobox1" widget="ComboBox"/>
<Label gridHeight="1" gridWidth="10" name="Label16" posX="1" posY="15" text="Tipo Sueldo"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="FIJO" fieldId="63" gridHeight="1" gridWidth="21" items="FIJO, VARIABLE" name="tipo_sueldo" posX="14" posY="15" sqlTabName="" tabIndex="62" table_alias_name="" title="ComboBox1" widget="ComboBox">
<Item lstrtext="false" name="FIJO" text="FIJO"/>
<Item lstrtext="false" name="VARIABLE" text="VARIABLE"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="Label17" posX="1" posY="16" text="Email"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="lower" colName="" fieldId="64" gridHeight="1" gridWidth="21" name="email" posX="14" posY="16" scroll="true" sqlTabName="" tabIndex="63" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label19" posX="36" posY="16" text="Cuenta Finanzas"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="66" gridHeight="1" gridWidth="10" name="cuenta_aux" posX="47" posY="16" sqlTabName="" tabIndex="65" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label56" posX="1" posY="17" text="Email Corporativo"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="lower" colName="" fieldId="91" gridHeight="1" gridWidth="21" name="email_corporativo" posX="14" posY="17" scroll="true" sqlTabName="" tabIndex="-1" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="67" gridHeight="1" gridWidth="20" name="descripcion_cuenta" posX="37" posY="17" scroll="true" sqlTabName="" tabIndex="66" table_alias_name="" title="Edit2" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label18" posX="1" posY="18" text="Instalador"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="NO" fieldId="65" gridHeight="1" gridWidth="10" items="SI, NO" name="instalador" posX="14" posY="18" sqlTabName="" tabIndex="64" table_alias_name="" title="ComboBox1" widget="ComboBox">
<Item lstrtext="false" name="SI" text="SI"/>
<Item lstrtext="false" name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="Label22" posX="1" posY="19" text="Codigo E/S"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" comment="Digite codigo sistema control entrada / salida empleado" fieldId="71" gridHeight="1" gridWidth="10" name="cuenta_out" posX="14" posY="19" sqlTabName="" tabIndex="70" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label23" posX="1" posY="20" text="Depto"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" comment="Departamento Sistema E/S" fieldId="72" gridHeight="1" gridWidth="10" name="departamento_out" posX="14" posY="20" sqlTabName="" tabIndex="71" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="73" gridHeight="1" gridWidth="29" name="nombre_out" posX="27" posY="20" sqlTabName="" tabIndex="72" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label51" posX="1" posY="21" text="Observaciones"/>
<Edit fieldId="81" gridHeight="1" gridWidth="42" name="observacion" posX="14" posY="21" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
</Group>
<Group gridHeight="4" gridWidth="98" name="Group4" posX="1" posY="35">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" fieldId="40" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="adtb00003.status_t" noEntry="true" posX="3" posY="1" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="39" table_alias_name="" widget="Edit"/>
<Label posX="5" posY="1" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" fieldId="41" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="adtb00003.us_crea" noEntry="true" posX="22" posY="1" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="40" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="1" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" fieldId="43" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="adtb00003.us_mod" noEntry="true" posX="60" posY="1" sqlTabName="adtb00003" sqlType="CHAR" tabIndex="41" table_alias_name="" widget="Edit"/>
<Label posX="5" posY="2" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" fieldId="42" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="adtb00003.fech_crea" noEntry="true" posX="22" posY="2" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="adtb00003" sqlType="DATETIME" tabIndex="42" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="2" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" fieldId="44" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="adtb00003.fech_mod" noEntry="true" posX="60" posY="2" qual1="YEAR" qualFraction="FRACTION(3)" sqlTabName="adtb00003" sqlType="DATETIME" tabIndex="43" table_alias_name="" widget="Edit"/>
</Group>
</Grid>
</Page>
<Page hidden="true" name="Page2" text="Comisiones">
<VBox gridHeight="29" gridWidth="138" name="VBox1" posX="1" posY="1">
<Grid gridHeight="27" gridWidth="138" name="Grid2" posX="0" posY="1">
<Group gridHeight="11" gridWidth="126" name="Group5" posX="2" posY="1" text="Comisiones Generales">
<Label gridHeight="1" gridWidth="10" name="Label12" posX="3" posY="1" text="SUPERVISOR"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="58" gridHeight="1" gridWidth="6" name="sec_vend_supervisor" posX="15" posY="1" sqlTabName="" tabIndex="57" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="59" gridHeight="1" gridWidth="73" name="nombre_supervisor" posX="22" posY="1" sqlTabName="" tabIndex="58" table_alias_name="" title="Edit2" widget="Edit"/>
<Table gridHeight="7" gridWidth="96" name="Table1" posX="2" posY="3" totalRows="5">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="47" gridHeight="1" gridWidth="11" name="sec_vend" posX="0" posY="0" sqlTabName="" tabIndex="46" table_alias_name="" title="Vendedor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="48" gridHeight="1" gridWidth="50" name="nombre_vend" noEntry="true" posX="11" posY="0" sqlTabName="" tabIndex="47" table_alias_name="" title="Nombre" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="49" gridHeight="1" gridWidth="15" name="porc_cobros" posX="61" posY="0" sqlTabName="" tabIndex="48" table_alias_name="" title="Porciento Supervisor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="50" gridHeight="1" gridWidth="15" name="porc_cobros_a" posX="76" posY="0" sqlTabName="" tabIndex="49" table_alias_name="" title="Porciento" widget="Edit"/>
</Table>
</Group>
<Group gridHeight="14" gridWidth="131" name="Group6" posX="2" posY="13" text="Comisiones por productos">
<Table gridHeight="6" gridWidth="119" name="Table2" posX="4" posY="2" totalRows="5">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="51" gridHeight="1" gridWidth="8" name="sec_vend1" posX="0" posY="0" sqlTabName="" tabIndex="50" table_alias_name="" title="Codigo Vendedor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="57" gridHeight="1" gridWidth="20" name="nombre_vend1" noEntry="true" posX="8" posY="0" scroll="true" sqlTabName="" tabIndex="56" table_alias_name="" title="Nombre" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="52" gridHeight="1" gridWidth="10" name="cod_n" posX="28" posY="0" sqlTabName="" tabIndex="51" table_alias_name="" title="Clase" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="53" gridHeight="1" gridWidth="25" name="descripcion" noEntry="true" posX="38" posY="0" scroll="true" sqlTabName="" tabIndex="52" table_alias_name="" title="Descripcion" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="54" gridHeight="1" gridWidth="16" name="porc_vendedor" posX="63" posY="0" sqlTabName="" tabIndex="53" table_alias_name="" title="Porciento Vendedor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="55" gridHeight="1" gridWidth="16" name="porc_supervisor" posX="79" posY="0" sqlTabName="" tabIndex="54" table_alias_name="" title="Porciento Supervisor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="56" gridHeight="1" gridWidth="16" name="porc_directo" posX="95" posY="0" sqlTabName="" tabIndex="55" table_alias_name="" title="Porciento Directo" widget="Edit"/>
</Table>
</Group>
</Grid>
</VBox>
</Page>
<Page name="page1" text="Herramientas">
<Grid gridHeight="20" gridWidth="116" name="GridHerr" posX="0" posY="0">
<Group gridHeight="18" gridWidth="98" name="GroupHerr" posX="1" posY="1" text="Herramientas asignadas">
<Table gridHeight="15" gridWidth="94" name="TableHerr" posX="2" posY="1" totalRows="12">
<Edit fieldId="92" gridHeight="1" gridWidth="12" name="h_codigo" noEntry="true" posX="0" posY="0" tabIndex="" title="Codigo" widget="Edit"/>
<Edit fieldId="93" gridHeight="1" gridWidth="40" name="h_descripcion" noEntry="true" posX="12" posY="0" scroll="true" tabIndex="" title="Descripcion" widget="Edit"/>
<Edit fieldId="94" gridHeight="1" gridWidth="12" name="h_fecha" noEntry="true" posX="52" posY="0" tabIndex="" title="Fecha" widget="Edit"/>
<Edit fieldId="95" gridHeight="1" gridWidth="14" name="h_documento" noEntry="true" posX="64" posY="0" scroll="true" tabIndex="" title="Documento" widget="Edit"/>
<Edit fieldId="96" gridHeight="1" gridWidth="10" name="h_cantidad" noEntry="true" posX="78" posY="0" tabIndex="" title="Cantidad" widget="Edit"/>
</Table>
</Group>
</Grid>
</Page>
</Folder>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA0ADkAMABjADgAYwA1AGMALQBiADMAMwAwAC0ANAAzAGIAZAAtAGEAYQA1ADkALQBhADMAOAA2ADAAMQAxADkAYQBlADkAMQB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewBhADEAYwAyAGUAMwBmADQALQAwADAAMAAxAC0ANABhADEAMAAtADkAYgAyADAALQAxADEAYQBhADIAMgBiAGIAMwAzADAAMQB9QEQAAA8AAAJARAAADwAAAgAAAAAAAAAAAQAAAEwAewAyAGYAZAAzADQAYwBmAGUALQA3ADQAMwA0AC0ANAA1ADgAOAAtADkANwAwADEALQA5ADAAMgAzADAAYgA2ADQANgBkADQAZAB9QCAAAJgAArtAIAAAmAACuz90euFHrhR7AQAAAEwAewBkADQAYQAwADUAZQA1ADQALQA2ADYAZQA0AC0ANAAzADIAZAAtAGEAZQA1ADAALQBlADEAZABmAGQAZgBhADMANwBmADAAMAB9QFIAAKsAAxJANzM0D5mdkT94k3S8an76AQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt003.~per
+86
View File
@@ -0,0 +1,86 @@
{
----------------------------------------------------------------------------
FORMULARIO : NOFMMT003
OBJETIVO : Pantalla para actualizar las informaciones comunes de
la accion de personal y la maestra de empleados.
Es utilizada por: ADPRMT022
PROGRAMADOR : JUAN SOTO
FECHA REALIZACION : FEBRERO 18, 1998.
----------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Ficha No.[f000]-[f001]-[f2]-[f3 ]
Nombre [n ][n1 ]
Apellidos[a1 ][a2 ]
Puesto[l ] STATUS:[s1 ]
Depto.[m ]
Dir.[f004 ] [f005] [f006 ] [f007 ]
Ced [f010 ]Serie [f011 ]Fecha Aumento Sexo[x][ tx ]
Telefono [f008 ] Fecha de Nacimiento [p ]
Nacionalidad[p1] [p2 ] Licencia [m1 ]
Estado Civil[a] [c ] Tipo de Sangre [f03] Sueldo [s ]
Nomina[d] [d1 ] Fecha de Entrada [fe ]F.Salida[fs ]
Paga Seguro [z] Codigo TSS[c1 ][c2][c3 ]Cuenta_no[cta ]
[k]Usuario Creador [f11 ] Usuario Modificador[f13 ]
Fecha Creacion [f12 ] Fecha Creacion [f14 ]
}
end
tables
adtb00007,adtb00003,
adtb00001,adtb00004
attributes
fs = formonly.fecha_salida type date,format = "dd/mm/yyyy";
cta = adtb00003.cuenta_no;
s1 = formonly.descrip_st;
f000 = adtb00003.num_emp;
f001 = adtb00003.departamento;
f2 = adtb00003.nivel_emp;
f3 = adtb00003.cod_puesto;
n = adtb00003.nom1_emp,upshift;
n1 = adtb00003.nom2_emp,upshift;
a1 = adtb00003.apell1_emp,upshift;
a2 = adtb00003.apell2_emp,upshift;
l = adtb00004.nom_puesto,noentry;
m = adtb00001.nom_dpto,noentry;
f004 = adtb00003.calle,upshift;
f005 = adtb00003.casa_num,upshift;
f006 = adtb00003.barrio,upshift;
f007 = adtb00003.urbanizacion,upshift;
f010 = adtb00003.cedula,autonext,comments = "Digite la cedula del empleado";
f011 = adtb00003.serie,autonext,comments = "Digite la serie del empleado";
p = adtb00003.fech_nac,format = "dd/mm/yyyy",
comments = "Digite la fecha de nacimiento del empleado";
p1 = adtb00003.cod_nac,autonext,
comments = "Digite la nacionalidad del empleado";
p2 = adtb00007.nom_nac,noentry;
m1 = adtb00003.licencia;
f008 = adtb00003.telefono,upshift,picture="###-####";
a = adtb00003.estado_civil,upshift,include = ("S", "C"),
comments = "Digite S = Soltero, C = Casado";
c = formonly.descr,noentry;
f03 = adtb00003.tipo_sangre,
comments = "Digite el tipo de sangre del empleado";
s = adtb00003.sueldo_ac;
d = adtb00003.nomina, upshift,include = ("Q", "S", "V","J"),
comments = "Digite Q = Quincenal, S = Semanal, V = Vendedor J-Jornales";
d1 = formonly.descrip,noentry;
fe = adtb00003.fech_efec,format = "dd/mm/yyyy";
x = formonly.p_sexo type char,upshift,include= ("M","F"),comments =
"Digite M Para SEXO MASCULINO y F Para FEMENINO";
tx = formonly.tipo_sexo,noentry;
c1 = adtb00003.cod_seg1;
c2 = adtb00003.cod_seg2;
c3 = adtb00003.cod_seg3;
z = adtb00003.paga_seg,include=("S","N"),required,upshift,comments=
"Digite S si el empleado paga SEGURO, N en caso contario";
k = adtb00003.status_t,noentry;
f11 = adtb00003.us_crea,noentry;
f12 = adtb00003.fech_crea,noentry;
f13 = adtb00003.us_mod,noentry;
f14 = adtb00003.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt005.per
+35
View File
@@ -0,0 +1,35 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT005
OBJETIVO : Pantalla que captura los valores de pago de impues-
to dependiendo del salario.
PROGRAMADOR : Tadeo A. Ferreras
PROGRAMA Q. LO USA: NOPRMT005
FECHA REALIZACION : Agosto 23, 1993
------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Hasta el Salario Mensual [f0 ]
La Rentencion Mensual es [f1 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00005
attributes
f0 = notb00005.salario,comments =
"Digite el salario mensual al cual se le aplicara impuesto";
f1 = notb00005.valor,comments =
"Digite el salario mensual al cual se le aplicara impuesto";
j = notb00005.status_t,noentry;
f007 = notb00005.us_crea,noentry;
f008 = notb00005.fech_crea,noentry;
f009 = notb00005.us_mod,noentry;
f010 = notb00005.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt006.per
+47
View File
@@ -0,0 +1,47 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT006
OBJETIVO : Pantalla que captura los valores de pago de seguro
al IDSS dependiendo del salario.
PROGRAMADOR : Tadeo A. Ferreras
PROGRAMA Q. LO USA: NOPRMT006
FECHA REALIZACION : Agosto 23, 1993
MODIFICADO POR : Abner Montalvo
OBJETIVO : Ajustar formulario segun nueva estructura de la tabla
NOTB00006
FECHA REALIZACION : Abril 22, 1997
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Hasta el Salario Semanal [g0 ]
Hasta el Salario Mensual [f0 ]
El Aporte Trabajador es [f1 ]
EL Aporte Patrono es [f2 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00006
attributes
g0 = formonly.salario_sem type decimal,comments =
"Digite el salario semanal al cual se le aplicara impuesto";
f0 = formonly.salario_men type decimal,comments =
"Digite el salario mensual al cual se le aplicara impuesto";
f1 = notb00006.porc_emp,comments =
"Digite el monto del seguro por empleado aplicado a dicho salario";
f2 = notb00006.porc_pat,comments =
"Digite el aporte del patron aplicado a dicho salario";
j = notb00006.status_t,noentry;
f007 = notb00006.us_crea,noentry;
f008 = notb00006.fech_crea,noentry;
f009 = notb00006.us_mod,noentry;
f010 = notb00006.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt007.4fd
+81
View File
@@ -0,0 +1,81 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{ba04829e-0b62-458a-99d4-e7bd76ac7c32}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{49289c8f-f09b-400d-9f9c-08dcb0cae3cc}" where="">
<RecordField colName="num_nomi" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00007.num_nomi" sqlTabName="notb00007" sqlType="SMALLINT" table_alias_name="" uid="{a1f75a18-8e56-44a7-a732-4cf4352915ae}"/>
<RecordField colName="tipo_emp" defaultValue="Q" fieldIdRef="1" name="tipo_emp" sqlTabName="formonly" table_alias_name="" uid="{8ea2eb62-33dd-4996-b67e-d1c9e39b4a81}"/>
<RecordField colName="descr" fieldIdRef="2" name="descr" sqlTabName="formonly" table_alias_name="" uid="{762b95a9-2d57-475c-a1e1-0e89661f32fa}"/>
<RecordField colName="veces" fieldIdRef="16" name="veces" sqlTabName="formonly" table_alias_name="" uid="{b37634ed-55d2-4829-ae9d-1d52eb4f87b6}"/>
<RecordField colName="fecha_del" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00010.fecha_del" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{eca197fd-ef15-4066-95ae-aa2b82db8f3a}"/>
<RecordField colName="fecha_al" fieldIdRef="4" fieldType="TABLE_COLUMN" name="notb00010.fecha_al" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{e10180e1-a29c-442c-b551-315ba651b7a5}"/>
<RecordField colName="cod_mov" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00007.cod_mov" sqlTabName="notb00007" sqlType="SMALLINT" table_alias_name="" uid="{78b4537b-c93f-4ad9-a269-e4dd838f782e}"/>
<RecordField colName="descrip_mov" fieldIdRef="11" fieldType="TABLE_COLUMN" name="notb00002.descrip_mov" sqlTabName="notb00002" sqlType="CHAR" table_alias_name="" uid="{1b9152cf-3668-483d-85cb-0ca87f64d52f}"/>
<RecordField colName="total1" fieldIdRef="14" name="total1" sqlTabName="formonly" table_alias_name="" uid="{63bd1f08-f52e-41a7-afa6-9cf21e176050}"/>
<RecordField colName="total2" fieldIdRef="15" name="total2" sqlTabName="formonly" table_alias_name="" uid="{60623081-4719-4b02-8b72-49c34a6f06b3}"/>
<RecordField fieldIdRef="6" name="titulo_dep_act" uid="{27df554a-ff96-44a4-881e-77687da9cfdf}"/>
<RecordField fieldIdRef="7" name="titulo_dep_afecta" uid="{e01e0b2d-8cf5-40a2-8a20-e7d8ffa92b92}"/>
</Record>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="consart" order="" uid="{93bcc7d6-96ae-4ab5-b2f7-564f2aea979e}" where="">
<RecordField colName="" fieldIdRef="17" name="num_emp" sqlTabName="" table_alias_name="" uid="{7c1c20da-855d-443e-a794-7f00b0c95aed}"/>
<RecordField colName="" fieldIdRef="18" name="departamento" sqlTabName="" table_alias_name="" uid="{07697486-7736-4e6f-923b-cc7471dcfe14}"/>
<RecordField fieldIdRef="8" name="departamento_afecta" uid="{fd2df48a-2c3e-42ab-93cb-d07058d6c007}"/>
<RecordField colName="" fieldIdRef="19" name="nivel_emp" sqlTabName="" table_alias_name="" uid="{47b24bcc-17c6-451e-a8a4-0270cb5b472f}"/>
<RecordField colName="" fieldIdRef="20" name="cod_puesto" sqlTabName="" table_alias_name="" uid="{42cf88da-e567-49c7-972a-0b30895b130b}"/>
<RecordField colName="" fieldIdRef="21" name="descrip1" sqlTabName="" table_alias_name="" uid="{c8cbd45b-c4d9-4ea1-8c44-baae99f76120}"/>
<RecordField colName="" fieldIdRef="22" name="cantidad" sqlTabName="" table_alias_name="" uid="{2f98d49e-d63f-4c2d-9ed3-9f04db617848}"/>
<RecordField colName="" fieldIdRef="23" name="valor" sqlTabName="" table_alias_name="" uid="{2152a7ab-3300-43fc-8171-9871507a1ff3}"/>
<RecordField colName="" fieldIdRef="24" name="num_trx" sqlTabName="" table_alias_name="" uid="{33fc7b06-8f85-47d4-b384-7c0c6250e566}"/>
<RecordField fieldIdRef="5" name="sueldo_act" uid="{f99891ce-ff1d-4339-bdf2-d4d21854c670}"/>
</Record>
<Form gridHeight="23" gridWidth="110" name="nofmmt007" style="basic" text="MAESTRA NOVEDADES NOMINAS">
<Grid gridHeight="20" gridWidth="105" name="Grid1" posX="4" posY="1">
<Group gridHeight="6" gridWidth="91" name="Group1" posX="2" posY="1" text="Encabezado">
<Label posX="2" posY="1" text="Numero de Nomina"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_nomi" comment="Digite el numero de la nomina" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00007.num_nomi" posX="21" posY="1" sqlTabName="notb00007" sqlType="SMALLINT" tabIndex="1" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="2" text="Tipo de Empleado"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="tipo_emp" comment="Digite Q- Quincenal, S- Semanal, V- Vendedor, J-Jornales" defaultValue="Q" fieldId="1" gridHeight="1" gridWidth="1" include="Q|S|J|V" items="Q, S, J, V" name="tipo_emp" posX="21" posY="2" sqlTabName="formonly" tabIndex="2" table_alias_name="" widget="ComboBox">
<Item name="Q" text="Q"/>
<Item name="S" text="S"/>
<Item name="J" text="J"/>
<Item name="V" text="V"/>
</ComboBox>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descr" fieldId="2" gridHeight="1" gridWidth="9" name="descr" noEntry="true" posX="24" posY="2" sqlTabName="formonly" tabIndex="3" table_alias_name="" widget="Edit"/>
<Label posX="38" posY="2" text="Veces a Cobrar"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="veces" comment="Digite veces a cobrar una novedad, si es una sola vez deje en blanco" fieldId="16" gridHeight="1" gridWidth="3" name="veces" posX="54" posY="2" sqlTabName="formonly" tabIndex="4" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="3" text="Fecha Inicial"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_del" fieldId="3" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="12" name="notb00010.fecha_del" noEntry="true" posX="21" posY="3" sqlTabName="notb00010" sqlType="DATE" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="3" text="Fecha Final"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_al" fieldId="4" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="notb00010.fecha_al" noEntry="true" posX="54" posY="3" sqlTabName="notb00010" sqlType="DATE" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="4" text="Codigo Movimientos"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_mov" comment="Digite el movimiento" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00007.cod_mov" posX="21" posY="4" sqlTabName="notb00007" sqlType="SMALLINT" tabIndex="7" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="descrip_mov" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="37" name="notb00002.descrip_mov" noEntry="true" posX="27" posY="4" sqlTabName="notb00002" sqlType="CHAR" tabIndex="8" table_alias_name="" widget="Edit"/>
</Group>
<Group gridHeight="12" gridWidth="101" name="Empleados" posX="2" posY="7" text="Empleados">
<Table gridHeight="6" gridWidth="99" name="Table1" posX="1" posY="2" totalRows="5">
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="17" gridHeight="1" gridWidth="8" name="num_emp" posX="0" posY="0" sqlTabName="" tabIndex="11" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="18" gridHeight="1" gridWidth="8" name="departamento" noEntry="true" posX="8" posY="0" sqlTabName="" tabIndex="12" table_alias_name="" title="Departamento" widget="Edit"/>
<ButtonEdit action="depto" fieldId="8" gridHeight="1" gridWidth="8" image="find" name="departamento_afecta" posX="16" posY="0" tabIndex="-1" title="Departamento Afecta" widget="ButtonEdit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="19" gridHeight="1" gridWidth="8" name="nivel_emp" noEntry="true" posX="24" posY="0" sqlTabName="" tabIndex="13" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="20" gridHeight="1" gridWidth="8" name="cod_puesto" noEntry="true" posX="32" posY="0" sqlTabName="" tabIndex="14" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="21" gridHeight="1" gridWidth="8" name="descrip1" noEntry="true" posX="40" posY="0" sqlTabName="" tabIndex="15" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="22" gridHeight="1" gridWidth="12" name="cantidad" posX="48" posY="0" scroll="true" sqlTabName="" tabIndex="16" table_alias_name="" title="Cantidad" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="23" gridHeight="1" gridWidth="12" name="valor" posX="60" posY="0" scroll="true" sqlTabName="" tabIndex="17" table_alias_name="" title="Valor" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="24" gridHeight="1" gridWidth="8" name="num_trx" noEntry="true" posX="72" posY="0" sqlTabName="" tabIndex="18" table_alias_name="" title="Numero TRX" widget="Edit"/>
<Edit fieldId="5" gridHeight="1" gridWidth="8" name="sueldo_act" noEntry="true" posX="80" posY="0" tabIndex="-1" title="Sueldo" widget="Edit"/>
</Table>
<Label gridHeight="1" gridWidth="10" name="label1" posX="1" posY="9" text="Departamento Actual"/>
<Edit fieldId="6" gridHeight="1" gridWidth="35" name="titulo_dep_act" posX="12" posY="9" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="6" name="label3" posX="48" posY="9" text="Totales"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="total1" fieldId="14" gridHeight="1" gridWidth="10" name="total1" noEntry="true" posX="56" posY="9" sqlTabName="formonly" tabIndex="9" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="total2" fieldId="15" gridHeight="1" gridWidth="11" name="total2" noEntry="true" posX="69" posY="9" sqlTabName="formonly" tabIndex="10" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label2" posX="1" posY="10" text="Departamento Afecta"/>
<Edit fieldId="7" gridHeight="1" gridWidth="35" name="titulo_dep_afecta" posX="12" posY="10" tabIndex="-1" title="edit2" widget="Edit"/>
</Group>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA5ADMAYgBjAGMANwBkADYALQA5ADYAYQBlAC0ANABhAGIANQAtAGIAMgBmADcALQA1ADYANABmADIAYQBlAGEAOQA3ADkAZQB9QDAAABQAAApAMAAAFAAACj94k3S8an76AQAAAEwAewA0ADkAMgA4ADkAYwA4AGYALQBmADAAOQBiAC0ANAAwADAAZAAtADkAZgA5AGMALQAwADgAZABjAGIAMABjAGEAZQAzAGMAYwB9QCAAABQAAApAIAAAFAAACgAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt007.per
+64
View File
@@ -0,0 +1,64 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT007
OBJETIVO : Pantalla que captura las novedades de los empleados
PROGRAMADOR : Betania Guerrero
PROGRAMA Q. LO USA: NOPRMT007
FECHA REALIZACION : Agosto 24, 1993
------------------------------------------------------------------------
}
database smarmotech
LAYOUT (TEXT="MAESTRA NOVEDADES NOMINAS", STYLE="basic")
GRID
{
<G "Encabezado" >
Numero de Nomina [f000]
Tipo de Empleado [a][b ] Veces a Cobrar [ve ]
Fecha Inicial [fi ] Fecha Final [ft ]
Codigo Movimientos[f001][d ]
<G "Detalle" >
Empleado(s) Cantidad Valor
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
[f004][f005][f2 ][f3 ][c ][f002 ][f003 ]
-------------- -------------
Totales [t5 ] [t6 ]
}
end
tables
notb00007,notb00010,
notb00002,adtb00003
attributes
f000 = notb00007.num_nomi,autonext,comments = "Digite el numero de la nomina";
COMBOBOX a = formonly.tipo_emp,INCLUDE=("Q","S","J","V"),default="Q",
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor, J-Jornales";
b = formonly.descr,noentry;
fi = notb00010.fecha_del,format = "dd/mm/yyyy",noentry;
ft = notb00010.fecha_al,format = "dd/mm/yyyy",noentry;
f004 = adtb00003.num_emp,autonext,
comments = "Digite la ficha del empleado";
f005 = adtb00003.departamento,noentry;
f2 = adtb00003.nivel_emp,noentry;
f3 = adtb00003.cod_puesto,noentry;
c = formonly.descrip1,noentry;
f001 = notb00007.cod_mov,
comments = "Digite el movimiento";
d = notb00002.descrip_mov,noentry;
f002 = notb00007.cantidad,autonext,
comments = "Digite la cantidad del movimiento";
f003 = notb00007.valor,autonext,
comments = "Digite el valor del movimiento";
t5 = formonly.total1,noentry;
t6 = formonly.total2,noentry;
ve = formonly.veces,comments =
"Digite veces a cobrar una novedad, si es una sola vez deje en blanco";
instructions
screen record consart[6] (num_emp,departamento,nivel_emp,cod_puesto,descrip1,
cantidad,valor)
delimiters " "
end
PROYECTO/nodir/nofmmt008.4fd
+59
View File
@@ -0,0 +1,59 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{df58f5aa-d6c9-436b-b162-6d99d69fe2c1}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record name="record1" uid="{27ef5c9f-2ddc-47ac-896e-a77a5b800d7d}">
<RecordField colName="num_nomi" fieldIdRef="5" name="num_nomi" sqlTabName="formonly" uid="{3ca1f471-01a7-4da8-ac8c-be8486ef9cfa}"/>
<RecordField colName="tipo_emp" defaultValue="Q" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00008.tipo_emp" sqlTabName="notb00008" uid="{6d9426e7-624b-41dc-b077-a97810fbebbf}"/>
<RecordField colName="p_fecha_del" fieldIdRef="9" name="p_fecha_del" sqlTabName="formonly" sqlType="DATE" uid="{cd83e719-02ba-48ca-9c51-34097042b53a}"/>
<RecordField colName="p_fecha_al" fieldIdRef="10" name="p_fecha_al" sqlTabName="formonly" sqlType="DATE" uid="{929b8f0d-cd07-496f-9f8a-1a6472a49371}"/>
<RecordField colName="xestado_legal" fieldIdRef="4" name="xestado_legal" sqlTabName="formonly" uid="{6d97f720-670c-4205-a04e-38fddf86b954}"/>
<RecordField colName="departamento" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00008.departamento" sqlTabName="notb00008" uid="{ed6145a7-5618-41ae-a4ba-eb92ebfcce9c}"/>
<RecordField colName="num_emp" fieldIdRef="8" fieldType="TABLE_COLUMN" name="notb00008.num_emp" sqlTabName="notb00008" uid="{11772362-857a-4a34-adc5-1653ff8c30dc}"/>
<RecordField colName="opt1" defaultValue="S" fieldIdRef="0" name="opt1" sqlTabName="formonly" uid="{dd774c02-8c9c-49e9-969e-f6370cd69719}"/>
<RecordField colName="regalia" defaultValue="N" fieldIdRef="1" name="regalia" sqlTabName="formonly" uid="{8a3eb67b-817a-4db8-97d3-f11a1f0b5f00}"/>
<RecordField colName="vacaciones" defaultValue="N" fieldIdRef="2" name="vacaciones" sqlTabName="formonly" uid="{aa45dc73-0663-4bd4-a34f-c6a63d81825c}"/>
<RecordField colName="opt2" defaultValue="N" fieldIdRef="3" name="opt2" sqlTabName="formonly" uid="{8aa4f853-fa6a-48ac-aad1-da963b52a53a}"/>
<RecordField colName="opt2" defaultValue="N" fieldIdRef="11" name="opt3" sqlTabName="formonly" uid="{d9951275-bdf0-4217-9dfd-b2661834496b}"/>
</Record>
<Form gridHeight="13" gridWidth="82" name="nofmmt008" style="basic" text="GENERACION NOMINAS">
<Grid gridHeight="13" gridWidth="82" name="grid1" posX="0" posY="0">
<Group gridHeight="7" gridWidth="79" name="group1" posX="1" posY="0" text="principales">
<Label gridHeight="1" gridWidth="13" name="label1" posX="13" posY="1" text="Nomina Numero"/>
<Edit colName="num_nomi" comment="Digite Numero de la nomina correspondiente" fieldId="5" gridHeight="1" gridWidth="4" name="num_nomi" posX="30" posY="1" sqlTabName="formonly" tabIndex="1" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" name="label2" posX="13" posY="2" text="Tipo Empleado"/>
<ComboBox colName="tipo_emp" defaultValue="Q" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" include="Q|J|S" items="Q, J, S" name="notb00008.tipo_emp" posX="30" posY="2" sqlTabName="notb00008" tabIndex="2" widget="ComboBox">
<Item name="Q" text="Q"/>
<Item name="J" text="J"/>
<Item name="S" text="S"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="label3" posX="34" posY="2" text="Fecha del"/>
<Edit colName="p_fecha_del" fieldId="9" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="p_fecha_del" noEntry="true" posX="45" posY="2" sqlTabName="formonly" sqlType="DATE" tabIndex="3" widget="Edit"/>
<Label gridHeight="1" gridWidth="9" name="label4" posX="57" posY="2" text="Fecha al"/>
<Edit colName="p_fecha_al" fieldId="10" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="p_fecha_al" noEntry="true" posX="67" posY="2" sqlTabName="formonly" sqlType="DATE" tabIndex="4" widget="Edit"/>
<Label gridHeight="1" gridWidth="6" name="label5" posX="13" posY="3" text="Estado"/>
<Edit colName="xestado_legal" fieldId="4" gridHeight="1" gridWidth="12" name="xestado_legal" posX="30" posY="3" sqlTabName="formonly" tabIndex="5" widget="Edit"/>
<Label gridHeight="1" gridWidth="16" name="label6" posX="13" posY="4" text="Departamento(s)"/>
<Edit colName="departamento" comment="Digite un numero departamental o un rango de departamentos" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00008.departamento" posX="30" posY="4" sqlTabName="notb00008" tabIndex="6" widget="Edit"/>
<Label gridHeight="1" gridWidth="11" name="label7" posX="13" posY="5" text="Empleado(s)"/>
<Edit colName="num_emp" comment="Digite un numero de empleados o un rango de Empleados" fieldId="8" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="notb00008.num_emp" posX="30" posY="5" sqlTabName="notb00008" tabIndex="7" widget="Edit"/>
</Group>
<Group gridHeight="6" gridWidth="80" name="group2" posX="2" posY="7" text="adicionales">
<Label gridHeight="1" gridWidth="22" name="label8" posX="3" posY="1" text="GENERO NOMINA ACTIVOS"/>
<CheckBox colName="opt1" defaultValue="S" fieldId="0" gridHeight="1" gridWidth="15" name="opt1" notNull="true" posX="26" posY="1" required="true" sqlTabName="formonly" tabIndex="8" valueChecked="S" valueUnchecked="N" widget="CheckBox"/>
<Label gridHeight="1" gridWidth="14" name="label9" posX="43" posY="1" text="NOMINA REGALIA"/>
<CheckBox colName="regalia" defaultValue="N" fieldId="1" gridHeight="1" gridWidth="14" name="regalia" notNull="true" posX="64" posY="1" required="true" sqlTabName="formonly" tabIndex="9" valueChecked="S" valueUnchecked="N" widget="CheckBox"/>
<Label gridHeight="1" gridWidth="22" name="label10" posX="3" posY="2" text="VACACIONES COLECTIVAS"/>
<CheckBox colName="vacaciones" defaultValue="N" fieldId="2" gridHeight="1" gridWidth="15" name="vacaciones" notNull="true" posX="26" posY="2" required="true" sqlTabName="formonly" tabIndex="10" valueChecked="S" valueUnchecked="N" widget="CheckBox"/>
<Label gridHeight="1" gridWidth="20" name="label11" posX="43" posY="2" text="NOMINA BONIFICACION"/>
<CheckBox colName="opt2" defaultValue="N" fieldId="3" gridHeight="1" gridWidth="14" name="opt2" notNull="true" posX="64" posY="2" required="true" sqlTabName="formonly" tabIndex="11" valueChecked="S" valueUnchecked="N" widget="CheckBox"/>
<Label gridHeight="1" gridWidth="20" name="label12" posX="43" posY="3" text="NOMINA BONIFICACION DESACTIVADOS"/>
<CheckBox colName="opt2" defaultValue="N" fieldId="11" gridHeight="1" gridWidth="14" name="opt3" notNull="true" posX="64" posY="3" required="true" sqlTabName="formonly" tabIndex="-1" valueChecked="S" valueUnchecked="N" widget="CheckBox"/>
</Group>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewAyADcAZQBmADUAYwA5AGYALQAyAGQAZABjAC0ANAA3AGEAYwAtADgAOQA2AGUALQBhADcANwBhADUAYgA4ADAAMABkADcAZAB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt008.per
+44
View File
@@ -0,0 +1,44 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT008
OBJETIVO : Pantalla que captura Informacion para generar la
nomina de pagos
PROGRAMADOR : Juan F. Soto
PROGRAMA Q. LO USA: NOPRMT008,NOPRMT021
FECHA REALIZACION : Septiembre 10, 1993
------------------------------------------------------------------------
}
database smarmotech
LAYOUT (TEXT="GENERACION NOMINAS", STYLE="basic")
GRID
{
<G Principales >
Nomina Numero [ni ]
Tipo Empleado [t] Fecha del [fe1 ] Fecha al [fe2 ]
Estado [k1 ]
Departamento(s) [de ]
Empleado(s) [em ]
<G Adicionales >
GENERO NOMINA [ck1 ] NOMINA REGALIA [ck2 ]
VACACIONES COLECTIVAS [ck3 ] NOMINA BONIFICACION [ck4 ]
}
END
tables
notb00008
attributes
CHECKBOX ck1 = formonly.opt1,NOT NULL,DEFAULT="S",VALUECHECKED="S",VALUEUNCHECKED="N";
CHECKBOX ck2 = formonly.regalia,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",DEFAULT="N";
CHECKBOX ck3 = formonly.vacaciones,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",DEFAULT="N";
CHECKBOX ck4 = formonly.opt2,NOT NULL,VALUECHECKED="S",VALUEUNCHECKED="N",DEFAULT="N";
k1 = formonly.xestado_legal;
ni = formonly.num_nomi,comments = "Digite Numero de la nomina correspondiente";
COMBOBOX t = notb00008.tipo_emp,include=("Q","J","S"),default="Q";
de = notb00008.departamento,comments =
"Digite un numero departamental o un rango de departamentos";
em = notb00008.num_emp,comments =
"Digite un numero de empleados o un rango de Empleados";
fe1 = formonly.p_fecha_del type date,format = "dd/mm/yyyy",noentry;
fe2 = formonly.p_fecha_al type date, format = "dd/mm/yyyy",noentry;
PROYECTO/nodir/nofmmt009.4fd
+82
View File
@@ -0,0 +1,82 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{21564f45-882e-4565-b7b8-a0bfd46fa5f1}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{e2d45d94-971d-470b-8606-e27a96297b40}" where="">
<RecordField colName="tipo_emp" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00010.tipo_emp" sqlTabName="notb00010" sqlType="CHAR" table_alias_name="" uid="{47ae73d7-bbf4-413e-a028-1fa0947af28d}"/>
<RecordField colName="h_normal" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00010.h_normal" precisionDecimal="8" scaleDecimal="2" sqlTabName="notb00010" sqlType="DECIMAL" table_alias_name="" uid="{ef4b6b9d-fc2d-4c0d-8559-08a91e6e9a24}"/>
<RecordField colName="num_nomi" fieldIdRef="2" fieldType="TABLE_COLUMN" name="notb00010.num_nomi" sqlTabName="notb00010" sqlType="INTEGER" table_alias_name="" uid="{4716f355-5c98-4191-aca9-46b11da12c85}"/>
<RecordField colName="mes" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00010.mes" sqlTabName="notb00010" sqlType="SMALLINT" table_alias_name="" uid="{94d53c45-7cad-43bf-b720-3d6b49afbf0f}"/>
<RecordField colName="ano" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00010.ano" sqlTabName="notb00010" sqlType="SMALLINT" table_alias_name="" uid="{5eb89847-2231-415f-822a-67eb079a4fba}"/>
<RecordField colName="num_sem" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00010.num_sem" sqlTabName="notb00010" sqlType="SMALLINT" table_alias_name="" uid="{ad88e290-a6cb-4529-84f6-09b813711d8f}"/>
<RecordField colName="nombre_mes" fieldIdRef="4" name="nombre_mes" sqlTabName="formonly" table_alias_name="" uid="{a80c976b-4576-4d76-9ad3-13abddcaf4d6}"/>
<RecordField colName="fecha_del" fieldIdRef="8" fieldType="TABLE_COLUMN" name="notb00010.fecha_del" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{5824b1e9-de15-480e-868e-d981ff1444f2}"/>
<RecordField colName="fecha_al" fieldIdRef="9" fieldType="TABLE_COLUMN" name="notb00010.fecha_al" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{7a9367ee-d0eb-4489-ad9f-d82a97974eed}"/>
<RecordField colName="status_t" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00010.status_t" sqlTabName="notb00010" sqlType="CHAR" table_alias_name="" uid="{49e04d38-b7b9-49ed-93ef-0177bdc7208c}"/>
<RecordField colName="us_crea" fieldIdRef="11" fieldType="TABLE_COLUMN" name="notb00010.us_crea" sqlTabName="notb00010" sqlType="CHAR" table_alias_name="" uid="{5aef70e0-6163-475c-8dbf-fc94f880fe47}"/>
<RecordField colName="us_mod" fieldIdRef="13" fieldType="TABLE_COLUMN" name="notb00010.us_mod" sqlTabName="notb00010" sqlType="CHAR" table_alias_name="" uid="{4c872441-ae6b-4357-b9ca-a4975f294719}"/>
<RecordField colName="fech_crea" fieldIdRef="12" fieldType="TABLE_COLUMN" name="notb00010.fech_crea" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{d1d8901b-63f5-44ea-89cb-123257edd67f}"/>
<RecordField colName="fech_mod" fieldIdRef="14" fieldType="TABLE_COLUMN" name="notb00010.fech_mod" sqlTabName="notb00010" sqlType="DATE" table_alias_name="" uid="{3c3c9c8f-f830-4d2d-8e4d-574a882b3fa7}"/>
<RecordField colName="" fieldIdRef="15" name="Fecha_cierre_nomina" sqlTabName="" table_alias_name="" uid="{72abb568-5104-4d26-9dc7-581759ef43a7}"/>
<RecordField defaultValue="ACTIVO" fieldIdRef="1" name="estado_legal" uid="{515c6f0e-6d5b-41d6-90c2-e05ecc61d5ca}"/>
<RecordField fieldIdRef="16" name="monto" uid="{e5ec0fe1-36ce-4b79-a7d8-d0d5ca944bbf}"/>
<RecordField fieldIdRef="17" name="fecha_inicio_trabajadas" uid="{9048af3b-932d-4c23-a0f3-f28638f0865a}"/>
<RecordField fieldIdRef="18" name="fecha_final_trabajadas" uid="{99dbba1e-736a-4472-8dcd-e7b40cb21052}"/>
</Record>
<Form gridHeight="14" gridWidth="86" name="nofmmt009" style="basic" text="GENERACION NOMINAS">
<ToolBar name="ToolBar1">
<ToolBarItem comment="Nuevo Periodo" image="new" name="nuevo" text="Periodo"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Periodo"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Grid gridHeight="12" gridWidth="83" name="Grid1" posX="2" posY="1">
<Label gridHeight="1" gridWidth="12" name="label4" posX="2" posY="1" text="Tipo de Empleado:"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="tipo_emp" comment="Digite Q- Quincenal, S- Semanal, V- Vendedor" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="18" include="Q|S|V|J" items="QUINCENAL, JORNALES" name="notb00010.tipo_emp" posX="16" posY="1" sqlTabName="notb00010" sqlType="CHAR" tabIndex="1" table_alias_name="" widget="ComboBox">
<Item lstrtext="false" name="Q" text="QUINCENAL"/>
<Item lstrtext="false" name="J" text="JORNALES"/>
</ComboBox>
<Label posX="38" posY="1" text="Horas Normales"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="h_normal" comment="Digite las horas trabajadas" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="10" name="notb00010.h_normal" posX="54" posY="1" precisionDecimal="8" scaleDecimal="2" sqlTabName="notb00010" sqlType="DECIMAL" tabIndex="2" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" name="label5" posX="1" posY="2" text="Numero de la Nomina:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_nomi" comment="Digite el numero de la nomina" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00010.num_nomi" posX="16" posY="2" sqlTabName="notb00010" sqlType="INTEGER" tabIndex="3" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="3" text="Mes:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="mes" comment="Digite el mes del periodo" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00010.mes" posX="7" posY="3" sqlTabName="notb00010" sqlType="SMALLINT" tabIndex="4" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nombre_mes" fieldId="4" gridHeight="1" gridWidth="10" name="nombre_mes" noEntry="true" posX="11" posY="3" sqlTabName="formonly" tabIndex="7" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="4" justify="right" name="label8" posX="24" posY="3" text="Ano:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="ano" comment="Digite el ano del periodo" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00010.ano" notNull="true" posX="29" posY="3" required="true" sqlTabName="notb00010" sqlType="SMALLINT" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="label7" posX="41" posY="3" text="Numero de Semanas:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="num_sem" comment="Digite el numero de semanas del mes" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="3" name="notb00010.num_sem" posX="65" posY="3" sqlTabName="notb00010" sqlType="SMALLINT" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="7" name="Label3" posX="1" posY="4" text="Fecha De:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_del" comment="Digite la fecha inicial del periodo" fieldId="8" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="notb00010.fecha_del" posX="11" posY="4" sqlTabName="notb00010" sqlType="DATE" tabIndex="8" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="6" justify="right" name="Label2" posX="22" posY="4" text="Fecha a:"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_al" comment="Digite la fecha final del periodo" fieldId="9" fieldType="TABLE_COLUMN" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="notb00010.fecha_al" posX="29" posY="4" sqlTabName="notb00010" sqlType="DATE" tabIndex="9" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="Label1" posX="41" posY="4" text="Fecha Cierre"/>
<DateEdit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="15" gridHeight="1" gridWidth="10" name="Fecha_cierre_nomina" posX="58" posY="4" sqlTabName="" tabIndex="15" table_alias_name="" title="DateEdit1" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="8" name="label6" posX="1" posY="5" text="Estado"/>
<ComboBox defaultValue="ACTIVO" fieldId="1" gridHeight="1" gridWidth="10" items="ACTIVO, FASE-ACTIVO, FASE" name="estado_legal" posX="11" posY="5" tabIndex="-1" title="edit1" widget="ComboBox">
<Item lstrtext="false" name="ACTIVO" text="ACTIVO"/>
<Item lstrtext="false" name="FASE-ACTIVO" text="FASE-ACTIVO"/>
<Item lstrtext="false" name="FASE" text="FASE"/>
</ComboBox>
<Label gridHeight="1" gridWidth="6" name="label9" posX="22" posY="5" text="Monto"/>
<Edit fieldId="16" gridHeight="1" gridWidth="10" name="monto" posX="29" posY="5" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" justify="right" name="label10" posX="41" posY="5" text="Fecha Cierre H Extras"/>
<DateEdit fieldId="17" gridHeight="1" gridWidth="10" name="fecha_inicio_trabajadas" posX="58" posY="5" tabIndex="-1" title="dateedit1" widget="DateEdit"/>
<DateEdit fieldId="18" gridHeight="1" gridWidth="10" name="fecha_final_trabajadas" posX="58" posY="6" tabIndex="-1" title="dateedit1" widget="DateEdit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00010.status_t" noEntry="true" posX="1" posY="8" sqlTabName="notb00010" sqlType="CHAR" tabIndex="10" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="9" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00010.us_crea" noEntry="true" posX="19" posY="9" sqlTabName="notb00010" sqlType="CHAR" tabIndex="11" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="9" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00010.us_mod" noEntry="true" posX="64" posY="9" sqlTabName="notb00010" sqlType="CHAR" tabIndex="12" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="10" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00010.fech_crea" noEntry="true" posX="19" posY="10" sqlTabName="notb00010" sqlType="DATE" tabIndex="13" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="10" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00010.fech_mod" noEntry="true" posX="64" posY="10" sqlTabName="notb00010" sqlType="DATE" tabIndex="14" table_alias_name="" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewBlADIAZAA0ADUAZAA5ADQALQA5ADcAMQBkAC0ANAA3ADAAYgAtADgANgAwADYALQBlADIANwBhADkANgAyADkANwBiADQAMAB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt009.per
+57
View File
@@ -0,0 +1,57 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT009
OBJETIVO : Pantalla que captura los periodos de las nominas
Es utilizada por: NOPRMT009
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Agosto 24, 1993
------------------------------------------------------------------------
}
database smarmotech
TOOLBAR
ITEM nuevo (TEXT="Periodo", IMAGE="new", COMMENT="Nuevo Periodo")
ITEM buscar (TEXT="Buscar Periodo", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="GENERACION NOMINAS", STYLE="basic")
GRID
{
Tipo de Empleado: [a][b ] Horas Normales [h1 ]
Numero de la Nomina: [f000]
Mes: [f1] Ano: [f002] Numero de Semanas: [d]
[c ]
Fecha del: [f003 ] Fecha al: [f004 ]
[j]
Usuario Creador [f005 ] Usuario Modificador [f007 ]
Fecha Creacion [f006 ] Fecha Modificacion [f008 ]
}
end
tables
notb00010
attributes
a = notb00010.tipo_emp,upshift,autonext,include = ("Q", "S", "V","J"),
comments = "Digite Q- Quincenal, S- Semanal, V- Vendedor";
b = formonly.descr,noentry;
f000 = notb00010.num_nomi,autonext,comments = "Digite el numero de la nomina";
f1 = notb00010.mes,autonext,comments = "Digite el mes del periodo";
c = formonly.nombre_mes,noentry;
f002 = notb00010.ano,autonext,comments = "Digite el ano del periodo";
h1 = notb00010.h_normal, comments = "Digite las horas trabajadas";
d = notb00010.num_sem,autonext,
comments = "Digite el numero de semanas del mes";
f003 = notb00010.fecha_del,format = "dd/mm/yyyy",
comments = "Digite la fecha inicial del periodo";
f004 = notb00010.fecha_al,format = "dd/mm/yyyy",
comments = "Digite la fecha final del periodo";
j = notb00010.status_t,noentry;
f005 = notb00010.us_crea,noentry;
f006 = notb00010.fech_crea,noentry;
f007 = notb00010.us_mod,noentry;
f008 = notb00010.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt010.per
+40
View File
@@ -0,0 +1,40 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT010
OBJETIVO : Pantalla que captura los codigos de seguro social
Es utilizada por: NOPRMT010
PROGRAMADOR : Tadeo A. Ferreras
FECHA REALIZACION : Agosto 19, 1993
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Empleado [f1 ][f2 ][f3][f4][nomb ]
[dpto ]
Seguro Social [s1][s2][s3 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
adtb00003
attributes
f1 = adtb00003.num_emp,noentry;
f2 = adtb00003.departamento,noentry;
f3 = adtb00003.nivel_emp,noentry;
f4 = adtb00003.cod_puesto,noentry;
nomb = formonly.nombre type char,noentry;
dpto = formonly.nom_dpto type char,noentry;
s1 = adtb00003.cod_seg1,autonext,comments = "Digite el numero del aseguro";
s2 = adtb00003.cod_seg2,autonext,comments = "Digite el numero del aseguro";
s3 = adtb00003.cod_seg3,comments = "Digite el numero del aseguro";
j = adtb00003.status_t,noentry;
f007 = adtb00003.us_crea,noentry;
f008 = adtb00003.fech_crea,noentry;
f009 = adtb00003.us_mod,noentry;
f010 = adtb00003.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt011.4fd
+78
View File
@@ -0,0 +1,78 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="31408" name="ManagedForm" uid="{e6dfb989-c834-4670-a568-232d2614acea}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record name="record1" uid="{a6f893ed-4370-4bd8-98a8-3ca7dd25e45a}">
<RecordField colName="num_emp" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00011.num_emp" sqlTabName="notb00011" uid="{3cb7df1c-1897-4ff8-8733-03e335651b6c}"/>
<RecordField colName="departamento" fieldIdRef="1" fieldType="TABLE_COLUMN" name="notb00011.departamento" sqlTabName="notb00011" uid="{3616b167-ada3-4229-88f4-e9d7a8c0790f}"/>
<RecordField colName="nivel_emp" fieldIdRef="2" fieldType="TABLE_COLUMN" name="notb00011.nivel_emp" sqlTabName="notb00011" uid="{1f1d82f9-962d-4852-8481-f3dbcd87d841}"/>
<RecordField colName="cod_puesto" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00011.cod_puesto" sqlTabName="notb00011" uid="{9953ab1a-2caf-4492-9331-a1c229c9ad42}"/>
<RecordField colName="descrip1" fieldIdRef="4" name="descrip1" sqlTabName="formonly" uid="{6f7054dc-c620-49c9-be8f-6117223ae6dd}"/>
<RecordField colName="num_doc" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00011.num_doc" sqlTabName="notb00011" uid="{ac5f04b3-074c-4d8c-a0bd-d1bc1c472ca9}"/>
<RecordField colName="cod_mov" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00011.cod_mov" sqlTabName="notb00011" uid="{79501752-34b9-4634-adc2-3a62319e79aa}"/>
<RecordField colName="descrip_mov" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00002.descrip_mov" sqlTabName="notb00002" uid="{67559bf6-3a5d-4888-8edd-e5043aa9692b}"/>
<RecordField colName="fecha" fieldIdRef="8" name="fecha" sqlTabName="formonly" sqlType="DATE" uid="{e3ac88ec-b205-4d07-a106-ae3a7b57214a}"/>
<RecordField colName="monto" fieldIdRef="9" fieldType="TABLE_COLUMN" name="notb00011.monto" sqlTabName="notb00011" uid="{15583a5f-3364-4b2b-a557-5a15d9ee1c39}"/>
<RecordField colName="porciento" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00011.porciento" sqlTabName="notb00011" uid="{be0b5ebe-1667-4093-932d-fd89bdbcb412}"/>
<RecordField colName="monto2" fieldIdRef="11" name="monto2" sqlTabName="formonly" uid="{a839f8a4-2505-4071-805d-1097a6d5d38b}"/>
<RecordField colName="status_t" fieldIdRef="12" fieldType="TABLE_COLUMN" name="notb00011.status_t" sqlTabName="notb00011" uid="{9ca31bf5-1624-48f1-906c-19d563c474f6}"/>
<RecordField colName="us_crea" fieldIdRef="13" fieldType="TABLE_COLUMN" name="notb00011.us_crea" sqlTabName="notb00011" uid="{043b4e1e-f361-4140-bb12-68e9fc520517}"/>
<RecordField colName="us_mod" fieldIdRef="15" fieldType="TABLE_COLUMN" name="notb00011.us_mod" sqlTabName="notb00011" uid="{73d635eb-c0b0-40af-aece-d3e888182823}"/>
<RecordField colName="fech_crea" fieldIdRef="14" fieldType="TABLE_COLUMN" name="notb00011.fech_crea" sqlTabName="notb00011" uid="{9a88ebd8-fc27-4a01-9c2d-2cb9031ff140}"/>
<RecordField colName="fech_mod" fieldIdRef="16" fieldType="TABLE_COLUMN" name="notb00011.fech_mod" sqlTabName="notb00011" uid="{62a77f20-795b-4b47-89ae-d6cbbfbecf5f}"/>
<RecordField fieldIdRef="17" name="valor_cuota" uid="{92f9961d-6b67-4d62-b0b3-47140a8ef43c}"/>
<RecordField fieldIdRef="18" name="cuota_vigente" uid="{83f0d99a-cd56-4d17-974c-96dc6cd14bb6}"/>
<RecordField fieldIdRef="19" name="combobox1" uid="{d4fe8fc5-fb93-4069-891c-dc6742136b81}"/>
</Record>
<Form gridHeight="13" gridWidth="82" name="nofmmt011" style="basic" text="CONTROL PRESTAMOS Y FACTURAS Version 2.20.1a">
<ToolBar name="toolbar1">
<ToolBarItem comment="Nuevo Prestamo" image="new" name="nuevo" text="Prestamo"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Prestamo"/>
<ToolBarSeparator name="toolbarseparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Grid gridHeight="13" gridWidth="82" name="grid1" posX="0" posY="0">
<Label gridHeight="1" gridWidth="15" name="label1" posX="1" posY="0" text="Codigo Empleado"/>
<Edit autoNext="true" colName="num_emp" comment="Digite la ficha del empleado" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00011.num_emp" posX="19" posY="0" sqlTabName="notb00011" tabIndex="1" widget="Edit"/>
<Edit colName="departamento" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00011.departamento" noEntry="true" posX="26" posY="0" sqlTabName="notb00011" tabIndex="2" widget="Edit"/>
<Edit colName="nivel_emp" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00011.nivel_emp" noEntry="true" posX="33" posY="0" sqlTabName="notb00011" tabIndex="3" widget="Edit"/>
<Edit colName="cod_puesto" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00011.cod_puesto" noEntry="true" posX="38" posY="0" sqlTabName="notb00011" tabIndex="4" widget="Edit"/>
<Edit colName="descrip1" fieldId="4" gridHeight="1" gridWidth="30" name="descrip1" noEntry="true" posX="43" posY="0" sqlTabName="formonly" tabIndex="5" widget="Edit"/>
<Label gridHeight="1" gridWidth="17" name="label2" posX="1" posY="1" text="Numero Documento"/>
<Edit autoNext="true" colName="num_doc" comment="Digite el numero del documento" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="11" name="notb00011.num_doc" posX="19" posY="1" sqlTabName="notb00011" tabIndex="6" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label3" posX="1" posY="2" text="Movimiento"/>
<Edit autoNext="true" case="upper" colName="cod_mov" comment="Digite el codigo de movimiento" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="2" name="notb00011.cod_mov" posX="19" posY="2" sqlTabName="notb00011" tabIndex="7" widget="Edit"/>
<Edit colName="descrip_mov" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="notb00002.descrip_mov" noEntry="true" posX="24" posY="2" sqlTabName="notb00002" tabIndex="8" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label14" posX="1" posY="3" text="Moneda"/>
<ComboBox fieldId="19" gridHeight="1" gridWidth="20" items="RD$, USD$" name="combobox1" posX="19" posY="3" tabIndex="-1" title="combobox1" widget="ComboBox">
<Item lstrtext="false" name="1" text="RD$"/>
<Item lstrtext="false" name="2" text="USD$"/>
</ComboBox>
<Label gridHeight="1" gridWidth="17" justify="right" name="label5" posX="42" posY="3" text="Monto"/>
<Edit colName="monto" comment="Digite el monto del documento" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00011.monto" posX="60" posY="3" sqlTabName="notb00011" tabIndex="10" widget="Edit"/>
<Label gridHeight="1" gridWidth="13" name="label4" posX="1" posY="4" text="Fecha Factura"/>
<DateEdit colName="fecha" fieldId="8" format="dd/mm/yyyy" gridHeight="1" gridWidth="10" name="fecha" posX="19" posY="4" sqlTabName="formonly" sqlType="DATE" tabIndex="9" widget="DateEdit"/>
<Label gridHeight="1" gridWidth="17" justify="right" name="label7" posX="42" posY="4" text="Monto Neto"/>
<Edit colName="monto2" fieldId="11" gridHeight="1" gridWidth="12" name="monto2" noEntry="true" posX="60" posY="4" sqlTabName="formonly" tabIndex="12" widget="Edit"/>
<Label gridHeight="1" gridWidth="9" name="label6" posX="1" posY="5" text="Porciento"/>
<Edit colName="porciento" comment="Digite el porciento de descuento" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="6" name="notb00011.porciento" posX="19" posY="5" sqlTabName="notb00011" tabIndex="11" widget="Edit"/>
<Label comment="" gridHeight="1" gridWidth="17" justify="right" name="label12" posX="42" posY="5" text="Cuota Prestamo"/>
<Edit comment="Esta es la cuota que se digito al momento de adicionar el registro" fieldId="17" gridHeight="1" gridWidth="12" name="valor_cuota" posX="60" posY="5" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label13" posX="49" posY="6" text="Cuota Vigente"/>
<Edit fieldId="18" gridHeight="1" gridWidth="12" name="cuota_vigente" posX="60" posY="6" tabIndex="-1" title="edit1" widget="Edit"/>
<Edit colName="status_t" fieldId="12" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00011.status_t" noEntry="true" posX="2" posY="7" sqlTabName="notb00011" tabIndex="13" widget="Edit"/>
<Label gridHeight="1" gridWidth="15" name="label8" posX="1" posY="8" text="Usuario Creador"/>
<Edit colName="us_crea" fieldId="13" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00011.us_crea" noEntry="true" posX="19" posY="8" sqlTabName="notb00011" tabIndex="14" widget="Edit"/>
<Label gridHeight="1" gridWidth="19" name="label9" posX="42" posY="8" text="Usuario Modificador"/>
<Edit colName="us_mod" fieldId="15" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00011.us_mod" noEntry="true" posX="64" posY="8" sqlTabName="notb00011" tabIndex="15" widget="Edit"/>
<Label gridHeight="1" gridWidth="14" name="label10" posX="1" posY="9" text="Fecha Creacion"/>
<Edit colName="fech_crea" fieldId="14" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00011.fech_crea" noEntry="true" posX="19" posY="9" sqlTabName="notb00011" tabIndex="16" widget="Edit"/>
<Label gridHeight="1" gridWidth="18" name="label11" posX="42" posY="9" text="Fecha Modificacion"/>
<Edit colName="fech_mod" fieldId="16" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00011.fech_mod" noEntry="true" posX="64" posY="9" sqlTabName="notb00011" tabIndex="17" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewBhADYAZgA4ADkAMwBlAGQALQA0ADMANwAwAC0ANABiAGQAOAAtADkAOABhADgALQAzAGMAYQA3AGQAZAAyADUAZQA0ADUAYQB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt011.per
+57
View File
@@ -0,0 +1,57 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT011
OBJETIVO : Pantalla que captura los numeros y montos de las
facturas de farmacia y plaza lama
Es utilizada por: NOPRMT011
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Septiembre 09, 1993
------------------------------------------------------------------------
}
database smarmotech
TOOLBAR
ITEM nuevo (TEXT="Prestamo", IMAGE="new", COMMENT="Nuevo Prestamo")
ITEM buscar (TEXT="Buscar Prestamo", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="CONTROL PRESTAMOS Y FACTURAS Version 2.20.1a", STYLE="basic")
GRID
{
Codigo Empleado [f000] [f001] [f2] [f3] [a ]
Numero Documento [f004 ]
Movimiento [b ] [c ]
Fecha Factura [f002 ] Monto [f005 ]
Porciento [f003 ] Monto Neto [mn ]
[j]
Usuario Creador [f006 ] Usuario Modificador [f008 ]
Fecha Creacion [f007 ] Fecha Modificacion [f009 ]
}
end
tables
notb00011,notb00002
attributes
f000 = notb00011.num_emp,autonext,
comments = "Digite la ficha del empleado";
f001 = notb00011.departamento,noentry;
f2 = notb00011.nivel_emp,noentry;
f3 = notb00011.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f004 = notb00011.num_doc,autonext,comments = "Digite el numero del documento";
b = notb00011.cod_mov,upshift,autonext,
comments = "Digite el codigo de movimiento";
c = notb00002.descrip_mov,noentry;
DATEEDIT f002 = formonly.fecha type date,format = "dd/mm/yyyy";
f005 = notb00011.monto,comments = "Digite el monto del documento";
f003 = notb00011.porciento,comments = "Digite el porciento de descuento";
mn = formonly.monto2,noentry;
j = notb00011.status_t,noentry;
f006 = notb00011.us_crea,noentry;
f007 = notb00011.fech_crea,noentry;
f008 = notb00011.us_mod,noentry;
f009 = notb00011.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt012.4fd
+33
View File
@@ -0,0 +1,33 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" gstVersion="22800" name="ManagedForm" uid="{5dd3c627-ebd9-4ba4-b1b8-c1433819a456}">
<AGSettings/>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{dec49a47-1f21-4166-b5bb-49832f5e17b1}" where="">
<RecordField colName="cod_mes" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00012.cod_mes" sqlTabName="notb00012" sqlType="SMALLINT" table_alias_name="" uid="{4c44c706-76c7-4869-85fb-b5657cb20f53}"/>
<RecordField colName="nombre_mes" fieldIdRef="1" name="nombre_mes" sqlTabName="formonly" table_alias_name="" uid="{5e4990d9-0f1c-44af-bbee-06f38e57c8ff}"/>
<RecordField colName="dias" fieldIdRef="2" fieldType="TABLE_COLUMN" name="notb00012.dias" sqlTabName="notb00012" sqlType="SMALLINT" table_alias_name="" uid="{d2111214-cae1-4570-8b60-19c853ead6ec}"/>
<RecordField colName="us_crea" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00012.us_crea" sqlTabName="notb00012" sqlType="CHAR" table_alias_name="" uid="{afa86be6-b4a8-4731-b1c6-b7e788ccf596}"/>
<RecordField colName="us_mod" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00012.us_mod" sqlTabName="notb00012" sqlType="CHAR" table_alias_name="" uid="{095c7e20-654b-454a-9b8c-4e07fe9dadb1}"/>
<RecordField colName="fech_crea" fieldIdRef="4" fieldType="TABLE_COLUMN" name="notb00012.fech_crea" sqlTabName="notb00012" sqlType="DATE" table_alias_name="" uid="{2587eca6-b42a-43a7-9434-05b987346dd3}"/>
<RecordField colName="fech_mod" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00012.fech_mod" sqlTabName="notb00012" sqlType="DATE" table_alias_name="" uid="{3aaeb62e-7532-4f84-b827-f1fafd594273}"/>
</Record>
<Form gridHeight="20" gridWidth="84" name="nofmmt012">
<Grid gridHeight="16" gridWidth="79" name="Grid1" posX="2" posY="1">
<Label gridHeight="1" gridWidth="3" name="Label1" posX="2" posY="8" text="Mes"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="cod_mes" columnCount="" comment="Digite el No. del mes" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00012.cod_mes" posX="8" posY="8" rowCount="" sqlTabName="notb00012" sqlType="SMALLINT" stepX="" stepY="" tabIndex="1" table_alias_name="" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="nombre_mes" columnCount="" fieldId="1" gridHeight="1" gridWidth="12" name="nombre_mes" noEntry="true" posX="13" posY="8" rowCount="" sqlTabName="formonly" stepX="" stepY="" tabIndex="2" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="4" name="Label2" posX="2" posY="9" text="Dias"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="dias" columnCount="" comment="Digite el numero de dias que contiene este mes" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00012.dias" posX="8" posY="9" rowCount="" sqlTabName="notb00012" sqlType="SMALLINT" stepX="" stepY="" tabIndex="3" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="15" name="Label3" posX="2" posY="11" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" columnCount="" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00012.us_crea" noEntry="true" posX="20" posY="11" rowCount="" sqlTabName="notb00012" sqlType="CHAR" stepX="" stepY="" tabIndex="4" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="19" name="Label5" posX="40" posY="11" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" columnCount="" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00012.us_mod" noEntry="true" posX="62" posY="11" rowCount="" sqlTabName="notb00012" sqlType="CHAR" stepX="" stepY="" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="14" name="Label4" posX="2" posY="12" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" columnCount="" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00012.fech_crea" noEntry="true" posX="20" posY="12" rowCount="" sqlTabName="notb00012" sqlType="DATE" stepX="" stepY="" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="18" name="Label6" posX="40" posY="12" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" columnCount="" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00012.fech_mod" noEntry="true" posX="62" posY="12" rowCount="" sqlTabName="notb00012" sqlType="DATE" stepX="" stepY="" tabIndex="7" table_alias_name="" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA0AGMANAA0AGMANwAwADYALQA3ADYAYwA3AC0ANAA4ADYAOQAtADgANQBmAGIALQBiADUANgA1ADcAYwBiADIAMABmADUAMwB9QCAAAAQAAABAPZmZoQAAAAAAAAAAAAAAAQAAAEwAewBkADIAMQAxADEAMgAxADQALQBjAGEAZQAxAC0ANAA1ADcAMAAtADgAYgA2ADAALQAxADkAYwA4ADUAMwBlAGEAZAA2AGUAYwB9QCAAAAQAAABAUDMzN0AAAAAAAAAAAAAAAQAAAEwAewAwADkANQBjADcAZQAyADAALQA2ADUANABiAC0ANAA1ADQAYQAtADkAYgA4AGMALQA0AGUAMAA3AGYAZQA5AGQAYQBkAGIAMQB9QCAAAAQAAABAWQAABkAAAAAAAAAAAAAAAQAAAEwAewBkAGUAYwA0ADkAYQA0ADcALQAxAGYAMgAxAC0ANAAxADYANgAtAGIANQBiAGIALQA0ADkAOAAzADIAZgA1AGUAMQA3AGIAMQB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewA1AGUANAA5ADkAMABkADkALQAwAGYAMQBjAC0ANAA0AGEAZgAtAGIAYgBlAGUALQAwADYAZgAzADgAZQA1ADcAYwA4AGYAZgB9QCAAAAQAAABAR5mZn4AAAAAAAAAAAAAAAQAAAEwAewBhAGYAYQA4ADYAYgBlADYALQBiADQAYQA4AC0ANAA3ADMAMQAtAGIAMQBjADYALQBiADcAZQA3ADgAOABjAGMAZgA1ADkANgB9QCAAAAQAAABAVJmZnsAAAAAAAAAAAAAAAQAAAEwAewAzAGEAYQBlAGIANgAyAGUALQA3ADUAMwAyAC0ANABmADgANAAtAGIAOAAyADcALQBmADEAZgBhAGYAZAA1ADkANAAyADcAMwB9QCAAAAQAAABAYOZmaqAAAAAAAAAAAAAAAQAAAEwAewAyADUAOAA3AGUAYwBhADYALQBiADQAMgBhAC0ANAAzAGEANwAtADkANAAzADQALQAwADUAYgA5ADgANwAzADQANgBkAGQAMwB9QCAAAAQAAABAXWZmbcAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt012.per
+35
View File
@@ -0,0 +1,35 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT012
OBJETIVO : Pantalla que captura los dias que contiene cada mes
del ano en curso
PROGRAMADOR : Juan Soto
PROGRAMA Q. LO USA: NOPRMT012
FECHA REALIZACION : Diciembre 8, 1993.
------------------------------------------------------------------------
}
schema smarmotech
screen size 24 by 80
{
Mes [a1] [d1 ]
Dias [b1]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00012
attributes
a1 = notb00012.cod_mes,comments =
"Digite el No. del mes";
d1 = formonly.nombre_mes,noentry;
b1 = notb00012.dias,comments =
"Digite el numero de dias que contiene este mes";
f007 = notb00012.us_crea,noentry;
f008 = notb00012.fech_crea,noentry;
f009 = notb00012.us_mod,noentry;
f010 = notb00012.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt013.per
+47
View File
@@ -0,0 +1,47 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT013
OBJETIVO : Pantalla que actualiza los movimientos de
los empleados REGALIA Y BONIFICACION
Es utilizada por: NOPRMT013
PROGRAMADOR : Ing. Juan Soto
FECHA REALIZACION : Diciembre 8, 1993.
------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Numero de la Nomina [f0 ] Tipo Nomina [b] Fechas [f1 ] [f2 ]
\g---------------------------------------------------------------------------\g
Ficha del Empleado [f000] Departamento [f001]
Codigo Movimiento [f4] [a ]
valor [f005 ]
[j]
Usuario Creador [f007 ] Usuario Modificador [f009 ]
Fecha Creacion [f008 ] Fecha Modificacion [f010 ]
}
end
tables
notb00003,notb00002,
adtb00003
attributes
f0 = formonly.numero,autonext;
b = formonly.tipo,upshift,autonext;
f1 = formonly.fecha_ini type date,format = "dd/mm/yy",noentry;
f2 = formonly.fecha_fin type date,format = "dd/mm/yy", noentry;
f000 = adtb00003.num_emp,autonext,
comments = "Digite la ficha del empleado";
f001 = adtb00003.departamento,autonext,
comments = "Digite el departamento del empleado";
f4 = notb00003.cod_mov,autonext,
comments = "Digite el codigo de movimiento o Presione Ctrl-W para busqueda";
a = notb00002.descrip_mov,noentry;
f005 = notb00003.valor;
j = notb00003.status_t,noentry;
f007 = notb00003.us_crea,noentry;
f008 = notb00003.fech_crea,noentry;
f009 = notb00003.us_mod,noentry;
f010 = notb00003.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt014.per
+18
View File
@@ -0,0 +1,18 @@
database marmotech
screen size 24 by 80
{
Nomina [f000 ]
Tipo [a]
Movimiento [f6 ]
Empleado [f01]
}
end
tables
notb00008
attributes
f000 = notb00008.num_nomi;
a = notb00008.tipo_emp,upshift,include=("Q","S","V"),comments=
"Q = Quincenal S = Semenal V = Vendedor";
f6 = notb00008.cod_mov;
f01 = notb00008.num_emp;
end
PROYECTO/nodir/nofmmt015.per
+42
View File
@@ -0,0 +1,42 @@
{
-----------------------------------------------------------------------------
FORMULARIO : CGFMMT011
OBJETIVO : Pantalla para los cheques pagados por el banco
Es utilizada por: CGPRMT011
PROGRAMADOR : Ing. Juan F. Soto
FECHA REALIZACION : Diciembre 28 1993
-----------------------------------------------------------------------------
}
database marmotech
screen size 24 by 80
{
Banco [c ] [a ]
Numero Cheque [ck ]
Fecha [fe ]
Portador [po ]
Monto [m ]
Status Cheque [b][d ]
Usuario Creador [e ] Usuario Modificador [e2 ]
Fecha Creacion [e1 ] Fecha Modificacion [e3 ]
}
end
tables
cgtb00001,cgtb00005
attributes
c = cgtb00001.cuenta_no,autonext,comments = "Digite Cuenta del Banco";
a = cgtb00001.descripcion,noentry;
ck = cgtb00005.cheque_no,comments = "Digite Numero del cheque";
fe = cgtb00005.fecha,noentry,format = "dd/mm/yy";
po = cgtb00005.portador,noentry;
m = cgtb00005.monto,noentry;
b = cgtb00005.status_t,comments =
" N - Nulo ",
include = ("N"),upshift;
d = formonly.descrip_st,noentry;
e = cgtb00005.us_crea,noentry;
e1 = cgtb00005.fech_crea,noentry;
e2 = cgtb00005.us_mod,noentry;
e3 = cgtb00005.fech_mod,noentry;
end
PROYECTO/nodir/nofmmt016.per
+31
View File
@@ -0,0 +1,31 @@
{
--------------------------------------------------------------------------
FORMULARIO : NOFMMT016
OBJETUVO : Actualiza La maestra de empleados <Activando> <Desactivando>
empleados
REALIZADO : Ing. Juan Soto
FECHA : Enero 17, 1993
---------------------------------------------------------------------------
}
DATABASE smarmotech
screen size 24 by 80
{
Ficha [f1 ] [n1 ]
Tipo Empleado : [a][b1 ]
}
tables
adtb00003
attributes
f1 = adtb00003.num_emp,autonext;
n1 = formonly.nombre,noentry;
a = formonly.tipo_emp,noentry;
b1 = formonly.nombre_t,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt017.per
+28
View File
@@ -0,0 +1,28 @@
database smarmotech
screen size 24 by 80
{
Movimiento [b ][k ]
\g------------------------------------------------------\g
Movimiento de agrupamiento
\g------------------------------------------------------\g
[m ] [n ]
[m ] [n ]
[m ] [n ]
[m ] [n ]
}
end
tables
notb00013
attributes
b = notb00013.cod_mov,
comments = "Digite el numero del movimiento Principal";
k = formonly.nombre1,noentry;
m = notb00013.cod_mov_a,
comments = "Digite el numero del movimiento a agrupar";
n = formonly.descrip_mov,noentry;
instructions
screen record scr_mov[4] (cod_mov_a,descrip_mov)
end
PROYECTO/nodir/nofmmt018.per
+47
View File
@@ -0,0 +1,47 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT003
OBJETIVO : Pantalla que captura los numeros y montos de las
facturas de farmacia y plaza lama
Es utilizada por: NOFMMT003
FECHA REALIZACION : Septiembre 09, 1993
------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Codigo Empleado [f000] [f001] [f2] [f3] [a ]
Numero Documento [f004 ]
Fecha Factura [f002 ]
Movimiento [b ] [c ]
Monto [f005 ]
[j]
Usuario Creador [f006 ] Usuario Modificador [f008 ]
Fecha Creacion [f007 ] Fecha Modificacion [f009 ]
}
end
tables
notb00011,notb00002
attributes
f000 = notb00011.num_emp,autonext,
comments = "Digite la ficha del empleado";
f001 = notb00011.departamento,noentry;
f2 = notb00011.nivel_emp,noentry;
f3 = notb00011.cod_puesto,noentry;
a = formonly.descrip1,noentry;
f004 = notb00011.num_doc,autonext,comments = "Digite el numero del documento";
b = notb00011.cod_mov,upshift,autonext,
comments = "Digite el codigo de movimiento";
c = notb00002.descrip_mov,noentry;
f002 = notb00011.fecha,format = "dd/mm/yy";
f005 = notb00011.monto,comments = "Digite el monto del documento";
j = notb00011.status_t,noentry;
f006 = notb00011.us_crea,noentry;
f007 = notb00011.fech_crea,noentry;
f008 = notb00011.us_mod,noentry;
f009 = notb00011.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt019.per
+35
View File
@@ -0,0 +1,35 @@
{
------------------------------------------------------------------------
FORMULARIO : NOFMMT019
OBJETIVO : Pantalla para cambio de departamentos
PROGRAMADOR : Juan F. Soto
FECHA REALIZACION : Septiembre 27, 1994
------------------------------------------------------------------------
}
database smarmotech
screen size 24 by 80
{
Numero Empleado: [n1 ] [nom1 ]
Departamento de: [de1 ] [de2 ]
Departamento a: [de3 ] [de4 ]
}
end
tables
adtb00003,notb00002
attributes
n1 = adtb00003.num_emp,required;
nom1 = formonly.nombre,noentry;
de1 = formonly.depto_de,required;
de2 = formonly.nombre_dp_d,noentry;
de3 = formonly.depto_a,required;
de4 = formonly.nombre_dp_a,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt020.per
+35
View File
@@ -0,0 +1,35 @@
{
=============================================================================
FORMULARIO : NOFMCS020
OBJETIVO : CAPTURAR Y DESPLEGAR INFORMACIONES PARA LOS VALORES DE LOS
PORCIENTOS DE ACCIDENTE DE TRABAJO.
DISENO : Tadeo A. ferreras F.
FECHA : MARZO 22, 1995
=============================================================================
}
DATABASE marmotech
screen size 24 by 80
{
Empleado [ne ]
[nom ]
% Accidente de Trabajo [pa ]
[a]
Usuario Creador [uc ] Usuario Modificador [um ]
Fecha Creacion [fc ] Fecha moficacion [fm ]
}
tables
notb00018
attributes
ne = notb00018.num_emp,comments = "Digite Numero de Empleado";
nom = formonly.nombre,noentry;
pa = notb00018.porc_accidente,comments = "Digite Porciento de Accidente";
a = notb00018.status_t,noentry;
uc = notb00018.us_crea,noentry;
fc = notb00018.fech_crea,noentry;
um = notb00018.us_mod,noentry;
fm = notb00018.fech_mod,noentry;
instructions delimiters " "
end
PROYECTO/nodir/nofmmt021.per
+35
View File
@@ -0,0 +1,35 @@
{
=============================================================================
FORMULARIO : NOFMCS021
OBJETIVO : CAPTURAR Y DESPLEGAR INFORMACIONES PARA LOS VALORES DE LOS
PORCIENTOS DE ACCIDENTE DE TRABAJO.
DISENO : Tadeo A. ferreras F.
FECHA : MARZO 22, 1995
=============================================================================
}
DATABASE marmotech
screen size 24 by 80
{
Empleado [ne ]
[nom ]
% Accidente de Trabajo [pa ]
[a]
Usuario Creador [uc ] Usuario Modificador [um ]
Fecha Creacion [fc ] Fecha moficacion [fm ]
}
tables
notb00018
attributes
ne = notb00018.num_emp,comments = "Digite Numero de Empleado";
nom = formonly.nombre,noentry;
pa = notb00018.porc_accidente,comments = "Digite Porciento de Accidente";
a = notb00018.status_t,noentry;
uc = notb00018.us_crea,noentry;
fc = notb00018.fech_crea,noentry;
um = notb00018.us_mod,noentry;
fm = notb00018.fech_mod,noentry;
instructions delimiters " "
end
PROYECTO/nodir/nofmmt022.per
+21
View File
@@ -0,0 +1,21 @@
database marmotech
screen size 24 by 80
{
Cuenta No. [f01 ][b ]
Nomina [f000]
Tipo [a]
No. Cheque Inicial [p1 ]
No. Cheque Final [p2 ]
}
end
tables
notb00008
attributes
f000 = notb00008.num_nomi;
a = notb00008.tipo_emp,upshift,include=("Q","S","V"),comments=
"Q = Quincenal S = Semenal V = Vendedor";
f01 = formonly.pcuenta_no,comments = "Cuenta Contable";
b = formonly.descripcion;
p1 = formonly.cheque_ini;
p2 = formonly.cheque_fin;
end
PROYECTO/nodir/nofmmt023.4fd
+85
View File
@@ -0,0 +1,85 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="3140a" name="ManagedForm" uid="{b54230b2-ab17-4f66-9e11-5c60822f1055}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{865a09ad-80cf-4402-a730-ba29e3074bf9}" where="">
<RecordField colName="departamento" fieldIdRef="0" fieldType="TABLE_COLUMN" name="adtb00001.departamento" sqlTabName="adtb00001" sqlType="SMALLINT" table_alias_name="" uid="{9fbfe4a5-4c06-428f-9557-d3ef80ca7b7a}"/>
<RecordField colName="nom_dpto" fieldIdRef="1" fieldType="TABLE_COLUMN" name="adtb00001.nom_dpto" sqlTabName="adtb00001" sqlType="CHAR" table_alias_name="" uid="{95077a22-a3da-461c-928f-4a118108f8b5}"/>
<RecordField colName="status_t" fieldIdRef="2" fieldType="TABLE_COLUMN" name="adtb00001.status_t" sqlTabName="adtb00001" sqlType="CHAR" table_alias_name="" uid="{5cd2344e-c3e7-4d78-9671-d9a076561eda}"/>
<RecordField colName="us_crea" fieldIdRef="3" fieldType="TABLE_COLUMN" name="adtb00001.us_crea" sqlTabName="adtb00001" sqlType="CHAR" table_alias_name="" uid="{04d72b4b-abae-4ac2-8fef-1ac360661d0e}"/>
<RecordField colName="us_mod" fieldIdRef="5" fieldType="TABLE_COLUMN" name="adtb00001.us_mod" sqlTabName="adtb00001" sqlType="CHAR" table_alias_name="" uid="{6899df7b-253f-498c-a220-febd56751706}"/>
<RecordField colName="fech_crea" fieldIdRef="4" fieldType="TABLE_COLUMN" name="adtb00001.fech_crea" sqlTabName="adtb00001" sqlType="DATE" table_alias_name="" uid="{df028e44-a866-4148-9ffd-49f5b01c7b8a}"/>
<RecordField colName="fech_mod" fieldIdRef="6" fieldType="TABLE_COLUMN" name="adtb00001.fech_mod" sqlTabName="adtb00001" sqlType="DATE" table_alias_name="" uid="{57212df0-f4d3-4b5b-9557-6d4edcb39f45}"/>
<RecordField colName="" defaultValue="PRODUCCION" fieldIdRef="7" name="tipo_departamento" sqlTabName="" table_alias_name="" uid="{1f9159da-f2f5-45ed-8e6f-415ed004b6ff}"/>
<RecordField colName="" fieldIdRef="8" name="departamento_out" sqlTabName="" table_alias_name="" uid="{f80848d5-7c29-4cb9-9ecc-4bf04605f4d6}"/>
<RecordField colName="" fieldIdRef="9" name="pdepname" sqlTabName="" table_alias_name="" uid="{0a41ae7a-e498-4b96-ae11-71e19a2db65b}"/>
<RecordField fieldIdRef="10" name="app_movil" uid="{f5d5ee4e-46c3-41f7-bf1a-0724f4a7e8d8}"/>
<RecordField fieldIdRef="11" name="num_emp_supervisa" uid="{95e0d738-c791-4520-bf32-c647691448f6}"/>
<RecordField fieldIdRef="12" name="coordinadora" uid="{9baeb0c6-e68f-4efb-8a1e-af2036883055}"/>
<RecordField fieldIdRef="13" name="grupo" uid="{359ec993-3e3c-4928-b577-a7357541cc45}"/>
<RecordField fieldIdRef="16" name="id_maintainx" uid="{b7a726cd-b956-475e-a11e-1d8a5871e3b6}"/>
<RecordField fieldIdRef="17" name="apicheck" uid="{23971d3f-0b70-414b-aeb6-1635d414a1a4}"/>
<RecordField fieldIdRef="18" name="estado_m" uid="{787c0ca6-e15a-4a79-a60b-f12890f16182}"/>
</Record>
<Record name="srelacionados" uid="{76cb11d9-0968-4873-ab55-6cac3cde1c41}">
<RecordField fieldIdRef="14" name="id" uid="{7b22c961-fe39-4726-8d5f-0cf9530972ea}"/>
<RecordField fieldIdRef="15" name="departamento_relaciona" uid="{80139407-f21c-4eb0-9f43-f124c2fe777a}"/>
</Record>
<Form gridHeight="23" gridWidth="82" name="nofmmt023" style="basic" text="MAESTRA DEPARTAMENTO">
<ToolBar name="ToolBar1">
<ToolBarItem comment="Nuevo Departamento" image="new" name="nuevo" text="Departamento"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Departamento"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Grid gridHeight="21" gridWidth="80" name="Grid1" posX="1" posY="1">
<Label posX="1" posY="0" text="Codigo del Departamento"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" autoNext="true" colName="departamento" comment="Digite el codigo del departamento" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="adtb00001.departamento" posX="26" posY="0" sqlTabName="adtb00001" sqlType="SMALLINT" tabIndex="1" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="1" text="Descripcion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="nom_dpto" comment="Digite el nombre del departamento" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="30" name="adtb00001.nom_dpto" posX="26" posY="1" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="2" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label3" posX="57" posY="1" text="App Movil"/>
<ComboBox fieldId="10" gridHeight="1" gridWidth="10" items="SI, NO" name="app_movil" posX="69" posY="1" tabIndex="-1" title="combobox1" widget="ComboBox">
<Item lstrtext="false" name="SI" text="SI"/>
<Item lstrtext="false" name="NO" text="NO"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="Label1" posX="1" posY="2" text="Tipo Departamento"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="PRODUCCION" fieldId="7" gridHeight="1" gridWidth="30" items="ADMINISTRACION, PRODUCCION" name="tipo_departamento" posX="26" posY="2" sqlTabName="" tabIndex="8" table_alias_name="" title="ComboBox1" widget="ComboBox">
<Item lstrtext="false" name="ADMINISTRACION" text="ADMINISTRACION"/>
<Item lstrtext="false" name="PRODUCCION" text="PRODUCCION"/>
</ComboBox>
<Label gridHeight="1" gridWidth="10" name="Label2" posX="1" posY="3" text="ID departamento control empleados"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="8" gridHeight="1" gridWidth="13" name="departamento_out" posX="26" posY="3" sqlTabName="" tabIndex="9" table_alias_name="" title="Edit1" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="9" gridHeight="1" gridWidth="36" name="pdepname" posX="40" posY="3" sqlTabName="" tabIndex="10" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label4" posX="1" posY="4" text="Supervisor"/>
<ComboBox fieldId="11" gridHeight="1" gridWidth="50" items="" name="num_emp_supervisa" posX="26" posY="4" tabIndex="-1" title="combobox1" widget="ComboBox"/>
<Label gridHeight="1" gridWidth="10" name="label5" posX="1" posY="5" text="Coordinador(a)"/>
<Edit fieldId="12" gridHeight="1" gridWidth="30" name="coordinadora" posX="26" posY="5" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="label6" posX="1" posY="6" text="Grupo"/>
<Edit fieldId="13" gridHeight="1" gridWidth="10" name="grupo" posX="26" posY="6" tabIndex="-1" title="edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="11" justify="center" name="label7" posX="60" posY="6" text="ID MAINTAINX"/>
<Label gridHeight="1" gridWidth="10" name="label8" posX="1" posY="7" text="Estado_m"/>
<Edit fieldId="18" gridHeight="1" gridWidth="15" name="estado_m" notNull="true" posX="26" posY="7" required="false" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<Edit fieldId="16" gridHeight="1" gridWidth="11" justify="center" name="id_maintainx" noEntry="true" posX="60" posY="7" scroll="true" tabIndex="-1" title="edit1" widget="Edit"/>
<CheckBox fieldId="17" gridHeight="1" gridWidth="11" name="apicheck" posX="60" posY="8" tabIndex="-1" text="Enviar a MaintainX" title="checkbox1" widget="CheckBox"/>
<Group gridHeight="9" gridWidth="59" name="group1" posX="7" posY="9" text="Departamentos Relacionados">
<Table gridHeight="6" gridWidth="51" name="table1" posX="7" posY="2" totalRows="5">
<Edit fieldId="14" gridHeight="1" gridWidth="8" name="id" noEntry="true" posX="0" posY="0" tabIndex="-1" widget="Edit"/>
<ComboBox fieldId="15" gridHeight="1" gridWidth="40" items="" name="departamento_relaciona" posX="8" posY="0" sizePolicy="dynamic" tabIndex="-1" title="Departamento" unsortable="true" widget="ComboBox"/>
</Table>
</Group>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" fieldId="2" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="adtb00001.status_t" noEntry="true" posX="3" posY="17" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="3" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="18" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="adtb00001.us_crea" noEntry="true" posX="20" posY="18" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="4" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="18" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="adtb00001.us_mod" noEntry="true" posX="64" posY="18" sqlTabName="adtb00001" sqlType="CHAR" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label posX="2" posY="19" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_crea" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="adtb00001.fech_crea" noEntry="true" posX="20" posY="19" sqlTabName="adtb00001" sqlType="DATE" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="19" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fech_mod" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="adtb00001.fech_mod" noEntry="true" posX="64" posY="19" sqlTabName="adtb00001" sqlType="DATE" tabIndex="7" table_alias_name="" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA4ADYANQBhADAAOQBhAGQALQA4ADAAYwBmAC0ANAA0ADAAMgAtAGEANwAzADAALQBiAGEAMgA5AGUAMwAwADcANABiAGYAOQB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewA3ADYAYwBiADEAMQBkADkALQAwADkANgA4AC0ANAA4ADcAMwAtAGEAYgA1ADUALQA2AGMAYQBjADMAYwBkAGUAMQBjADQAMQB9QDAAABQAAAhAMAAAFAAACD90euFHrhR7AQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt023.per
+43
View File
@@ -0,0 +1,43 @@
{
-----------------------------------------------------------------------
FORMULARIO : nofmmt023
OBJETIVO : Capturar registros de la Tabla de Departamentos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 19, 1993
-----------------------------------------------------------------------
}
database smarmotech
TOOLBAR
ITEM nuevo (TEXT="Departamento", IMAGE="new", COMMENT="Nuevo Departamento")
ITEM buscar (TEXT="Buscar Departamento", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="MAESTRA DEPARTAMENTO", STYLE="basic")
GRID
{
Codigo del Departamento [f000]
Descripcion [f001 ]
[j]
Usuario Creador [f002 ] Usuario Modificador [f004 ]
Fecha Creacion [f003 ] Fecha Modificacion [f005 ]
}
end
tables
adtb00001
attributes
f000 = adtb00001.departamento,autonext,
comments = "Digite el codigo del departamento";
f001 = adtb00001.nom_dpto,upshift,
comments = "Digite el nombre del departamento";
j = adtb00001.status_t,noentry;
f002 = adtb00001.us_crea,noentry;
f003 = adtb00001.fech_crea,noentry;
f004 = adtb00001.us_mod,noentry;
f005 = adtb00001.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt024.per
+64
View File
@@ -0,0 +1,64 @@
{
------------------------------------------------------------------
FORMULARIO : NOFMMT004
OBJETIVO : Capturar registros de la Tabla de Puestos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 20, 1993
------------------------------------------------------------------
}
schema smarmotech
TOOLBAR
ITEM nuevo (TEXT="Puestos", IMAGE="new", COMMENT="Nuevo Puesto")
ITEM buscar (TEXT="Buscar Puestos", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="MAESTRA PUESTOS", STYLE="basic")
GRID
{
Codigo del Puesto [f0 ]
Nombre del Puesto [f001 ]
Otra Descripcion [ot ]
Funcion Basica [f002 ]
[f003 ]
Codigo SIRLA [SR1 ]
Nivel [c] Salario Minimo [a ] Salario Maximo [b ]
Tipo Puesto [tp1 ] Supervisa [s1 ]
[j]
Usuario Creador [f004 ] Usuario Modificador [f006 ]
Fecha Creacion [f005 ] Fecha Modificacion [f007 ]
}
end
tables
adtb00004
ATTRIBUTES
COMBOBOX s1 = formonly.supervisor,ITEMS=("SI","NO"),DEFAULT="NO";
COMBOBOX tp1 = formonly.tipo_puesto, ITEMS=("ADMINISTRACION","FABRICA"),DEFAULT="ADMINISTRACION";
f0 = adtb00004.cod_puesto,autonext,
comments = "Digite el codigo del Puesto";
f001 = adtb00004.nom_puesto,upshift,scroll,
comments = "Digite el nombre del Puesto";
ot = formonly.otra_descripcion,scroll,upshift;
f002 = adtb00004.funciones,upshift,
comments = "Digite las funciones relacionadas al Puesto";
f003 = adtb00004.funcion1,upshift,
comments = "Digite las funciones relacionadas al Puesto";
c = adtb00004.nivel_sal,autonext,
comments = "Digite el nivel salarial del Puesto";
a = adtb00004.salario_min,
comments = "Digite el Salario Minimo para el Puesto";
b = adtb00004.salario_max,
comments = "Digite el Salario Maximo para el Puesto";
sr1 = adtb00004.cod_puesto_sirla,COMMENTS = "Digite el ID del puesto para el DGT3 Y DGT4";
j = adtb00004.status_t,noentry;
f004 = adtb00004.us_crea,noentry;
f005 = adtb00004.fech_crea,noentry;
f006 = adtb00004.us_mod,noentry;
f007 = adtb00004.fech_mod,noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt025.4fd
+61
View File
@@ -0,0 +1,61 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" gstVersion="22800" name="ManagedForm" uid="{97132aec-4cce-4c91-a929-79ef219c593d}">
<AGSettings/>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{822c6702-4af6-47ee-86d1-6b3dd93615fd}" where="">
<RecordField colName="numero_nomina" fieldIdRef="0" fieldType="TABLE_COLUMN" name="notb00023.numero_nomina" sqlTabName="notb00023" sqlType="SMALLINT" table_alias_name="" uid="{578cb27f-30eb-4bc5-9df6-3cf28b86bb18}"/>
<RecordField colName="tipo_emp" fieldIdRef="1" fieldType="TABLE_COLUMN" name="notb00023.tipo_emp" sqlTabName="notb00023" sqlType="CHAR" table_alias_name="" uid="{79db08b8-2bd6-453e-a24e-ef526d8b0186}"/>
<RecordField colName="monto_excento" fieldIdRef="3" fieldType="TABLE_COLUMN" name="notb00023.monto_excento" precisionDecimal="12" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" table_alias_name="" uid="{738b7ebe-6196-4345-b0cd-086f4f0a933d}"/>
<RecordField colName="fecha" fieldIdRef="2" name="fecha" sqlTabName="formonly" table_alias_name="" uid="{a2ab6c75-6f09-4469-87da-8c869b284130}"/>
<RecordField colName="porc_15" fieldIdRef="4" fieldType="TABLE_COLUMN" name="notb00023.porc_15" precisionDecimal="12" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" table_alias_name="" uid="{617752fe-5f38-42a7-a08b-edf63b28fc4e}"/>
<RecordField colName="porc_20" fieldIdRef="5" fieldType="TABLE_COLUMN" name="notb00023.porc_20" precisionDecimal="12" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" table_alias_name="" uid="{2100a68a-6b8f-4b32-9c5c-7d591036a749}"/>
<RecordField colName="status_t" fieldIdRef="11" fieldType="TABLE_COLUMN" name="notb00023.status_t" sqlTabName="notb00023" sqlType="CHAR" table_alias_name="" uid="{2f216042-900d-4bc4-b724-9d04e67ee051}"/>
<RecordField colName="porc_25" fieldIdRef="6" fieldType="TABLE_COLUMN" name="notb00023.porc_25" precisionDecimal="12" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" table_alias_name="" uid="{75db0660-d7db-4413-b5e3-9fdd2b515f60}"/>
<RecordField colName="us_crea" fieldIdRef="7" fieldType="TABLE_COLUMN" name="notb00023.us_crea" sqlTabName="notb00023" sqlType="CHAR" table_alias_name="" uid="{8437e04d-3457-4108-9ad9-92459b133c8b}"/>
<RecordField colName="us_mod" fieldIdRef="9" fieldType="TABLE_COLUMN" name="notb00023.us_mod" sqlTabName="notb00023" sqlType="CHAR" table_alias_name="" uid="{7303f5bf-6aaa-4832-a775-31428ffa12cd}"/>
<RecordField colName="fecha_crea" fieldIdRef="8" fieldType="TABLE_COLUMN" name="notb00023.fecha_crea" sqlTabName="notb00023" sqlType="DATE" table_alias_name="" uid="{21035e0f-867e-48e4-b7f4-8616794baea1}"/>
<RecordField colName="fecha_mod" fieldIdRef="10" fieldType="TABLE_COLUMN" name="notb00023.fecha_mod" sqlTabName="notb00023" sqlType="DATE" table_alias_name="" uid="{5db6cbef-ba32-48f7-8efd-e8d2bf3ec8ee}"/>
<RecordField colName="" fieldIdRef="12" name="monto_ars" sqlTabName="" sqlType="FLOAT" table_alias_name="" uid="{edc82f43-34de-4311-9dbc-916a9c44e5da}"/>
<RecordField colName="" fieldIdRef="13" name="monto_afp" sqlTabName="" sqlType="FLOAT" table_alias_name="" uid="{7f4d7ba1-460f-4b4b-92f1-ad9a3e1b7a2f}"/>
</Record>
<Form gridHeight="15" gridWidth="85" name="nofmmt025" style="basic" text="PARAMETRO ISR">
<ToolBar name="ToolBar1">
<ToolBarItem comment="Nuevo Parametro" image="new" name="nuevo" text="Parametro"/>
<ToolBarItem comment="Criterio de busqueda" image="find" name="buscar" text="Buscar Parametro"/>
<ToolBarSeparator name="ToolBarSeparator1"/>
<ToolBarItem image="quit" name="salir" text="Salir"/>
</ToolBar>
<Grid gridHeight="11" gridWidth="82" name="Grid1" posX="1" posY="1">
<Label posX="1" posY="0" text="Numero de Nomina"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="numero_nomina" columnCount="" fieldId="0" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="4" name="notb00023.numero_nomina" posX="20" posY="0" rowCount="" sqlTabName="notb00023" sqlType="SMALLINT" stepX="" stepY="" tabIndex="1" table_alias_name="" widget="Edit"/>
<Label posX="58" posY="0" text="I.S.R."/>
<Label posX="1" posY="1" text="Tipo de Empleado"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" case="upper" colName="tipo_emp" columnCount="" fieldId="1" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00023.tipo_emp" posX="20" posY="1" rowCount="" sqlTabName="notb00023" sqlType="CHAR" stepX="" stepY="" tabIndex="2" table_alias_name="" widget="Edit"/>
<Label posX="40" posY="1" text="Monto Excento"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="monto_excento" columnCount="" fieldId="3" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.monto_excento" posX="55" posY="1" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="3" table_alias_name="" widget="Edit"/>
<Label posX="12" posY="2" text="Fecha"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha" columnCount="" fieldId="2" gridHeight="1" gridWidth="10" name="fecha" posX="20" posY="2" rowCount="" sqlTabName="formonly" stepX="" stepY="" tabIndex="4" table_alias_name="" widget="Edit"/>
<Label posX="49" posY="2" text="15 %"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="porc_15" columnCount="" fieldId="4" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.porc_15" posX="55" posY="2" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="5" table_alias_name="" widget="Edit"/>
<Label posX="49" posY="3" text="20 %"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="porc_20" columnCount="" fieldId="5" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.porc_20" posX="55" posY="3" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="6" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label1" posX="2" posY="4" text="ARS"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" columnCount="" fieldId="12" gridHeight="1" gridWidth="15" name="monto_ars" posX="20" posY="4" rowCount="" sqlTabName="" sqlType="FLOAT" stepX="" stepY="" tabIndex="13" table_alias_name="" title="Edit1" widget="Edit"/>
<Label posX="49" posY="4" text="25 %"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="porc_25" columnCount="" fieldId="6" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="12" name="notb00023.porc_25" posX="55" posY="4" precisionDecimal="12" required="true" rowCount="" scaleDecimal="2" sqlTabName="notb00023" sqlType="DECIMAL" stepX="" stepY="" tabIndex="8" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label2" posX="2" posY="5" text="AFP"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" columnCount="" fieldId="13" gridHeight="1" gridWidth="15" name="monto_afp" posX="20" posY="5" rowCount="" sqlTabName="" sqlType="FLOAT" stepX="" stepY="" tabIndex="14" table_alias_name="" title="Edit2" widget="Edit"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="status_t" columnCount="" fieldId="11" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="1" name="notb00023.status_t" noEntry="true" posX="1" posY="7" rowCount="" sqlTabName="notb00023" sqlType="CHAR" stepX="" stepY="" tabIndex="7" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="8" text="Usuario Creador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_crea" columnCount="" fieldId="7" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00023.us_crea" noEntry="true" posX="23" posY="8" rowCount="" sqlTabName="notb00023" sqlType="CHAR" stepX="" stepY="" tabIndex="9" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="8" text="Usuario Modificador"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="us_mod" columnCount="" fieldId="9" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="9" name="notb00023.us_mod" noEntry="true" posX="64" posY="8" rowCount="" sqlTabName="notb00023" sqlType="CHAR" stepX="" stepY="" tabIndex="10" table_alias_name="" widget="Edit"/>
<Label posX="1" posY="9" text="Fecha Creacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_crea" columnCount="" fieldId="8" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00023.fecha_crea" noEntry="true" posX="23" posY="9" rowCount="" sqlTabName="notb00023" sqlType="DATE" stepX="" stepY="" tabIndex="11" table_alias_name="" widget="Edit"/>
<Label posX="42" posY="9" text="Fecha Modificacion"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="fecha_mod" columnCount="" fieldId="10" fieldType="TABLE_COLUMN" gridHeight="1" gridWidth="16" name="notb00023.fecha_mod" noEntry="true" posX="64" posY="9" rowCount="" sqlTabName="notb00023" sqlType="DATE" stepX="" stepY="" tabIndex="12" table_alias_name="" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewA3ADMAOABiADcAZQBiAGUALQA2ADEAOQA2AC0ANAAzADQANQAtAGIAMABjAGQALQAwADgANgBmADQAZgAwAGEAOQAzADMAZAB9QCAAAAQAAABAUDMzN0AAAAAAAAAAAAAAAQAAAEwAewA3ADUAZABiADAANgA2ADAALQBkADcAZABiAC0ANAA0ADEAMwAtAGIANQBlADMALQA5AGYAZABkADIAYgA1ADEANQBmADYAMAB9QCAAAAQAAABAYxmZnmAAAAAAAAAAAAAAAQAAAEwAewA1AGQAYgA2AGMAYgBlAGYALQBiAGEAMwAyAC0ANAA4AGYANwAtADgAZQBmAGQALQBlADgAZAAyAGIAZgAzAGUAYwA4AGUAZQB9QCAAAAQAAABAa+ZmbWAAAAAAAAAAAAAAAQAAAEwAewAyADEAMAAwAGEANgA4AGEALQA2AGIAOABmAC0ANABiADMAMgAtADkAYwA1AGMALQA3AGQANQA5ADEAMAAzADYAYQA3ADQAOQB9QCAAAAQAAABAXWZmbcAAAAAAAAAAAAAAAQAAAEwAewA1ADcAOABjAGIAMgA3AGYALQAzADAAZQBiAC0ANABiAGMANQAtADkAZABmADYALQAzAGMAZgAyADgAYgA4ADYAYgBiADEAOAB9QCAAAAQAAABAPZmZoQAAAAAAAAAAAAAAAQAAAEwAewA3ADMAMAAzAGYANQBiAGYALQA2AGEAYQBhAC0ANAA4ADMAMgAtAGEANwA3ADUALQAzADEANAAyADgAZgBmAGEAMQAyAGMAZAB9QCAAAAQAAABAZ4AABeAAAAAAAAAAAAAAAQAAAEwAewA2ADEANwA3ADUAMgBmAGUALQA1AGYAMwA4AC0ANAAyAGEANwAtAGEAMAA4AGIALQBlAGQAZgA2ADMAYgAyADgAZgBjADQAZQB9QCAAAAQAAABAWQAABkAAAAAAAAAAAAAAAQAAAEwAewA4ADIAMgBjADYANwAwADIALQA0AGEAZgA2AC0ANAA3AGUAZQAtADgANgBkADEALQA2AGIAMwBkAGQAOQAzADYAMQA1AGYAZAB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewA3AGYANABkADcAYgBhADEALQA0ADYAMABmAC0ANABiADQAYgAtADkAMgBmADEALQBhAGQAOQBhADMAZQAxAGIANwBhADIAZgB9QCAAAAQAAABAcCZmanAAAAAAAAAAAAAAAQAAAEwAewAyAGYAMgAxADYAMAA0ADIALQA5ADAAMABkAC0ANABiAGMANAAtAGIANwAyADQALQA5AGQAMAA0AGUANgA3AGUAZQAwADUAMQB9QCAAAAQAAABAYOZmaqAAAAAAAAAAAAAAAQAAAEwAewA4ADQAMwA3AGUAMAA0AGQALQAzADQANQA3AC0ANAAxADAAOAAtADkAYQBkADkALQA5ADIANAA1ADkAYgAxADMAMwBjADgAYgB9QCAAAAQAAABAZUzM0iAAAAAAAAAAAAAAAQAAAEwAewA3ADkAZABiADAAOABiADgALQAyAGIAZAA2AC0ANAA1ADMAZQAtAGEAMgA0AGUALQBlAGYANQAyADYAZAA4AGIAMAAxADgANgB9QCAAAAQAAABAR5mZn4AAAAAAAAAAAAAAAQAAAEwAewBlAGQAYwA4ADIAZgA0ADMALQAzADQAZABlAC0ANAAzADEAMQAtADkAZABiAGMALQA5ADEANgBhADkAYwA0ADQAZQA1AGQAYQB9QCAAAAQAAABAbhmZoSAAAAAAAAAAAAAAAQAAAEwAewBhADIAYQBiADYAYwA3ADUALQA2AGYAMAA5AC0ANAA0ADYAOQAtADgANwBkAGEALQA4AGMAOAA2ADkAYgAyADgANAAxADMAMAB9QCAAAAQAAABAVJmZnsAAAAAAAAAAAAAAAQAAAEwAewAyADEAMAAzADUAZQAwAGYALQA4ADYANwBlAC0ANAA4AGUANAAtAGIANwBmADQALQA4ADYAMQA2ADcAOQA0AGIAYQBlAGEAMQB9QCAAAAQAAABAabMzOaAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt025.per
+42
View File
@@ -0,0 +1,42 @@
schema smarmotech
TOOLBAR
ITEM nuevo (TEXT="Parametro", IMAGE="new", COMMENT="Nuevo Parametro")
ITEM buscar (TEXT="Buscar Parametro", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="PARAMETRO ISR", STYLE="basic")
GRID
{
Numero de Nomina [a0 ] I.S.R.
Tipo de Empleado [f] Monto Excento [me ]
Fecha [fec ] 15 % [a ]
20 % [b ]
[j] 25 % [c ]
Usuario Creador [f001 ] Usuario Modificador [f003 ]
Fecha Creacion [f002 ] Fecha Modificacion [f004 ]
}
END
end
tables
notb00023
attributes
a0 = notb00023.numero_nomina;
f = notb00023.tipo_emp, upshift;
fec = formonly.fecha;
me = notb00023.monto_excento,required;
a = notb00023.porc_15,required;
b = notb00023.porc_20,required;
c = notb00023.porc_25,required;
f001 = notb00023.us_crea, noentry;
f002 = notb00023.fecha_crea, noentry;
f003 = notb00023.us_mod, noentry;
f004 = notb00023.fecha_mod, noentry;
j = notb00023.status_t, noentry;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt026.4fd
+51
View File
@@ -0,0 +1,51 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm databaseName="smarmotech" fileVersion="31400" gstVersion="31408" name="ManagedForm" uid="{d353a8c0-781c-4530-bb24-cc2f6c66621a}">
<AGSettings>
<DynamicProperties version="2"/>
</AGSettings>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{17412ffb-5155-4b91-b9ad-4cb8e39c2a2c}" where="">
<RecordField colName="kano" fieldIdRef="2" name="kano" sqlTabName="formonly" table_alias_name="" uid="{279e1587-56db-40b7-8092-38a042bd37d4}"/>
<RecordField colName="kmes" fieldIdRef="3" name="kmes" sqlTabName="formonly" table_alias_name="" uid="{8ec48a23-fe4c-4213-b479-dfb9a28d05cf}"/>
<RecordField colName="idioma_office" defaultValue="Ingles" fieldIdRef="1" name="idioma_office" sqlTabName="formonly" table_alias_name="" uid="{b126a166-d810-4ad9-a291-609acdb00472}"/>
<RecordField colName="progreso" fieldIdRef="0" name="progreso" sqlTabName="formonly" table_alias_name="" uid="{d46f0027-6e10-4217-9e0f-bf4751c46be6}"/>
<RecordField colName="" defaultValue="NOR" fieldIdRef="4" name="tipo_reporte" sqlTabName="" table_alias_name="" uid="{23f5b17b-7cdb-451d-a100-f5820c0c6da1}"/>
<RecordField colName="" fieldIdRef="5" name="fecha_inicial" sqlTabName="" table_alias_name="" uid="{8c910910-5e0f-43d9-bd7e-1e8e9ffe67b3}"/>
<RecordField colName="" fieldIdRef="6" name="fecha_final" sqlTabName="" table_alias_name="" uid="{b3c710d5-1817-4117-8d07-8b73e6049b6c}"/>
<RecordField fieldIdRef="7" name="no_registro" uid="{6a7cc7ba-c6e3-448f-ad63-ee5554c4c99c}"/>
</Record>
<Form gridHeight="14" gridWidth="80" name="nofmmt026">
<Grid gridHeight="13" gridWidth="80" name="Grid1" posX="0" posY="0">
<Label posX="6" posY="1" text="Ano"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="kano" fieldId="2" gridHeight="1" gridWidth="4" name="kano" posX="12" posY="1" required="true" sqlTabName="formonly" tabIndex="1" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="10" name="Label1" posX="19" posY="1" text="Tipo Reporte"/>
<ComboBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" defaultValue="NOR" fieldId="4" gridHeight="1" gridWidth="23" items="NORMAL, BONIFICACION CANCELADOS" name="tipo_reporte" posX="30" posY="1" required="true" sqlTabName="" tabIndex="4" table_alias_name="" title="ComboBox1" widget="ComboBox">
<Item lstrtext="false" name="NOR" text="NORMAL"/>
<Item lstrtext="false" name="BON1" text="BONIFICACION CANCELADOS"/>
</ComboBox>
<Label posX="6" posY="2" text="Mes"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="kmes" fieldId="3" gridHeight="1" gridWidth="4" name="kmes" posX="12" posY="2" required="true" sqlTabName="formonly" tabIndex="2" table_alias_name="" widget="Edit"/>
<Label gridHeight="1" gridWidth="7" name="Label2" posX="6" posY="3" text="Rango"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="5" gridHeight="1" gridWidth="10" name="fecha_inicial" noEntry="true" posX="17" posY="3" sqlTabName="" tabIndex="5" table_alias_name="" title="Edit1" widget="Edit"/>
<Label gridHeight="1" gridWidth="3" name="Label3" posX="29" posY="3" text="Al"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" fieldId="6" gridHeight="1" gridWidth="10" name="fecha_final" noEntry="true" posX="34" posY="3" sqlTabName="" tabIndex="6" table_alias_name="" title="Edit2" widget="Edit"/>
<Button gridHeight="1" gridWidth="10" image="open" name="abrir" posX="6" posY="4" tabIndex="-1" text="Abrir"/>
<Label posX="5" posY="5" text="Idioma Office"/>
<RadioGroup aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="idioma_office" defaultValue="Ingles" fieldId="1" gridHeight="2" gridWidth="33" items="Ingles, Espanol" name="idioma_office" posX="20" posY="5" required="true" sqlTabName="formonly" tabIndex="3" table_alias_name="" widget="RadioGroup">
<Item name="I" text="Ingles"/>
<Item name="E" text="Espanol"/>
</RadioGroup>
<Label gridHeight="1" gridWidth="10" name="label4" posX="6" posY="7" text="Cantidad Registros"/>
<Edit fieldId="7" gridHeight="1" gridWidth="10" name="no_registro" posX="19" posY="7" tabIndex="-1" title="edit1" widget="Edit"/>
<Label posX="3" posY="9" text="0"/>
<Label posX="15" posY="9" text="50"/>
<Label posX="27" posY="9" text="100"/>
<Label posX="3" posY="10" text="|"/>
<Label posX="15" posY="10" text="|"/>
<Label posX="27" posY="10" text="|"/>
<ProgressBar aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="progreso" color="green" fieldId="0" gridHeight="1" gridWidth="23" name="progreso" posX="4" posY="11" sqlTabName="formonly" table_alias_name="" valueMax="100" valueMin="0" widget="ProgressBar"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewAxADcANAAxADIAZgBmAGIALQA1ADEANQA1AC0ANABiADkAMQAtAGIAOQBhAGQALQA0AGMAYgA4AGUAMwA5AGMAMgBhADIAYwB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>
PROYECTO/nodir/nofmmt026.per
+26
View File
@@ -0,0 +1,26 @@
schema smarmotech
screen size 24 by 80
{
Ano [a0 ]
Mes [f ]
Idioma Office [x1 ]
0 50 100
| | |
[p1 ]
}
end
ATTRIBUTES
PROGRESSBAR p1 = formonly.progreso,VALUEMIN=0,VALUEMAX=100,COLOR=GREEN;
RADIOGROUP x1 = FORMONLY.idioma_office, ITEMS = (("I","Ingles"),("E","Espanol"));
a0 = formonly.kano;
f = formonly.kmes;
instructions
delimiters " "
end
PROYECTO/nodir/nofmmt027.4fd
+20
View File
@@ -0,0 +1,20 @@
<?xml version="1.0" encoding="UTF-8" ?>
<ManagedForm gstVersion="22800" name="ManagedForm" uid="{21ca289d-446e-4b31-b820-2cb351d57f9e}">
<AGSettings/>
<Record additionalTables="" joinLeft="" joinOperator="" joinRight="" name="Undefined" order="" uid="{3d078e01-f60b-432e-bbf5-b2fd2bc29d03}" where="">
<RecordField colName="" defaultValue="NO" fieldIdRef="1" name="Chdepartamento" sqlTabName="" table_alias_name="" uid="{c1934c61-2a8a-45f1-80a2-dc6e54a76986}"/>
<RecordField colName="" defaultValue="NO" fieldIdRef="3" name="Chempleados" sqlTabName="" table_alias_name="" uid="{0d369501-a4c1-4d0d-880a-abd2bb8c5b0f}"/>
<RecordField colName="" fieldIdRef="2" name="estado" sqlTabName="" table_alias_name="" uid="{301e38d5-0a16-4131-9ada-f6708727292f}"/>
</Record>
<Form gridHeight="16" gridWidth="80" name="Form" text="Form">
<Grid gridHeight="11" gridWidth="44" name="Grid1" posX="8" posY="3">
<Label gridHeight="1" gridWidth="28" name="Label1" posX="6" posY="1" text="PROCESO DESCARGA DATOS"/>
<CheckBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" columnCount="" defaultValue="NO" fieldId="1" gridHeight="1" gridWidth="17" name="Chdepartamento" posX="6" posY="3" rowCount="" sqlTabName="" stepX="" stepY="" tabIndex="1" table_alias_name="" text="Departamentos" title="CheckBox1" valueChecked="SI" valueUnchecked="NO" widget="CheckBox"/>
<CheckBox aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" columnCount="" defaultValue="NO" fieldId="3" gridHeight="1" gridWidth="16" name="Chempleados" posX="6" posY="5" rowCount="" sqlTabName="" stepX="" stepY="" tabIndex="2" table_alias_name="" text="Empleados" title="CheckBox1" valueChecked="SI" valueUnchecked="NO" widget="CheckBox"/>
<Edit aggregateColName="" aggregateName="" aggregateTableAliasName="" aggregateTableName="" colName="" columnCount="" fieldId="2" gridHeight="1" gridWidth="22" name="estado" posX="6" posY="7" rowCount="" sqlTabName="" stepX="" stepY="" tabIndex="3" table_alias_name="" title="Edit1" widget="Edit"/>
</Grid>
</Form>
<DiagramLayout>
<![CDATA[AAAAAgAAAEwAewAwAGQAMwA2ADkANQAwADEALQBhADQAYwAxAC0ANABkADAAZAAtADgAOAAwAGEALQBhAGIAZAAyAGIAYgA4AGMANQBiADAAZgB9QCAAAAgAAAFAR5mZpWZmaAAAAAAAAAAAAQAAAEwAewAzADAAMQBlADMAOABkADUALQAwAGEAMQA2AC0ANAAxADMAMQAtADkAYQBkAGEALQBmADYANwAwADgANwAyADcAMgA5ADIAZgB9QCAAAAgAAAFAUDMzO0zMzgAAAAAAAAAAAQAAAEwAewAzAGQAMAA3ADgAZQAwADEALQBmADYAMABiAC0ANAAzADIAZQAtAGIAYgBmADUALQBiADIAZgBkADIAYgBjADIAOQBkADAAMwB9AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAEwAewBjADEAOQAzADQAYwA2ADEALQAyAGEAOABhAC0ANAA1AGYAMQAtADgAMABhADIALQBkAGMANgBlADUANABhADcANgA5ADgANgB9QCAAAAgAAAFAPZmZqGZmaAAAAAAAAAAAAQ==]]>
</DiagramLayout>
</ManagedForm>

Some files were not shown because too many files have changed in this diff Show More