source:
WorldVistAEHR/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/ORY222.m
Last change on this file was 613, checked in by , 15 years ago | |
---|---|
File size: 356 bytes |
Line | |
---|---|
1 | ORY222 ;;SLC/JDL- Group Notes |
2 | ;;3.0;ORDER ENTRY/RESULTS REPORTING;**222** |
3 | MAIN ; |
4 | N MENU,I |
5 | S MENU="OR CPRS GUI CHART" |
6 | F I="ORWGN GNLOC","ORWGN AUTHUSR" D INSERT(MENU,I) |
7 | Q |
8 | ; |
9 | INSERT(OPTION,RPC) ; Call FM Updater with each RPC |
10 | N FDA,FDAIEN,ERR,DIERR |
11 | S FDA(19,"?1,",.01)=OPTION |
12 | S FDA(19.05,"?+2,?1,",.01)=RPC |
13 | D UPDATE^DIE("E","FDA","FDAIEN","ERR") |
14 | Q |
Note:
See TracBrowser
for help on using the repository browser.