NAMEXU EPCS DISUSER EXP DATE
DESCRIPTIONThis option is for the DEA ePCS project and will print all DISUSER users with a DEA# and DEA Expiration Date is unpopulated. This option prints the Name, DEA#, Terminatin Date and DEA Expiration Date.
BY[XU EPCS DISUSER SORT]
CREATORUSER,SEVENTEEN
DIC {DIP}VA(200,
DIS(0)I $$VUSER1^XUEPCSRT(D0,0)
FLDS[XU EPCS DISUSER XDATE PRINT]
L.0
MENU TEXTPrint DISUSER DEA Expiration Date Null
OUT OF ORDER MESSAGEPLACED OUT OF ORDER BY XU*8*765
PACKAGEKERNEL
TYPEprint
UPPERCASE MENU TEXTPRINT DISUSER DEA EXPIRATION D