Filter
Top Products
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 3276 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 = F1A111 /ᑍ formdef name ᑍ/
PAGEDEF = P1A8682 /ᑍ 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