source: WorldVistAEHR/trunk/r/CONTROLLED_SUBSTANCES-PSD/PSDHELP.m@ 1150

Last change on this file since 1150 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 262 bytes
RevLine 
[613]1PSDHELP ;B'ham ISC/LTL - CS online documentation ; 10 May 95
2 ;;3.0; CONTROLLED SUBSTANCES ;;13 Feb 97
3 N DIR,DIRUT,XQH,XQHFY,X,Y
4 S DIR(0)="S^1:VIEW HELP;2:PRINT HELP"
5 D ^DIR G:'Y QUIT
6 S XQH="PSD NURSE" I Y=1 D EN^XQH G QUIT
7 S XQHFY=XQH D ACTION^XQH4
8QUIT Q
Note: See TracBrowser for help on using the repository browser.