Last change
on this file since 1211 was 613, checked in by George Lilly, 15 years ago |
initial load of WorldVistAEHR
|
File size:
300 bytes
|
Line | |
---|
1 | LBRYHSF ;ISC2/DJM-NETWORK AUDIOVISUAL UPDATE ;[ 05/23/97 12:13 PM ]
|
---|
2 | ;;2.5;Library;**2**;Mar 11, 1996
|
---|
3 | SERV W @IOF,?5,"VA Library Service File View ",?60 S Y=DT X ^DD("DD") W Y,!
|
---|
4 | S DIC="^DIC(49,",DIC(0)="AEMQ" D ^DIC Q:Y<0 S DA=+Y
|
---|
5 | K DR D EN^DIQ
|
---|
6 | R !!,"Press return to continue...",C:DTIME
|
---|
7 | G SERV
|
---|
Note:
See
TracBrowser
for help on using the repository browser.