■  ＭＥＲＧＥのサンプル

//SORT1		EXEC	SORT
//SORTIN01		DD *
00111111
99999999
//SORTIN02		DD *
01010101
02020202
//SORTIN03		DD *
03030303
33333333
//SORTOUT		DD	DSN=OUTFILE,DISP=(,KEEP),…
//SYSIN		DD	*
	MERGE FIELDS=(1,3,CH,A,4,5,CH,A)
/*		実行結果
00111111			←SORTIN01
01010101			←SORTIN02
02020202			←SORTIN02
03030303			←SORTIN03
33333333			←SORTIN03
99999999			←SORTIN01

※ＩＮＰＵＴファイル内でＳＯＲＴ順が保たれていないと、ＡＢＥＮＤします。

USER COMPLETION CODE=0068
   TIME=12.06.58  SEQ=02739  CPU=0000  ASID=0012
   PSW AT TIME OF ERROR  078D1000   00013CE0  ILC 2  INTC 0D
     ACTIVE LOAD MODULE           ADDRESS=00010000  OFFSET=00003CE0
     NAME=ICEMPUT

BEFORE PAGE

TOP PAGE