Last change
on this file since 1504 was 613, checked in by George Lilly, 15 years ago |
initial load of WorldVistAEHR
|
File size:
587 bytes
|
Line | |
---|
1 | ORKCHK3 ; slc/CLA - Support routine called by ORKCHK to do DISPLAY mode order checks ;3/6/97 9:35
|
---|
2 | ;;3.0;ORDER ENTRY/RESULTS REPORTING;**6**;Dec 17, 1997
|
---|
3 | Q
|
---|
4 | ;
|
---|
5 | EN(ORKS,ORKDFN,ORKA,ORENT,ORKTMODE) ;perform order checking for ordering dialog/display
|
---|
6 | ;ORKS - return sort array of order checks
|
---|
7 | ;ORKDFN - patient id
|
---|
8 | ;ORKA - order information
|
---|
9 | ;ORENT - entity for parameter calls
|
---|
10 | ;ORKTMODE - temp mode for special calls ("ALL" or "NOTIF")
|
---|
11 | N ORKOFF
|
---|
12 | Q:$$GET^XPAR("DIV^SYS^PKG","ORK SYSTEM ENABLE/DISABLE",1,"I")="D"
|
---|
13 | ;
|
---|
14 | ;process MLMs:
|
---|
15 | D MLM^ORKCHK2(.ORKS,ORKDFN,ORKA,ORENT,"DISPLAY")
|
---|
16 | Q
|
---|
Note:
See
TracBrowser
for help on using the repository browser.