Árvore de páginas

Versões comparadas

Chave

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

...

CódigoSecuencia1ra ExpresiónOperación 12da ExpresiónResultadoComentario
518ORD000001#TRACE_ON

Se verifica que los cálculos puedan iniciarse conforme al mnemónico NOCALCULA.
518ORD000002NOCALCULASI_IGUAL1FINAL
518ORD000003DIASLICSI_IGUAL0CONT_SINLICSe verifica que NO existan licencias en el período; de ser así, se asigna la base imponible correspondiente al período actual. En caso de que existan licencias en el período, se asigna el mnemónico RENIMPMSAN (641ORD), el cual contiene la base imponible del último mes trabajado por 30 días completos.


518ORD000004
MUEVERENIMPMSANIMPORTE
518ORD000005
SALTA
CONT_LIC
518ORD000006CONT_SINLICETIQUETA

518ORD000007
MUEVEBSEIMPONIBIMPORTE
518ORD000008CONT_LICETIQUETA

518ORD000009
MUEVEPRODIASPERUNIDADESSe trasladan a unidades los días del período, los cuales serán siempre 30.
518ORD000010FINALETIQUETA


518ORD000011#TRACE_OFF



521ORDA - SIS BASE MES ANTERIOR.

Código

Secuencia

1ra Expresión

Operación 1

2da Expresión

Resultado

Comentario
521ORDA000001#TRACE_ON


521ORDA000002NOCALCULASI_IGUAL1FINAL
521ORDA000003DIASLICSI_IGUAL0FINALSe verifica que existan licencias.
521ORDA000004
MUEVEINCIMPINCIMPORTE

Se verifica si existen incidencias de importe; en caso afirmativo, se finaliza el proceso. De lo contrario, este continúa.

521ORDA000005IMPORTESI_DIFERENTE0FINAL
521ORDA000006
MUEVETOTAFCMESAIMPORTESe traslada el mnemónico TOTAFCMESA, obtenido de la fórmula anterior, y se asigna al importe; de esta manera, se evita realizar un doble ciclo.
521ORDA000007
MUEVEIMPORTETOTSISMESA
521ORDA000008FINALETIQUETA


521ORDA000009#TRACE_OFF


661ORDA - AFC BASE IMPONIBLE MES ANT.

Código

Secuencia

1ra Expresión

Operación 1

2da Expresión

Resultado

Comentario
661ORDA000001#TRACE_ON


661ORDA000002NOCALCULASI_IGUAL1FINAL
661ORDA000003DIASLICSI_IGUAL0FINAL

Se verifica que existan licencias.

661ORDA000004
MUEVEINCIMPINCIMPORTE

Se verifica si existen incidencias de importe; en caso afirmativo, se finaliza el proceso. De lo contrario, este continúa.

661ORDA000005IMPORTESI_DIFERENTE0FINAL
661ORDA000006#SE ALISTAN VARIABLESPARA CICLO

Se obtienen las variables que se utilizarán en el ciclo de búsqueda, tomando como base la fecha de ingreso del trabajador y la fecha inicial del cálculo.
661ORDA000007
MUEVEPERANIOPERANO_INI_ACU
661ORDA000008
MUEVEANO_INI_ACUANO_FIN_ACU
661ORDA000009
ANOPERFECININAUX_01
661ORDA000010
ANOEMPFECINGNAUX_02
661ORDA000011
MESPERFECININAUX_03
661ORDA000012
MESEMPFECINGNAUX_04
661ORDA000013NAUX_02VALTOSTR2CAUX_01
661ORDA000014NAUX_04VALTOSTR2CAUX_02
661ORDA000015#INICIO DEL CICLO PARABUSCAR MESCON 30D LABORADOSSe inicia el ciclo, verificando que el mes de cálculo sea igual a Enero Al no encontrar un período sin licencias, retrocede un mes más con la finalidad de identificar un período sin licencias.
661ORDA000016CICLO_INIETIQUETA

661ORDA000017NAUX_03SI_IGUAL1RESET_VAR
661ORDA000018NAUX_03RESTA1NAUX_03
661ORDA000019NAUX_03VALTOSTR2MES1
661ORDA000020
SALTA
BUSCA_ACUM
661ORDA000021#REINICIA AÑO ANTERIORCUANDO ESENERO
Al ser el mes de enero, se debe reiniciar la búsqueda al año anterior; por ello, el proceso valida inicialmente desde diciembre del año previo. Posteriormente, se verifica que el mes y año resultantes no sean anteriores a la fecha de ingreso del trabajador.
661ORDA000022RESET_VARETIQUETA

661ORDA000023NAUX_01RESTA1NAUX_01
661ORDA000024NAUX_01VALTOSTR2ANO_INI_ACU
661ORDA000025
MUEVEANO_INI_ACUANO_FIN_ACU
661ORDA000026
MUEVE"12"MES1
661ORDA000027
MUEVE12NAUX_03
661ORDA000028CAUX_01SI_MENORANO_INI_ACUBUSCA_ACUM
661ORDA000029CAUX_02SI_MENORMES1BUSCA_ACUM
661ORDA000030
SALTA
BUSCA_BASE
661ORDA000031#VERIFICA SI HUBOLICENCIASEN EL MES CONSULTADO

