source:
FOIAVistA/tag/r/SURGERY-SR/SRODEV.m@
1767
Last change on this file since 1767 was 628, checked in by , 15 years ago | |
---|---|
File size: 258 bytes |
Line | |
---|---|
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.