PSGMMIV ;BIR/MV-IV ORDER FOR THE 7/14 DAY MAR. ;25 Nov 98 / 9:24 AM
Source file <PSGMMIV.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Inpatient Medications | 2 | PSGMMAR0 PSGMMAR3 |
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ;*** Read IV orders
|
|
IV | ;*** Sort IV orders for 24 Hrs, 7/14 Day MAR.
|
|
IVPRN | ;*** Set ^tmp to store IV orders that have schedule of PRN.
|
|
SETVAR | ;***Initialize variables.
|
|
CHK(TXT) | ;
|
|
SETLTRT | ;*** Increment line number for left or right label on PRN sheet.
|
|
SP(X) | ;***Set up spaces need between info on TXT for the label.
|
Name | Field # of Occurrence |
---|---|
C^%DTC | IV+24 |
$$ENDTC^PSGMI | SETVAR+2 |
$$OPI^PSGMIV | IVPRN+22 |
SPN^PSGMMAR0 | IV+14, IV+28, IV+31 |
LTRT^PSGMMAR3 | CHK+7, CHK+8, CHK+9, SETLTRT+3, SETLTRT+4, SETLTRT+5, SETLTRT+6 |
INITOPI^PSGMMIVC | SETVAR+4 |
GT531^PSIVORFA | IVPRN+4 |
GT55^PSIVORFB | IV+1, IVPRN+3 |
$$WRTDRG^PSIVUTL | IVPRN+15, IVPRN+18 |
$$ONE^PSJBCMA | IV+4 |
NAMENEED^PSJMUTL | SETVAR+14 |
$$SETSTR^VALM1 | IVPRN+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | IV+24! |
%H | IV+24! |
%T | IV+24! |
A | IV+11~, IV+12* |
>> BL | SETVAR+20, CHK+3, CHK+4, SETLTRT+1, SETLTRT+2, SETLTRT+3, SETLTRT+5 |
CHEMO | IVPRN+1~, IVPRN+21*, IVPRN+26, IVPRN+36 |
>> DAOO | IVPRN+2 |
>> DFN | IV+1*, IV+4, IVPRN+2*, IVPRN+4 |
DRG | IV+1!, IV+10, IVPRN+1! |
DRG("AD" | IV+10, IVPRN+15 |
DRG("SOL" | IV+10, IVPRN+17, IVPRN+18, IVPRN+19 |
DT | IV+24, IV+25 |
>> INIT | IVPRN+26, IVPRN+27, IVPRN+36, IVPRN+37, SETVAR+5* |
>> LAB | IVPRN+7, IVPRN+8, IVPRN+29, IVPRN+30, IVPRN+31, IVPRN+39, IVPRN+40, IVPRN+41, CHK+2, CHK+6 , CHK+11 |
>> LN | IVPRN+8*, IVPRN+15, IVPRN+18, IVPRN+19, IVPRN+26, IVPRN+27*, IVPRN+29, IVPRN+30*, IVPRN+31, IVPRN+36 , IVPRN+37*, IVPRN+39, IVPRN+40*, IVPRN+41, CHK+2*, CHK+6*, CHK+7*, CHK+11* |
>> LT | CHK+7*, CHK+9, SETLTRT+1*, SETLTRT+3, SETLTRT+6 |
MULTIPG | START+1~, SETVAR+15*, SETVAR+20*, CHK+4, CHK+7* |
>> NAMENEED | SETVAR+13*, SETVAR+14*, SETVAR+19 |
>> NEED | SETVAR+14, SETVAR+15*, SETVAR+19*, SETVAR+20, SETLTRT+1, SETLTRT+2, SETLTRT+5 |
>> ON | START+2*, START+3*, IV+4, IV+10, IV+12, IVPRN+2*, IVPRN+3, IVPRN+4, IVPRN+10, IVPRN+12 |
ON55 | IV+1~, IVPRN+1~, IVPRN+22 |
P | IV+1!, IVPRN+1! |
P( | SETVAR+2* |
P("LOG" | IVPRN+8 |
P("MR" | IV+3, IVPRN+20 |
P("OPI" | IVPRN+21, IVPRN+24, IVPRN+26, SETVAR+18 |
P(11 | SETVAR+3 |
P(2 | IV+2, IV+4, IVPRN+12, SETVAR+3 |
P(3 | IV+4, IVPRN+12, SETVAR+3 |
P(4 | IVPRN+21, SETVAR+18 |
P(8 | IVPRN+20 |
P(9 | IV+4, IV+5, IVPRN+20, SETVAR+3 |
>> PG | IVPRN+7, IVPRN+8, IVPRN+29, IVPRN+30, IVPRN+31, IVPRN+39, IVPRN+40, IVPRN+41, CHK+2, CHK+6 , CHK+7*, CHK+11, SETLTRT+1* |
>> PN | IVPRN+2 |
POPI | IVPRN+32~*, IVPRN+33*, IVPRN+34*, IVPRN+35*, IVPRN+36, IVPRN+39, IVPRN+40 |
>> PPN | IV+17, IV+18, IV+19, IV+27, IV+30, IV+35, IV+37 |
>> PSGCLNC | IV+19 |
PSGDEM1 | IV+22~*, IV+27, IV+30, IV+32 |
>> PSGINCL | IV+26, IV+34 |
>> PSGINCLG | IV+29, IV+36 |
>> PSGINWD | IV+19 |
>> PSGINWDG | IV+18 |
>> PSGLFFD | SETVAR+3* |
>> PSGLRN | SETVAR+5 |
>> PSGLRPH | SETVAR+5 |
>> PSGMARED | START+3* |
>> PSGMARFD | IV+2, SETVAR+3 |
>> PSGMAROC | CHK+3, CHK+4, CHK+7*, SETLTRT+1*, SETLTRT+2, SETLTRT+3, SETLTRT+5* |
>> PSGMARS | IV+6, IV+7 |
>> PSGMARSD | START+3 |
PSGMARWC | IV+8~, IV+9*, IV+40 |
>> PSGMARWN | IV+9, IV+12*, IV+17, IV+18, IV+19, IV+26, IV+27, IV+29, IV+30, IV+34 , IV+35, IV+36, IV+37, IV+40* |
>> PSGMSORT | IV+17, IV+18, IV+19, IV+27, IV+30, IV+35, IV+37 |
>> PSGP | START+3, IV+1, IV+12, IVPRN+22 |
>> PSGP(0 | IVPRN+14 |
>> PSGRBPPN | IV+26, IV+29, IV+34, IV+36 |
>> PSGREP | IV+22, IV+23*, IV+25, IV+27, IV+30 |
>> PSGSS | IV+17, IV+18, IV+19, IV+26, IV+29, IV+34, IV+36 |
>> PSGST | IVPRN+15*, IVPRN+18*, IVPRN+19*, SETVAR+3* |
>> PSIVLOPI | IVPRN+22* |
PSIVOPFL | IVPRN+1~, IVPRN+22*, IVPRN+23, IVPRN+32 |
PSIVOPIA | IVPRN+1~, IVPRN+22* |
PSIVOPIA( | IVPRN+33, IVPRN+34 |
PSIVOPIA("" | IVPRN+33 |
PSJLABEL | IV+1~*, IVPRN+1~, IVPRN+2* |
>> PSJPRB | IV+27, IV+30, IV+35, IV+37 |
>> PSJPRT2 | IVPRN+19* |
>> PSSN | IVPRN+14 |
>> PST | START+3, IV+3 |
>> QST | IV+4*, IV+5*, IV+6, IV+7, IV+17, IV+18, IV+19, IV+27, IV+30, IV+35 , IV+37 |
>> RT | CHK+7*, CHK+8, SETLTRT+1*, SETLTRT+4, SETLTRT+5 |
>> SUB1 | IV+12 |
>> SUB2 | IV+12 |
>> TM | IV+12, IV+27, IV+30, IV+35, IV+37 |
TMSTR | SETVAR+1~, SETVAR+3* |
TXT | IVPRN+1~, IVPRN+15*, IVPRN+16*, IVPRN+18*, IVPRN+19*, IVPRN+20*, IVPRN+26*, IVPRN+27*, IVPRN+31, IVPRN+36* , IVPRN+37*, IVPRN+41, CHK~, CHK+11* |
U | IV+3, IV+10, IV+25, IVPRN+2, IVPRN+19, IVPRN+20 |
>> UP | IVPRN+7, IVPRN+8, IVPRN+29, IVPRN+30, IVPRN+31, IVPRN+39, IVPRN+40, IVPRN+41, CHK+2, CHK+6 , CHK+11 |
X | IV+1~, IV+3*, IV+10*, IV+13~, IV+17, IV+18, IV+19, IV+22, IV+25, IV+32* , IV+35, IV+37, IVPRN+15*, IVPRN+17*, IVPRN+18, IVPRN+19, IVPRN+26*, IVPRN+36*, SETVAR+2*, SETVAR+13~ , SETVAR+14*, SETVAR+18*, SETVAR+19*, SP~, SP+1 |
>> X1 | IV+24* |
>> X2 | IV+24* |
>> XTYPE | IV+3, IV+5 |
Y | IV+13~, IVPRN+24*, IVPRN+32*, SP+1~*, SP+2 |
>> Y1 | IVPRN+23*, IVPRN+24*, IVPRN+25*, IVPRN+26, IVPRN+29, IVPRN+30, IVPRN+32* |
YL | IVPRN+32~*, IVPRN+33*, IVPRN+34 |