/********************************************************************/ 00250003 /* MACCOMP Y30LB22 SC1DR/BL0019 @Y30LB22*/ 00260003 /* MACSTAT Y30LB22 74/171/341040 @Y30LB22*/ 00270003 /* @Y30LB22*/ 00280003 /* NAME: IEZMSGRQ @Y30LB22*/ 00290003 /* @Y30LB22*/ 00292003 /* FUNCTION: @Y30LB22*/ 00294003 /* MESSAGE DEFINITION PARAMETER LIST. THIS LIST @Y30LB22*/ 00296003 /* IS PASSED TO ICBVOP00 TO REQUEST THE PRINTING @Y30LB22*/ 00298003 /* OF A MESSAGE. @Y30LB22*/ 00298403 /* @Y30LB22*/ 00299603 /* STATUS: CHANGE LEVEL = 0 #Y30LB22*/ 00299703 /* #Y30LB22*/ 00299803 /********************************************************************/ 00299903 00349903 /********************************************************************/ 09000003 DCL 1 MSGRQ BDY(WORD), /* MSG REQ PARM LIST @Y30LB22*/ 12000003 2 MSGID FIXED(31), /* MESSAGE ID IN BINARY @Y30LB22*/ 15000003 2 MSGRPLV PTR(31), /* ADDRESS OF THE RPLV @Y30LB22*/ 18000003 2 MSGRLEN BIT(8), /* LENGTH OF OPERATOR REPLY @Y30LB22*/ 21000003 2 MSGREPLY PTR(24), /* ADDR OF AREA FOR OP. REPLY @Y30LB22*/ 24000003 2 MSGLEN1 BIT(8), /* LENGTH OF FIRST COMPLETION @Y30LB22 27000003 INFORMATION @Y30LB22*/ 27050003 2 MSGTEXT1 PTR(24), /* ADDR OF FIRST COMP. INF @Y30LB22*/ 30000003 2 MSGLEN2 BIT(8), /* LENGTH OF SECOND COMP. INF @Y30LB22*/ 33000003 2 MSGTEXT2 PTR(24), /* ADDR OF SECOND COMP. INF @Y30LB22*/ 36000003 2 MSGLEN3 BIT(8), /* LENGTH OF THIRD COMP. INF @Y30LB22*/ 39000003 2 MSGTEXT3 PTR(24), /* ADDR OF THIRD COMP. INF @Y30LB22*/ 42000003 2 MSGLEN4 BIT(8), /* LENGTH OF FOURTH COMP. INF @Y30LB22*/ 45000003 2 MSGTEXT4 PTR(24), /* ADDR OF FOURTH COMP. INF @Y30LB22*/ 48000003 2 MSGLEN5 BIT(8), /* LENGTH OF FIFTH COMP. INF @Y30LB22*/ 51000003 2 MSGTEXT5 PTR(24); /* ADDR OF FIFTH COMP. INF @Y30LB22*/ 54000003