VistA-FOIAVistA/r/REGISTRATION-DGQE-DG-DPT-GR.../GRPX75.m

6 lines
115 B
Mathematica

GRPX75 ; ;11/21/01
S X=DG(DQ),DIC=DIE
X "S DFN=DA D EN^DGMTR K DGREQF"
S X=DG(DQ),DIC=DIE
D AUTOUPD^DGENA2(DA)