source:
FOIAVistA/tag/r/LAB_SERVICE-LR-LS/LR72PRE.m
Last change on this file was 628, checked in by , 15 years ago | |
---|---|
File size: 245 bytes |
Line | |
---|---|
1 | LR72PRE ;DALISC/FHS/CYM - PRE-INSTALL ROUTINE FOR LR*5.2*72 |
2 | ;;5.2;LAB SERVICE;**72**;SEP 27, 1994 |
3 | ; |
4 | DD ; |
5 | K DIK,DA S DIK="^DD(66,",DA(1)=66 F DA=1,2 D ^DIK |
6 | K DIK,DA S DIK="^DD(69.9,",DA=1 D ^DIK |
7 | K DIK,DA W !!,"Pre Install Completed ",!! |
8 | Q |
Note:
See TracBrowser
for help on using the repository browser.