Se inicia la búsqueda del último período en el que el empleado haya trabajado 30 días completos, verificando que no existan licencias registradas durante dicho período.

661ORDA000032BUSCA_ACUMETIQUETA

661ORDA000033
FILTRO_ACUM

661ORDA000034
FILTRO_ACUM'001,005,006,007'
661ORDA000035MES1SUMA_UNIDADESMES1NAUX_05
661ORDA000036NAUX_05MULTIPLICA-1NAUX_05
661ORDA000037NAUX_05SI_MAYOR0CICLO_INI
661ORDA000038#CONSULTA LA BASEDE AFCMES ANTERIOR
Al no encontrar licencias, busca la base salarial de dicho periodo, usando el concepto ‘501’, finalizando el ciclo. El concepto 501(AFP), 660(AFC) Y 520(SIS) usan las mismas bases.
661ORDA000039BUSCA_BASEETIQUETA

661ORDA000040
FILTRO_ACUM

661ORDA000041
FILTRO_ACUM'501'
661ORDA000042MES1SUMA_IMPORTESMES1NAUX_06
661ORDA000043NAUX_06MULTIPLICA-1NAUX_06
661ORDA000044CICLO_FINETIQUETA

661ORDA000045NAUX_06SI_DIFERENTE0CONT_VALORToma como base el último período trabajado con 30 días completos, se verifica que su valor no sea igual a 0 (Si es igual a 0 toma como referencia el salario del empleado). Luego redondea el valor obtenido.
661ORDA000046
MUEVEEMPSALARIONAUX_06
661ORDA000047CONT_VALORETIQUETA

661ORDA0000480REDONDEANAUX_06IMPORTE
661ORDA000049
MUEVEIMPORTETOTAFCMESA
661ORDA000050FINALETIQUETA


661ORDA000051#TRACE_OFF


662ORD - AFC TRABAJADOR.

Código

Secuencia

1ra Expresión

Operación 1

2da Expresión

Resultado

Comentario
662ORD000001#TRACE_ON


662ORD000002NOCALCULASI_IGUAL1FINAL
662ORD000003EMPAFCAFECSI_IGUAL'2'FINAL
662ORD000004EMPTPOTRASI_IGUAL'2'FINAL
662ORD000005DIASLICSI_IGUAL0CONT_01
662ORD000006TOTAFCMESADIVIDEPRODIASPERCESANT30Se traslada el mnemónico TOTAFCMESA, obtenido de la fórmula anterior, y se asigna al importe; de esta manera, se evita realizar un doble ciclo.
662ORD000007CESANT30MULTIPLICADIASLICCESANT30
662ORD000008CESANT30SUMABSECESANTCESANT30
662ORD000009
SALTA
CONT_02
662ORD000010CONT_01ETIQUETA


662ORD000011
MUEVEBSECESANTCESANT30
662ORD000012CONT_02ETIQUETA


662ORD000013
BUSCATABLA_S005

662ORD000014ELEMENTO_01HASTA_IGUALEMPTPCONTR
662ORD000015ELEMENTO_07DIVIDE100NAUX_04
662ORD000016NAUX_04MULTIPLICACESANT30FDOSOLIDAR
662ORD0000170REDONDEAFDOSOLIDARFDOSOLIDAR
662ORD000018
MUEVEELEMENTO_07PORSOLIDAR
662ORD000019#ANTIGUEDAD AFC11 ANIOS D ANT

662ORD000020EMPAFCAFECSI_IGUAL'3'FINAL
662ORD000021#AFECTO A CESANTIA


662ORD000022ELEMENTO_03DIVIDE100NAUX_00
662ORD000023NAUX_00MULTIPLICABSECESANTIMPORTE
662ORD000024IMPORTESI_IGUAL0CONT_03
662ORD0000250REDONDEAIMPORTEIMPORTE
662ORD000026
MUEVEELEMENTO_03UNIDADES
662ORD000027
MUEVEEMPCODAFPENTIDAD
662ORD000028CONT_03ETIQUETA


662ORD000029ELEMENTO_04DIVIDE100NAUX_01
662ORD000030NAUX_01MULTIPLICACESANT30CESEMPRESA
662ORD0000310REDONDEACESEMPRESACESEMPRESA
662ORD000032
MUEVEELEMENTO_04PORCESEMP
662ORD000033ELEMENTO_06DIVIDE100NAUX_02
662ORD000034NAUX_02MULTIPLICACESANT30CTAINDIVID
662ORD0000350REDONDEACTAINDIVIDCTAINDIVID
662ORD000036
MUEVEELEMENTO_06PORCTAIND
662ORD000037FINALETIQUETA


662ORD000038#TRACE_OFF


05. Asuntos Relacionados

Documento de Referencia de la Localización de Chile:

...