[[lbpf:dsi:moe:distribution:equipes:mainframe:bibliothequejcl|Retour à la Bibliothèque JCL]]
=====FUSIFILE=====
===Définition===
Ce JCL sert à fusionner les enregistrements de plusieurs fichiers (!!!Les fichiers doivent avoir la même taille(LRECL))
===Code===
	//LUA1937K JOB (EXP),'COPY SIMPLE',CLASS=A,MSGCLASS=X,
	//             REGION=2000K,NOTIFY=LUA1937            
	//*
	//*Définition des Fichiers à utilisé : FIC(1/2/3)=Fichier d'entrée  FIC4=Fichier de sortie
	//*                                                   
	//         SET FIC1=LDE0000.LT1.LUA1937K.TEST0        
	//         SET FIC2=LDE0000.LT1.LUA1937K.TEST5        
	//         SET FIC3=LDE0000.LT1.LUA1937K.TEST1        
	//         SET FIC4=LDE0000.LT1.LUA1937K.TEST2        
	//* 
	//*Suppression du fichier de Sortie, Pour ne pas avoir de plantage 
	//*                                                    
	//DELETE EXEC PGM=IEFBR14                             
	//DD1      DD DSN=&FIC2,DISP=(MOD,DELETE,DELETE),     
	// UNIT=SYSDA,SPACE=(CYL,(0))                         
	//*                                                   
	//SORT01   EXEC PGM=SORT                              
	//SYSUDUMP DD SYSOUT=D  
	//CEEDUMP  DD SYSOUT=D               
	//SYSOUT   DD SYSOUT=*               
	//*     
	//*FICHIERS ENTREE    
	//*                         
	//SORTIN   DD DISP=SHR,DSN=&FIC1     
	//         DD DISP=SHR,DSN=&FIC2     
	//         DD DISP=SHR,DSN=&FIC3     
	//*     
	//*FICHIER SORTIE    
	//*                     
	//SORTOUT  DD DSN=&FIC4,             
	//            DISP=(NEW,CATLG),      
	//            SPACE=(CYL,(2,2),RLSE),
	//            DCB=(RECFM=FB,LRECL=10)  **Paramètre de taille du fichier
	//SYSIN    DD *                      
	  MERGE FIELDS=(pos,lg,ty,sl)      
===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