*        %GOTO PLSNRA;                  /* BILINGUAL HEADER             00100010
         MACRO                                                          00200010
         TNRAD                                                          00300010
.*A000000-999999                                               @Y17XAXF 00400010
*                                                                       00500010
*        ASSEMBER VERSION OF DSECT NOT SUPPORTED                        00600010
*                                                                       00700010
         MEND  */                                                       00800010
*%PLSNRA:;                                                              00900010
*/*                                                                  */ 01000010
*/*      NEW DSECT FOR 3705 RESTART GETMAIN AREA                     */ 01100010
*/*                                                                  */ 01200010
* DECLARE                                                               01300010
* 1 IEDNRA BASED(RNRA),                                                 01400010
*  2 NRACURR  PTR(31),                  /*RESTART GETMAIN AREA       */ 01500010
*  2 NRASIZE  FIXED(32),                /*GETMAIN AREA SIZE          */ 01600010
*  2 NRAR1PTR PTR(31),                  /*READ1 AREA PTR             */ 01700010
*  2 NRAR2PTR PTR(31),                  /*READ2 AREA PTR             */ 01800010
*  2 NRAREAD  CHAR(*);                  /*READ AREA                  */ 01900010