[[lbpf:dsi:moe:distribution:equipes:mainframe:bibliothequejcl|Retour à la Bibliothèque JCL]]
=====OVERLAY=====
===Définition===
Ce JCL sert à changer des informations sur des enregistrements sans avoir à le faire à la main (enregistrement par enregistrement)
===Code===
	//LUA1937K JOB (ETUD,N,DEV,F),'F OCTROI ',CLASS=A,MSGCLASS=X,      
	//             REGION=4M,MSGLEVEL=(1,1),NOTIFY=&SYSUID,TIME=60     
	//*================================================================
	//*  JCL DE TRI XXX                                                
	//*================================================================
	//PARM     SET ENTREE=(Fichier d'origine)                  
	//PARM     SET SORTIE=(Fichier recepteur)                   
	//*                                                                
	//*================================================================
	//*   DELETE                                                       
	//*================================================================
	//DELFIC   EXEC PGM=IEFBR14                                        
	//PARM     SET D='DISP=(MOD,DELETE,),SPACE=(TRK,(1,1),RLSE)'       
	//FIC      DD &D,DSN=&SORTIE                                       
	//ALLOCFIC EXEC PGM=IEFBR14                                        
	//*                                                                
	//SYSOUT   DD SYSOUT=*                                             
	//*=====================================================================
	//*   TRI                                                               
	//*=====================================================================
	//S1    EXEC  PGM=ICETOOL                                               
	//TOOLMSG   DD  SYSOUT=*                                                
	//DFSMSG    DD  SYSOUT=*                                                
	/*                                                                      
	//IN1 DD DSN=&ENTREE,DISP=SHR                                           
	//OUT  DD DSN=&SORTIE,                                                  
	//        DISP=(NEW,CATLG),                                             
	//        SPACE=(CYL,(1,1),RLSE),                                       
	//        DCB=*.IN1         **Prends la valeurs des paramètres du fichier d'entrée dans le step IN1                                            
	/*                                                                      
	//COMBINE DD SYSOUT=*                                                   
	//TOOLIN   DD *                                                         
	  COPY FROM(IN1) TO(OUT) USING(CTL1)                                    
	/*                                                                      
	//CTL1CNTL DD *                                                         
	  INCLUDE COND=(pos,lg,ty,comp,DS)  
	OUTREC OVERLAY=(1,50,1:C'81',11:C'1',18:C'1',15:C'8',22:C'8')  ** ici (pos,lg,pos:'caractère de remplacement')
===Légende===
==Position (pos)== 
	dans le fichier (N°de colonne du premier caractère)
==longueur (lg)== 
	(longueur en nombre de caractères)
==Type de données (ty)==
	CH : 1 to 256 bytes : Character = Caractères Alphanumériques
	AQ : 1 to 256 bytes : Character with alternate collating sequence = Caractères avec des alternances de séquences d'espaces
	ZD : 1 to 256 bytes : Signed zoned decimal = Zone de nombres décimaux signé
	PD : 1 to 255 bytes : Signed packed decimal = Paquet de nombres décimaux signés
	PD0: 2 to 8 bytes : Packed decimal with sign and first digit ignored = Zone de nombres décimaux signé en ignorant le premier nombre
	FI : 1 to 256 bytes : Signed fixed-point = Nombres, signés, en virgule fixe 
	BI : 1 to 256 bytes : Unsigned binary = Nombres binaires non signés
	AC : 1 to 256 bytes : ASCII character = Caractères ASCII
	CSF or FS : 1 to 32 bytes : Signed numeric with optional leading floating sign  
	UFF : 1 to 44 bytes : Unsigned free form numeric = Nombres non signés et de formes libres
	SFF : 1 to 44 bytes : Signed free form numeric = Nombres signés de formes libres
	CSL or LS : 2 to 256 bytes  :Signed numeric with leading separate sign
	CST or TS : 2 to 256 bytes : Signed numeric with trailing separate sign
	CLO or OL : 1 to 256 bytes : Signed numeric with leading overpunch sign
	CTO or OT : 1 to 256 bytes : Signed numeric with trailing overpunch sign
	ASL : 2 to 256 bytes : Signed ASCII numeric with leading separate sign
	AST : 2 to 256 bytes : Signed ASCII numeric with trailing separate sign
==Sens de lecture (sl)==
	A=Ascending : De Bas en Haut
	D=Descending : De Haut en Bas
==Comparateurs (comp)==
	EQ Equal to = Egal à
	NE Not equal to = Non Egal à
	GT Greater than = Plus grand que
	GE Greater than or equal to Plus grand ou egal à
	LT Less than = Plus petit que
	LE Less than or equal to = Plus petit ou égal à 
==Donnée à Sélectionner (DS)==
	C'...':Chaine de caractères à spécifier
	UC : Upper Case Characters = Caractères en majuscules
	LC : Lower Case Characters = Caractères en minuscules
	MC : Mixed Case Characters = Mélange de majuscules et de minuscules
	UN : Upper Case or Numeric Characters = Caractères en majuscules ou nombres
	LN : Lower Case or Numeric Characters = Caractères en minuscules ou nombres
	MN : Mixed Case and Numeric Characters = Mélange de majuscules et de minuscules et de nombres
==Opérateurs Logiques (OL)==
	AND = Et
	OR = Ou	
[[lbpf:dsi:moe:distribution:equipes:mainframe:bibliothequejcl|Retour à la Bibliothèque JCL]]