IBM S544-5285-01 manual VM CMS Commands to Invoke Acif, VSE JCL to Invoke Acif

VM CMS Commands to Invoke ACIF

FILEDEF INPUT DISK ACIFEX2 SYSIN A

FILEDEF OUTPUT DISK APKACIF OUTPUT A (LRECL 32756 BLKSIZE￿ 3276ð RECFM VB FILEDEF INDEX DISK APKACIF INDEX A (LRECL 32756 BLKSIZE 32￿76ð RECFM VB FILEDEF RESLIB DISK APKACIF RESLIB A (LRECL 32756 BLKSIZE￿ 3276ð RECFM VB FILEDEF SYSPRINT DISK APKACIF SYSPRINT A

APKACIF

Where file ACIFEX2 SYSIN A contains the following:
	/\ Pubs example phone bill	\/
/\ DATA CHARACTERISTICS		\/
CC = YES	/\ carriage control used	\/
CCTYPE = A	/\ carriage control type	\/
CHARS = GT15
CPGID = 5ðð	/\ code page identifier	\/
FDEFLIB = FDEF382ð,FDEF38PP
/\ INDEXING INFORMATION		\/
FIELD1 = 13,66,15	/\ Account Number	\/
FIELD2 = ð,5ð,3ð	/\ Name	\/
FIELD3 = 1,5ð,3ð	/\ Address	\/
FIELD4 = 2,5ð,3ð	/\ City, State, Zip	\/
FIELD5 = 4,6ð,12	/\ Date Due	\/
INDEX1 = 'Account Number',field1	/\ 1st INDEX	\/
INDEX2 = 'Name',field2	/\ 2nd INDEX	\/
INDEX3 = 'Address',field3	/\ 3rd INDEX	\/
INDEX4 = 'City, State, Zip',field4	/\ 4th INDEX	\/
INDEX5 = 'Date Due',field5	/\ 5th INDEX	\/
/\ FILE INFORMATION		\/
INDEXDD = INDEX	/\ index file ddname	\/
INPUTDD = INPUT	/\ input file ddname	\/
OUTPUTDD = OUTPUT	/\ output file ddname	\/
RESOBJDD = RESLIB	/\ resource file ddname	\/
/\ RESOURCE INFORMATION		\/
FORMDEF = F1A1ð11ð	/\ formdef name	\/
PAGEDEF = P1Að8682	/\ pagedef name	\/
FONTLIB = FONT382ð,FONT38PP
OVLYLIB = OVLY382ð,OVLY38PP
PDEFLIB = PDEF382ð,PDEF38PP
PSEGLIB = PSEG382ð,PSEG38PP
RESFILE = SEQ	/\ resource file type	\/
RESTYPE = FDEF,PSEG,OVLY	/\ resource type selection	\/
/\ EXIT AND TRIGGER INFORMATION		\/
TRIGGER1 = \,1,'1'	/\ 1st TRIGGER	\/
TRIGGER2 = 13,5ð,'ACCOUNT NUMBER:'	/\ 2nd TRIGGER	\/

Figure 27. Example of a Telephone Bill for a VM ACIF Application

VSE JCL to Invoke ACIF

Chapter 8. Example: ACIF Application in OS/390, MVS, VM, or VSE 117