Last change
on this file since 1177 was 613, checked in by George Lilly, 15 years ago |
initial load of WorldVistAEHR
|
File size:
304 bytes
|
Line | |
---|
1 | DGYQPRE ;AISC/TET - PRE INIT TO PATCH DG*5.3*41
|
---|
2 | ;;5.3;Registration;**41**;Aug 13, 1993
|
---|
3 | PRE ;pre init after committment
|
---|
4 | ;delete field in multiple of file 2 (Patient), field 1000 (disp log enter/edit), subfile 2.101, field 3 (facility applying to)
|
---|
5 | S DIK="^DD(2.101,",DA=3,DA(1)=2.101 D ^DIK
|
---|
6 | K DA,DIK Q
|
---|
Note:
See
TracBrowser
for help on using the repository browser.