PSSJORDF ;BIR/MV - RETURN MED ROUTES(MR) AND INSTRUCTIONS(INS) ;May 25, 2021@07:40:03
Source file <PSSJORDF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START(PSJORD,PSJOPAC) | ;
|
|
| SCPASS | ;
|
|
| DF | ;* Loop thru DF node to find all available med routes, nouns, and instructions.
|
|
| MEDROUTE | ;* Return all med routes in the med routes file.
|
|
| NOD | ||
| START1(PSJORD,PSJQOF) | ;Entry point for IV dialog PSS*1*94
; This is the new entry point for the IV Dialog box from CPRS GUI 27. PSJORD will be an array ; sent by CPRS that contains all the IENS for all orderable items that are part of the order. The zero node of the array ; will contain the total number of orderable items in the order. |
|
| MEDRT(PSJORD) | ;All Med Routes for dosage form.
|
|
| ALLMED(MCT) | ;Return all med routes with IV flag set to 1
|
|
| OVERLAP | ; Only maintains any overlapping med routes between orderable items in order
|
|
| REMDUP | ; Remove duplicate entries
|
|
| MULTIDEF(PSJORD,PSJORD1) | ; PSS*1*142
|
|
| IND | ;*187 - indications for use
|