Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 10

changes.mady.by.user Laura Elena Medina Prado

Gravado em

comparado com

Nova versão 11

changes.mady.by.user Laura Elena Medina Prado

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

PREGUNTAS (SX1) : GPER015B

X1_ORDEMX1_PERSPAX1_TIPOX1_TAMANHOX1_GSCX1_VALIDX1_F3X1_VAR01X1_
CNT01
DEFSPA1X1_DEFSPA2X1_DEFSPA3X1_PRESELHelp
01
¿Proceso
¿Procedimiento?C
5
3EditNaoVazio() .And. ExistCpo(
'RCJ')                            
"SRY",MV_PAR01,1)                           SRY
RCJ
MV_PAR01



Informe el
proceso
procedimiento
02
¿Procedimiento
¿Proceso?C
3
5Edit
Gpr040Roteiro
NaoVazio()
  
.And. ExistCpo("RCJ",MV_PAR02,1)                 RCJMV_PAR02



Informe el proceso
SRYMV_PAR02Informe el procedimiento
03¿Periodo?C6Edit
Gpr040Valid(MV_PAR01 + MV_PAR02 + MV_PAR03)                 RCHRLE
NaoVazio() .And. fVldPerLi(1)                                            RCHLSPMV_PAR03



Informe el período
04
¿Sucursal
¿Num de Pago ?  C
99RangeXM0
2EditNaoVazio() .And. fVldNPgLi(1)                               RCHLSNMV_PAR04
RA_FILIALInforme la sucursal o rango de sucursales.




Informe el nro de pago. 
05¿Número de Liquidación ?      C5Edit

MV_PAR05



Informe el número de la liquidación.
06¿Tipo Liquidación ?           C1Combo

MV_PAR06M=Mensual             Q=Quincenal    S=Semanal      2Informe el tipo de liquidación.
07¿Nombre del Archivo ?         C99EditNaoVazio()                                                  
MV_PAR07



Informe el nombre del archivo.
08¿Ruta del Archivo?C99EditGPER015Dir(2)                                               
MV_PAR08



Informe la ruta donde se generará el archivo.

09¿Identificación de Envio ?    C1Combo

MV_PAR091 - SJ         2 - RE         
1Informe la identificación del
05¿Ruta Archivo?C99EditNaoVazio()HSSDIRMV_PAR05Informe la ruta donde se generará el
archivo.


CAMPOS (SX3): RCH - PERIODOS

...

         

Tabla alfanumérica  S042 – Libro de Sueldo Digital:

El cambio de los campos 034 al 047 se debe realizar de manera manual en caso de requerir la acumulación.

Secuencia

Descripción

Lectura

Inicio

Longitud

Formula o dato

001IDENTIFICACION DEL TIPO DE REGISTROE1204
002CUIL DEL TRABAJADORE314SRA->RA_CIC
003MARCA DE CONYUGEE141XQTDPARC
004CANTIDAD DE HIJOSE152XQTDPARF
005MARCA DE TRABAJADOR EN CCTE171IIF(SRA->RA_CODCONV $ "002/004","1","0")
006MARCA DE COBERTURA DE SCVOE181IIF( SRA->RA_SEGVIDA=="1","1","0" )
007MARCA DE SI CORRESPONDE REDUCCIONE1910
008COD. DE EMPLEADOR ASOCIADO AL TRABE2011

009

CODIGO DE TIPO DE OPERACION E2110
010CODIGO DE SITUACION DE REVISTAE222STRZERO(VAL(STATICCALL(GPER801,SITUACION)),2)
011CODIGO DE CONDICIONE242SRA->RA_COND
012CODIGO DE ACTIVIDADE263STRZERO(VAL(SRA->RA_ATIV),3)
013CODIGO DE MODALIDAD DE CONTRATACIONE293SRA->RA_MODALID
014CODIGO DE SINIESTRADOE322SRA->RA_SINIEST
015CODIGO DE LOCALIDADE342STRZERO(VAL(SRA->RA_ZONA),2)
016SITUACION DE REVISTA 1E362STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"1","S")),2)
017DIA DE INICIO SITUACION REVISTA 1E382STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"1","D")),2)
018SITUACION DE REVISTA 2E402STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"2","S")),2)
019DIA DE INICIO SITUACION REVISTA 2E422STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"2","D")),2)
020SITUACION DE REVISTA 3E442STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"3","S")),2)
021DIA DE INICIO SITUACION REVISTA 3E462STRZERO(VAL(STATICCALL(GPER801,SITUAREV,"3","D")),2)
022CANTIDAD DE DIAS TRABAJADOSE482STRZERO(STATICCALL(GPER801,TSICOSS,"H","8C9"),2)'})
023CANTIDAD DE HORAS TRABAJADASE503STRZERO(STATICCALL(GPER801,TSICOSS,"V","8E7"),3)
024PORCENTAJE APORTE ADIC. DE SEG. SOCE535PADL("",5,"0")
025PORCENTAJE CONTRIB. POR TAREA DIFE585IIF( SRA->RA_CODCONV =="003","000002,00","000000,00")
026CODIGO OBRA SOCIAL DEL TRABAJADORE636SRA->RA_CFGOSOC
027CANTIDAD ADHERENTES DE OBRA SOCIALE692IIF(!EMPTY(SRA->RA_DPASSME),SRA->RA_DPASSME,"00")
028APORTE ADICIONAL DE OBRA SOCIALE7115

STRZERO(STATICCALL(GPER801,TSICOSS,"V","821"),15)

029CONTRIBUCION ADICIONAL OBRA SOCIALE8615STRZERO(STATICCALL(GPER801,TSICOSS,"V","84A"),15)
030CALCULO DIF. DE APORTE DE O/S Y FSRE10115PADL("",15,"0")
031CALCULO DIF. DE CONTR DE O/S Y FSRE11615PADL("",15,"0")
032CALCULO DIF. LEY DE RIESGO DE TRABE13115PADL("",15,"0")
033REMUNERACION MATERNIDAD PARA ANSESE14615PADL("",15,"0")
034REMUNERACION BRUTAE16115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","800"),"@E 9999999999999.99")),",",""),".",""),15,"0")
035BASE IMPONIBLE 1E17615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","801"),"@E 9999999999999.99")),",",""),".",""),15,"0")
036BASE IMPONIBLE 2E19115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","802"),"@E 9999999999999.99")),",",""),".",""),15,"0")
037BASE IMPONIBLE 3E20615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","803"),"@E 9999999999999.99")),",",""),".",""),15,"0")
038BASE IMPONIBLE 4E22115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","804"),"@E 9999999999999.99")),",",""),".",""),15,"0")
039BASE IMPONIBLE 5E23615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","805"),"@E 9999999999999.99")),",",""),".",""),15,"0")
040BASE IMPONIBLE 6E25115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","806"),"@E 9999999999999.99")),",",""),".",""),15,"0")
041BASE IMPONIBLE 7E26615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","807"),"@E 9999999999999.99")),",",""),".",""),15,"0")
042BASE IMPONIBLE 8E28115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","808"),"@E 9999999999999.99")),",",""),".",""),15,"0")
043BASE IMPONIBLE 9E29615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0")
044BASE IMPONIBLE 10E31115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0")
045BASE IMPONIBLE 11E32615PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0")
046BASE IMPONIBLE 12E34115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0")
047BASE IMPONIBLE 13E35115PADL(STRTRAN(STRTRAN(ALLTRIM(TRANSFORM(OBTACULSD("V","809"),"@E 9999999999999.99")),",",""),".",""),15,"0")

...