         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
INTEGER PROCEDURE  LDEVTOSUBTYPE(LDEV);                        <<s2299>>00067000
VALUE   LDEV;                                                  <<s2299>>00067100
INTEGER LDEV;                                                  <<s2299>>00067200
OPTION  EXTERNAL;                                              <<s2299>>00067300
                                                               <<s2299>>00067400
INTEGER PROCEDURE  LDEVTOTYPE(LDEV);                           <<s2299>>00067500
VALUE   LDEV;                                                  <<s2299>>00067600
INTEGER LDEV;                                                  <<s2299>>00067700
OPTION  EXTERNAL;                                              <<s2299>>00067800
                                                               <<s2299>>00067900
