02000000 /*****************************************************************/ 04000000 /* @Y30LB55*/ 06000000 /* ISDAMSC3 - 28 BYTE FORMAT 3 DCL @Y30LB55*/ 08000000 /* @Y30LB55*/ 10000000 /*****************************************************************/ 12000000 14000000 /* %INCLUDE ISDADCLS(ISDAMSC3) @Y30LB55*/ 16000000 18000000 DCL /* FORMAT3 CARTRIDGE STORE SENSE 20000000 @Y30LB55 22000000 RECORD */ 24000000 1 ISDAMSC3 CHAR(28) BASED(SENSEPTR) POS(5),/* CARTRIDGE STORE 26000000 @Y30LB55*/ 28000000 2 STATUS3 BIT(8), /* 0 @Y30LB55*/ 30000000 2 RECOVER3 BIT(8), /* 1 @Y30LB55*/ 32000000 2 MOVES12 BIT(8), /* 2 (0-3=ACC 1) (4-7=ACC 2) 34000000 @Y30LB55*/ 36000000 2 QUEUE3 BIT(8), /* 3 @Y30LB55*/ 38000000 2 FSCACC1 CHAR(4), /* 4-7 FAULT SYMPTOM CODE ACC 1 40000000 @Y30LB55*/ 42000000 3 MCHKACC1 BIT(8), /* 4 @Y30LB55*/ 44000000 3 FAULT1F3 BIT(8), /* 5 @Y30LB55*/ 46000000 3 PCHKACC1 BIT(8), /* 6 @Y30LB55*/ 48000000 3 SHIFT1F3 BIT(8), /* 7 @Y30LB55*/ 50000000 2 FSCACC2 CHAR(4), /* 8-11 FAULT SYMPTOM CODE ACC 2 52000000 @Y30LB55*/ 54000000 3 MCHKACC2 BIT(8), /* 8 SAME AS 4 @Y30LB55*/ 56000000 3 FAULT2F3 BIT(8), /* 9 SAME AS 5 @Y30LB55*/ 58000000 3 PCHKACC2 BIT(8), /* 10 SAME AS 6 @Y30LB55*/ 60000000 3 SHIFT2F3 BIT(8), /* 11 SAME AS 7 @Y30LB55*/ 62000000 2 MISCF3 BIT(8), /* 12 MISC. CHECKS @Y30LB55*/ 64000000 2 IREGS1F3 BIT(8), /* 13 INTERNAL REGS @Y30LB55*/ 66000000 2 IREGS2F3 BIT(8), /* 14 INTERNAL REGS @Y30LB55*/ 68000000 2 IREGS3F3 BIT(8), /* 15 INTERNAL REGS @Y30LB55*/ 70000000 2 * CHAR(12); /* 16-27 ZEROS @Y30LB55*/ 72000000