MACRO                                                          00001000
&LABEL   GENLINE &LINE=                                                 00002000
         AIF   (T'&LINE EQ 'O').ERR                                     00003000
&LABEL   DC    XL2'&LINE'                                               00004000
         MEXIT                                                          00005000
.ERR     MNOTE 16,'LINE ADDRESS NOT SPECIFIED'                          00006000
         MEND                                                           00007000