|
Last change
on this file since 1397 was 628, checked in by George Lilly, 15 years ago |
|
initial load of FOIAVistA 6/30/08 version
|
|
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.
