         PROC  &P,3                                                     00000010
FPARMCHK NAME  1                                                        00000020
         DO    (('&P(1)'='')++('&P(1)'='0'))=0                          00000030
         PRINT ON                                                       00000040
         PNOTE 'W','&P(2) OPTION IS INVALID FOR &P(3) - IGNORED'        00000050
         PRINT OFF                                                      00000060
         ENDO                                                           00000070
         END                                                            00000080
