PSSDDUT3 ;BIR/LDT-Pharmacy Data Management DD Utility ; 09/17/97 14:35
Source file <PSSDDUT3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADTM | ;UNIT DOSE MULTIPLE of PHARMACY PATIENT file (55) field 41
|
|
| SPCIN | ;UNIT DOSE MULTIPLE of PHARMACY PATIENT file (55) field 8
|
|
| SCHTP | ;Called from the Unit Dose Multiple of file 55, Schedule Type field 7
|
|
| CHKSI | ;Called from Unit Dose Multiple of file (55), Special Instructions
|
|
| CHK1 | ;
|
|
| EN2 | ;Called from Unit Dose multiple of file 55, STOP DATE/TIME field 34
|
|
| ENGO | ;
|
|
| MWF | ; if schedule is similar to monday-wednesday-friday
|
|
| SCHK | ||
| CHK | ||
| TS | ||
| DONE | ;
|
|
| ADD | ;
|
|
| ENDL | ;From DD(55.01,.03,0) Replaces call ENDL^PSIVSP
|
|
| QDL | ||
| DLP | ;
|
|
| OV | ||
| QDLP | ||
| ENI | ;^DD(555.01,.03,0)
|
|
| SPSOL | ||
| CHK3 | ||
| WRITE | ;Calls EN^DDIOL to write text
|
|
| AASCRN(PSSREC) | ; Screen the RECOMMENDATION field (#.08) in APSPQA INTERVENTION file
; Input : PSSREC - IEN of APSP INTERVENTION RECOMMENDATION file (#9009032.5) entry ; Output : FALSE - Filter out 'UNABLE TO ASSESS' recommendations if not a NO ALLERGY ASSESSMENT intervention type, ; filter out all recommendation except 'OTHER' and 'UNABLE TO ASSESS' if not a NO ALLERGY ASSESSMENT intervention type ; Output : TRUE - Include only 'UNABLE TO ASSESS' and 'OTHER' recommendations if working on a NO ALLERGY ASSESSMENT intervention type, ; include all recommendatons except 'UNABLE TO ASSESS' and 'OTHER' if not working on a NO ALLERGY ASSESSMENT intervention type |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
