iSharkFly-Open
/
VistA-WorldVistAEHR
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
VistA-WorldVistAEHR/r/AUTOMATED_MED_INFO_EXCHANGE.../DVBAXA19.m

6 lines
111 B
Mathematica
Raw Permalink Blame History

DVBAXA19 ; ;06/08/01
S X=DG(DQ),DIC=DIE
;
S X=DG(DQ),DIC=DIE
D:($T(ADGRU^DGRUDD01)'="") ADGRU^DGRUDD01(DA)
Reference in New Issue View Git Blame Copy Permalink