====== Recyclage IEVREC1 ======

===== Test en Mac =====

==== Pre-requis ====

=== Ficher compta du jour produit par coda ===

<code>
Recopier le fichier COMPTA de production
ET2P.U20000.UJP.DATLIB.MVTRDJ(COMPTA)
dans
UZ10434.DATLIB.MVTRDJ(COMPTA)
</code>

Puis lancer le

<code>
TJXICJCG en modifiant la ligne 171 avec la bib UZ10434.DATLIB.MVTRDJ(COMPTA) (IT2JUURXIC510000)
</code>

=== Date de traitement LC a jour ===

lancer une requête de mise a jour de la date LC

<code>
update tx0rpar set DTPAREXP = 'YYYY-MM-DD' where coparexp = 'DTTRT'
</code>

puis lancer

<code>
JHXPCJ0F (IT2JUURXIC500000 step 020)
JHXPCJ0G (IT2JUURXIC500000 step 030)
</code>

==== Mise en place des fichiers ====

  * DUMMY ⇒ &ALIAS$$.&PERIODJ.&RETEP$$.CREGRECO
  * DUMMY ⇒ &ALIAS$$.&PERIODJ.&RETEP$$.CMR1.REPRISE
  * DUMMY ⇒ &ALIASD$.&PERIODJ.&RETEP$$.CMR1.IEVREC(+1)
  * DUMMY ⇒ &ALIASD$.&PERIODJ.&RETEP$$.CMR2.IEVREC(+1)
  * IEVREC1 fournie par la MOA ⇒ &ALIAS$$.&PERIODJ.&RETEP$$.CREGRECO

==== Lancement des traitements ====

^Vacation LC^ | |
|T2XICJV1|RDJEXP - Vacation 01 : Interprétation|IT2JUURXIC520000|
|T2XICJV2|RDJEXP - Vacation 02 : Agrégation|IT2JUURXIC530000|
|T2XICJV3|RDJEXP - Vacation 03 : Report pièce ECA|/|
|T2XICJ14|Editions JAE quotidiennes|IT2JUURXIC400000|
|T28ICJV4|REMISE A VIDE DU FICHIER CMR1.REPRISE|IT2JSIGX008ICJV4|

^Envoie des fichiers a la MOA^|
|T20RF3X0|envoi des flux a la MOA|IT2JTRFRF3LC01JF|


===== En production =====

==== Jcl Automatique ====

[[work:logiciel_usineretraite:lc:t8xicdv0|TJ2XICD0]] génere le contenu des fichiers de REPRISE , REJET Vac 1, IEVREC1 , REJET Vac 2 , IEVREC2 en fonction des fichiers des demandes MOA.

<code>
recopier le fichier fourni par la MOA
dans le fichier IT2S.NJ0000.UDT.MOA.REPRISE1

puis

lancé le 
 pour AG2R : JH2XICD0 (IJ2HSIGX002XICD0)
 POUR REUNICA : TJ8XICD0 (IT2JSIGX008XICD0)
</code>

la prise en compte ce fera avec la prochaine vacation de production

==== Methode Manuelle ====

Faire une DI pour remplacer 2 fichiers en production pour la prochaine vacation (exemple DIS087397)

IEVREC1 fournie par la MOA ⇒ JPFAP.ISKI1.CMR1.REPRISE

<note warning>preciser a l'exploitation que le fichier doit être multi volume</note>

JPFAP.PSQI1.CMR1.IEVREC(+1) moins IEVREC1 fournie par la MOA ⇒ JPFAP.PSQI1.CMR1.IEVREC(+1)

<note>Test a l'appui , la necessité de suprimer les IDCODOSINS dans IEVREC1 ou 2 est prouvé {{work:usineretraite:lc:test_rienjection.7z|test_rienjection.7z}}  </note>

=== Suppression IEVREC1 ===

Récupère la dernière génération du fichier 'JPFAP.PSQI1.CMR1.IEVREC.' dans l'environnement cible

supprimer les IDCODINS (col 26 lng 19) demandé dans la DI et sauvegarder le fichier en ajoutant 1 au numéro de génération

Sur MVS crée l'enveloppe du fichier AXCOM.IPOI1.CMR1.IEVREC.J0P0.NEW en recopiant la dernier vacation de IEVREC dans AXCOM.IPOI1.CMR1.IEVREC.J0P0.NEW

Recopier le fichier sauvegarder dans AXCOM.IPOI1.CMR1.IEVREC.J0P0.NEW et faire un suivi a la DI pour recopier les fichiers dans l'environnement cible

=== Suppression IEVREC2 ===

Récupère la dernière génération du fichier 'JPFAP.PSQI1.CMR2.IEVREC.' dans l'environnement cible

supprimer les IDCODINS (col 259 lng 19) demandé dans la DI et sauvegarder le fichier en ajoutant 1 au numéro de génération

Sur MVS crée l'enveloppe du fichier AXCOM.IPOI1.CMR2.IEVREC.J0P0.NEW en recopiant la dernier vacation de IEVREC dans AXCOM.IPOI1.CMR2.IEVREC.J0P0.NEW

Recopier le fichier sauvegarder dans AXCOM.IPOI1.CMR2.IEVREC.J0P0.NEW et faire un suivi a la DI pour recopier les fichiers dans l'environnement cible

\\