source:
FOIAVistA/tag/r/SURGERY-SR/SRODEV.m@
1449
Last change on this file since 1449 was 628, checked in by , 15 years ago | |
---|---|
File size: 258 bytes |
Rev | Line | |
---|---|---|
[628] | 1 | SRODEV ;B'HAM ISC/MAM - UPDATE O.R. SCHEDULE DEVICE ; 9 APR 1992 5:20 pm |
2 | ;;3.0; Surgery ;;24 Jun 93 | |
3 | W @IOF,!,"Update O.R. Schedule Devices",!,"----------------------------",!! | |
4 | K DR,DIE,DA S DA=SRSITE,DIE=133,DR=12 D ^DIE K DR,DA,DIE | |
5 | D ^SRSKILL W @IOF | |
6 | Q |
Note:
See TracBrowser
for help on using the repository browser.