User's Manual

HONEYWELL TAPES
XEROX LASER PRINTING SYSTEMS TAPE FORMATS MANUAL 10-25
/* */ 000930
/* HONEYWELL 2000 STANDARD, COBOL AND SPR BCD TAPES*/ 000940
/* ------------------------------------------------*/ 000950
/* */ 000960
/* */ 000970
/* JDES 21-26 DEFINE 6 COMMON HONEYWELL 2000 FORMATS */ 000980
/* UTILIZING STANDARD 80-BYTE LABELS AND COBOL 120-BYTE LABELS */ 000990
/* AS WELL AS BCD-CODED SPR LABELED TAPES. THE FORMATS ARE AS */ 001000
/* FOLLOWS: */ 001010
/* */ 001020
/* CHARACTERISTICS JOB */ 001030
/* --------------- -------- - */ 001040
/* */ 001050
/* BCD-CODED SPR LABELS, BLOCKED 1201 21 */ 001060
/* BCD-CODED SPR LABELS, BLOCKED 1332 22 */ 001070
/* EBCDIC-CODED STANDARD LABELS, 23 */ 001080
/* BLOCKED 1340 */ 001090
/* BCD-CODED STANDARD LABELS, BLOCKED 24 */ 001100
/* 1009 */ 001110
/* EBCDIC-CODED COBOL LABELS, BLOCKED 25 */ 001120
/* 1440 */ 001130
/* EBCDIC-CODED COBOL LABELS, BLOCKED 26 */ 001140
/* 1500 */ 001150
/* */ 001160
21:JOB; 001170
VOLUME HOST=H2000, LABEL=SPR, CODE=H2BCD, LCODE=H2BCD, 001180
UNPACK=T4X3H2; 001190
BLOCK LENGTH=1201, PREAMBLE=2, POSTAMBLE=2; 001200
BSELECT TEST=(C4); 001210
22:JOB; 001220
VOLUME HOST=H2000, LABEL=SPR, CODE=H2BCD, LCODE=H2BCD, 001230
UNPACK=T4X3H2; 001240
BLOCK LENGTH=1332, PREAMBLE=2; 001250
BSELECT TEST=(C4); 001260
23:JOB; 001270
VOLUME HOST=H2000, LABEL=STANDARD, CODE=EBCDIC; 001280
BLOCK LENGTH=1340, PREAMBLE=0; 001290
RECORD STRUCTURE=FB, LENGTH=134; 001300
LINE VFU=V2; 001310
24:JOB; 001320
VOLUME HOST=H2000, LABEL=STANDARD, CODE=H2BCD,LCODE=H2BCD, 001330
UNPACK=T4X3H2; 001340
BLOCK LENGTH=1009, PREAMBLE=0, POSTAMBLE=1; 001350
RECORD LENGTH=144, STRUCTURE=FB; 001360
LINE DATA=(8,132), VFU=V2; 001370
25:JOB; 001380
VOLUME HOST=H2000, LABEL=COBOL, 001390
CODE=EBCDIC; 001400
BLOCK LENGTH=1440, PREAMBLE=0; 001410
RECORD LENGTH=144, STRUCTURE=FB; 001420
LINE DATA=(2,132), VFU=V2, PCCTYPE=ANSI, PCC=(1,NOTRAN); 001430
26:JOB; 001440
VOLUME HOST=H2000, LABEL=COBOL, 001450
CODE=EBCDIC; 001460
BLOCK LENGTH=1500, PREAMBLE=0; 001470
RECORD LENGTH=150, STRUCTURE=FB 001480
LINE DATA=(1, 32), VFU=V2, PCCTYPE=H2000 001490
END;END; /*END OF HONEYWELL 2000 JDL */