source:
FOIAVistA/tag/r/INCOMPLETE_RECORDS_TRACKING-DGJ/DGJPAR.m@
1074
Last change on this file since 1074 was 628, checked in by , 15 years ago | |
---|---|
File size: 240 bytes |
Rev | Line | |
---|---|---|
[628] | 1 | DGJPAR ;MAF/ALB - PARAMETER SET UP FOR IRT ; JUN 21,1991@8:00 |
2 | ;;1.0;Incomplete Records Tracking;;Jun 25, 2001 | |
3 | S DIC="^DG(40.8,",DIC(0)="AEMQ" D ^DIC G:Y'>0 QUIT | |
4 | S DIE=DIC,DA=+Y,DR="[DGJ IRT PARAMETERS]" D ^DIE | |
5 | QUIT K DIC,DIE,DA,DR,X,Y Q |
Note:
See TracBrowser
for help on using the repository browser.