++APAR(ASZ2658). /*--------------------------------------------------

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD.1995

ASZ2658 951023 61VASE PM OMCSV2  V300 INCORROUT  OMCSTSDB ...... ...
After label DBID change &@#USID to @#USID in the statement:
SET &@#USID=&TERM(&ZUSER)
(Required for version 3).

       */
++VER(Z038) FMID(ASEB200). /* getapar 00/02/29 14:55