VETERANS WITH UNVERIFIED ELIGIBILITY (2) IB DM EXTRACT REPORTS (351.7)
Name
Value
REPORT NAME
VETERANS WITH UNVERIFIED ELIGIBILITY
INPUT VARIABLE
IBBDT
INPUT STATEMENT: S ZTSAVE("IBBDT")=+$$M1^IBJDE(IBDT,0)
IBEDT
INPUT STATEMENT: S ZTSAVE("IBEDT")=$P($$M1^IBJDE(IBDT,0),U,2)
IBRPT
VALUE: S
IBSORT
VALUE: 0
ROUTINE
DQ^
IBJDI2