DMICNS-7145
Al ejecutar la rutina "Libro de Sueldo Digital" (GPER015.PRW) y seleccionar la opción "2 - Detalle", genera un error.log y no genera el archivo. El error solo sucede si algún empleado tiene registro en el maestro de Ausencias (SR8).
Error.log: HREAD ERROR ([15052], totvs, HELP2017DPPSJ2) 02/10/2019 17:10:55 variable does not exist ARCMDATA on SITUAREV(GPER801.PRW) 28/08/2018 14:22:30 line : 2199
Se valida el tipo de dato de la variable "ARCMDATA", para que no genere error.log.
DMICNS-7200
Al ejecutar la rutina Libro de Sueldo Digital (GPER015.PRW) opción “2 – Detalle”, se identifican algunos puntos por los cuales el archivo no se genera de acuerdo al documento LSDiseInterfazLiquidacion (ver al final), se solicita se hagan las adecuaciones considerando el documento de requisitos establecidos por el Organismo Fiscal de Argentina.
Para cumplir con la funcionalidad se realizan diversas adecuaciones:
1. Se agregan 2 preguntas al grupo de preguntas GPER015B de la rutina Libro de Sueldo Digital (GPER015.PRW):
08 - ¿Identificación de Envío?
09 - ¿Número de Liquidación?
2. Se modifican algunos campos de la tabla Alfanumérica S042 y se agregan los campos del 44 al 47.
3. Se realizan las adecuaciones en la funcionalidad de la rutina de Libro de Sueldo Digital para cumplir con lo establecido por el Organismo Fiscal de Argentina.
El patch contiene las rutinas:
Haga copia de seguridad del RPO antes de aplicar el patch con la solución.
Configuraciones Previas:
Proceso
Nota: Los ítems de la tabla ‘S041 - Equivalencia Conceptos AFIP’ serán cargados por el usuario de forma manual.
Se anexa los ítems de la tabla "S042" que se deja por default: (Cambios realizados a la tabla en el issue DMICNS-7296).
Secuencia | Descripción | Lectura | Inicio | Longitud | Formula o dato |
---|---|---|---|---|---|
001 | IDENTIFICACION DEL TIPO DE REGISTRO | E | 1 | 2 | 04 |
002 | CUIL DEL TRABAJADOR | E | 3 | 14 | SRA->RA_CIC |
003 | MARCA DE CONYUGE | E | 14 | 1 | XQTDPARC |
004 | CANTIDAD DE HIJOS | E | 15 | 2 | XQTDPARF |
005 | MARCA DE TRABAJADOR EN CCT | E | 17 | 1 | IIF(SRA->RA_CODCONV $ "002/004","1","0") |
006 | MARCA DE COBERTURA DE SCVO | E | 18 | 1 | IIF( SRA->RA_SEGVIDA=="1","1","0" ) |
007 | MARCA DE SI CORRESPONDE REDUCCION | E | 19 | 1 | 0 |
008 | COD. DE EMPLEADOR ASOCIADO AL TRAB | E | 20 | 1 | 1 |
009 | CODIGO DE TIPO DE OPERACION | E | 21 | 1 | 0 |
010 | CODIGO DE SITUACION DE REVISTA | E | 22 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUACION)),2) |
011 | CODIGO DE CONDICION | E | 24 | 2 | SRA->RA_COND |
012 | CODIGO DE ACTIVIDAD | E | 26 | 3 | STRZERO(VAL(SRA->RA_ATIV),3) |
013 | CODIGO DE MODALIDAD DE CONTRATACION | E | 29 | 3 | SRA->RA_MODALID |
014 | CODIGO DE SINIESTRADO | E | 32 | 2 | SRA->RA_SINIEST |
015 | CODIGO DE LOCALIDAD | E | 34 | 2 | STRZERO(VAL(SRA->RA_ZONA),2) |
016 | SITUACION DE REVISTA 1 | E | 36 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"1","S")),2) |
017 | DIA DE INICIO SITUACION REVISTA 1 | E | 38 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"1","D")),2) |
018 | SITUACION DE REVISTA 2 | E | 40 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"2","S")),2) |
019 | DIA DE INICIO SITUACION REVISTA 2 | E | 42 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"2","D")),2) |
020 | SITUACION DE REVISTA 3 | E | 44 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"3","S")),2) |
021 | DIA DE INICIO SITUACION REVISTA 3 | E | 46 | 2 | STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"3","D")),2) |
022 | CANTIDAD DE DIAS TRABAJADOS | E | 48 | 2 | STRZERO(STATICCALL(GPER801,TSICOSS,"H","8C9"),2)'}) |
023 | CANTIDAD DE HORAS TRABAJADAS | E | 50 | 3 | STRZERO(STATICCALL(GPER801,TSICOSS,"V","8E7"),3) |
024 | PORCENTAJE APORTE ADIC. DE SEG. SOC | E | 53 | 5 | PADL("",5,"0") |
025 | PORCENTAJE CONTRIB. POR TAREA DIF | E | 58 | 5 | IIF( SRA->RA_CODCONV =="003","000002,00","000000,00") |
026 | CODIGO OBRA SOCIAL DEL TRABAJADOR | E | 63 | 6 | SRA->RA_CFGOSOC |
027 | CANTIDAD ADHERENTES DE OBRA SOCIAL | E | 69 | 2 | IIF(!EMPTY(SRA->RA_DPASSME),SRA->RA_DPASSME,"00") |
028 | APORTE ADICIONAL DE OBRA SOCIAL | E | 71 | 15 | STRZERO(STATICCALL(GPER801,TSICOSS,"V","821"),15) |
029 | CONTRIBUCION ADICIONAL OBRA SOCIAL | E | 86 | 15 | STRZERO(STATICCALL(GPER801,TSICOSS,"V","84A"),15) |
030 | CALCULO DIF. DE APORTE DE O/S Y FSR | E | 101 | 15 | PADL("",15,"0") |
031 | CALCULO DIF. DE CONTR DE O/S Y FSR | E | 116 | 15 | PADL("",15,"0") |
032 | CALCULO DIF. LEY DE RIESGO DE TRAB | E | 131 | 15 | PADL("",15,"0") |
033 | REMUNERACION MATERNIDAD PARA ANSES | E | 146 | 15 | PADL("",15,"0") |
034 | REMUNERACION BRUTA | E | 161 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","800"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
035 | BASE IMPONIBLE 1 | E | 176 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","801"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
036 | BASE IMPONIBLE 2 | E | 191 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","802"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
037 | BASE IMPONIBLE 3 | E | 206 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","803"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
038 | BASE IMPONIBLE 4 | E | 221 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","804"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
039 | BASE IMPONIBLE 5 | E | 236 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","805"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
040 | BASE IMPONIBLE 6 | E | 251 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","806"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
041 | BASE IMPONIBLE 7 | E | 266 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","807"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
042 | BASE IMPONIBLE 8 | E | 281 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","808"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
043 | BASE IMPONIBLE 9 | E | 296 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
044 | BASE IMPONIBLE 10 | E | 311 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
045 | BASE IMPONIBLE 11 | E | 326 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
046 | BASE IMPONIBLE 12 | E | 341 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
047 | BASE IMPONIBLE 13 | E | 351 | 15 | PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(STATICCALL(GPER801,TSICOSS,"V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0") |
NOTA: Cualquier adecuación sobre el Registro 04 del archivo "Libro Sueldo Digital", se debe modificar sobre la tabla S042 de acuerdo a su necesidad. Para realizar los cambios debe entrar a la rutina de "Mantenimiento de tablas", seleccionar la tabla "S042" y modificar el campo que requiera. Adicional los campos del 44 al 47 se deben cambiar el concepto que le corresponde, por el momento solo se deja el concepto "809" como ejemplo.
Verificar que la estructura de la tabla S042 para el campo FORMULA sea tamaño 130, en caso contrario borrar la tabla y volver a entrar a Definición de tablas para que se recree con el tamaño correcto.
¿Procedimiento?: Informar el número de procedimiento de cálculo. Ingresar manualmente o presionar ‘F3’ para consultar los procedimientos.
¿Proceso?: Informar el número de proceso. Ingresar manualmente o presionar ‘F3’ para consultar los procesos.
¿Periodo?: Informar el número de periodo. Ingresar manualmente o presionar ‘F3’ para consultar los periodos.
¿Núm de Pago?: Informar el número de pago. Ingresar manualmente o presionar ‘F3’ para consultar el número de pago.
¿Tipo Liquidación?: Seleccionar el tipo de liquidación, las opciones disponibles son:
¿Nombre del Archivo?: Informar el nombre con el cual será creado el archivo de texto.
¿Ruta del Archivo?: Informar la ruta donde será creado el archivo de texto.
¿Identificación de Envío? Seleccionar el tipo de Envío, las opciones disponibles son:
Código del paquete: 006670
Paquete: DMICNS-7200– LIBRO DE SUELDO DIGITAL OPCIÓN 2-DETALLE
* Código del paquete para uso interno.
Diccionario de datos - Archivo de Preguntas (SX1)
Orden | Pregunta | Tipo de dato | Tamaño | Picture | Modo Entrada | Definición 1 | Definición 2 |
---|---|---|---|---|---|---|---|
08 | ¿Identificación de Envió? | Carácter | 1 | Combo | 1 - SJ | 2 - RE | |
09 | ¿Número de Liquidación? | Numérico | 5 | @E 99999 | Get |
Implementación "Libro de Sueldo Digital": https://tdn.totvs.com/x/QGBNDQ
Documento LSDiseInterfazLiquidacion.pfd