PSUV2 ;BIR/CFL - IV functions and subroutines ;25 AUG 1998
Source file <PSUV2.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Benefits Management | 2 | LAB^PSULR0 GETDIV^PSUV3 |
Uncategorized | 1 | $$GETICN^MPIF001 |
Package | Total | Caller Graph |
---|---|---|
Pharmacy Benefits Management | 3 | PSUCS5 PSUOP3 PSUV1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ICN | ;Find patient ICN
|
|
SETREC | ;Set the ^XTMP global for IV Additives and Solutions
|
|
SETDRUG | ;Set the ^XTMP global for the drug distribution report
|
|
GETRATE(TYPE) | ;Determine if the IV type is schedule or infusion rate and calculate the subtotal of each type
|
|
SETSUM | ;Set the ^XTMP global for the summary information
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT("SSN" | ICN+6 |
^XTMP( | GETRATE+4*, GETRATE+7*, GETRATE+10*, GETRATE+13*, GETRATE+16*, GETRATE+19*, GETRATE+22*, GETRATE+25*, GETRATE+28*, SETREC+40 , SETREC+42*, SETREC+79, SETREC+80, SETREC+82*, SETDRUG+2*, SETDRUG+3, SETDRUG+6*, SETSUM+3, SETSUM+4, SETSUM+5 , SETSUM+6, SETSUM+7, SETSUM+8, SETSUM+9, SETSUM+10, SETSUM+11, SETSUM+12, SETSUM+13, SETSUM+14, SETSUM+15 , SETSUM+16, SETSUM+17, SETSUM+18, SETSUM+19, SETSUM+20, SETSUM+21, SETSUM+22, SETSUM+23, SETSUM+34* |
^XTMP("PSU_" | SETREC+14, SETSUM+36*, SETSUM+37*, ICN+9*, ICN+10* |
Name | Line Occurrences |
---|---|
ICN | SETREC+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DATA | SETDRUG+3*, SETDRUG+4, SETDRUG+5 |
>> DLM | SETREC+1*, SETREC+3, SETREC+4, SETREC+5, SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11 , SETREC+15, SETREC+44, SETREC+45, SETREC+46, SETREC+48, SETREC+49, SETREC+50, SETREC+51, SETREC+52, SETREC+53 , SETREC+54 |
>> INDEX | SETREC+1*, SETREC+40*, SETREC+41*, SETREC+42, SETREC+79*, SETREC+80*, SETREC+81*, SETREC+82 |
>> PSIVNFI | SETREC+8, SETREC+50, SETDRUG+5 |
>> PSIVNFR | SETREC+9, SETREC+51 |
>> PSUAADM | SETSUM+27*, SETSUM+32 |
>> PSUACHEM | SETSUM+28*, SETSUM+33 |
>> PSUAHYP | SETSUM+26*, SETSUM+32 |
>> PSUAPIG | SETSUM+24*, SETSUM+31 |
>> PSUASYR | SETSUM+25*, SETSUM+33 |
>> PSUBADM | SETSUM+22*, SETSUM+27, SETSUM+29, SETSUM+32 |
>> PSUBCHEM | SETSUM+23*, SETSUM+28, SETSUM+29, SETSUM+33 |
>> PSUBHYP | SETSUM+21*, SETSUM+26, SETSUM+29, SETSUM+32 |
>> PSUBPIG | SETSUM+19*, SETSUM+24, SETSUM+29, SETSUM+31 |
>> PSUBSYR | SETSUM+20*, SETSUM+25, SETSUM+29, SETSUM+33 |
>> PSUCAN | SETREC+27, SETREC+28 |
>> PSUCAN1 | SETREC+36, SETREC+37, SETREC+65, SETREC+66 |
>> PSUDCLS | SETREC+7, SETREC+49, SETREC+83 |
>> PSUDCST | SETREC+11, SETREC+53 |
>> PSUDEA | SETREC+11, SETREC+53 |
>> PSUDES1 | SETREC+34, SETREC+35, SETREC+63, SETREC+64 |
>> PSUDEST | SETREC+24, SETREC+25 |
>> PSUDGU | SETREC+10, SETREC+52, SETDRUG+4 |
>> PSUDIEN | SETREC+54 |
>> PSUDISP | GETRATE+4, GETRATE+7, GETRATE+10, GETRATE+13, GETRATE+16, GETRATE+19, GETRATE+22, GETRATE+25, GETRATE+28, SETREC+6 , SETDRUG+5 |
>> PSUDISPT | SETREC+18, SETREC+19 |
>> PSUDIV | SETSUM+35*, SETSUM+37 |
>> PSUDIVNM | SETSUM+35, SETSUM+36, SETSUM+37 |
>> PSUDOC(9 | SETREC+5, SETREC+46 |
>> PSUFAC | GETRATE+4, GETRATE+7, GETRATE+10, GETRATE+13, GETRATE+16, GETRATE+19, GETRATE+22, GETRATE+25, GETRATE+28, SETREC+3 , SETREC+40, SETREC+42, SETREC+44, SETREC+79, SETREC+80, SETREC+82, SETREC+83, SETDRUG+2, SETDRUG+3, SETDRUG+6 , SETSUM+1*, SETSUM+2*, SETSUM+3, SETSUM+4, SETSUM+5, SETSUM+6, SETSUM+7, SETSUM+8, SETSUM+9, SETSUM+10 , SETSUM+11, SETSUM+12, SETSUM+13, SETSUM+14, SETSUM+15, SETSUM+16, SETSUM+17, SETSUM+18, SETSUM+19, SETSUM+20 , SETSUM+21, SETSUM+22, SETSUM+23, SETSUM+34, SETSUM+35 |
>> PSUFAC( | SETSUM+2 |
>> PSUGNM | SETREC+10, SETREC+52, SETREC+83, SETDRUG+2, SETDRUG+3, SETDRUG+6 |
PSUICN | ICN+3~ |
>> PSUIV( | GETRATE+3, GETRATE+6, GETRATE+9, GETRATE+12, GETRATE+15, GETRATE+18, GETRATE+21, GETRATE+24, GETRATE+27, SETREC+3 , SETREC+4, SETREC+15, SETREC+44, SETREC+54 |
>> PSUIV(106 | GETRATE+17, GETRATE+20, GETRATE+23, GETRATE+26 |
>> PSUIV(108 | GETRATE+11, GETRATE+14, GETRATE+23, GETRATE+26 |
>> PSUIVSUB | GETRATE+4, GETRATE+7, GETRATE+10, GETRATE+13, GETRATE+16, GETRATE+19, GETRATE+22, GETRATE+25, GETRATE+28, SETREC+40 , SETREC+42, SETREC+79, SETREC+80, SETREC+82, SETDRUG+2, SETDRUG+3, SETDRUG+6, SETSUM+3, SETSUM+4, SETSUM+5 , SETSUM+6, SETSUM+7, SETSUM+8, SETSUM+9, SETSUM+10, SETSUM+11, SETSUM+12, SETSUM+13, SETSUM+14, SETSUM+15 , SETSUM+16, SETSUM+17, SETSUM+18, SETSUM+19, SETSUM+20, SETSUM+21, SETSUM+22, SETSUM+23, SETSUM+34 |
>> PSUJOB | SETREC+14, SETSUM+36, SETSUM+37, ICN+9, ICN+10 |
>> PSUNAF | SETREC+11, SETREC+53 |
>> PSUNDC | SETREC+7, SETREC+49 |
>> PSUNFI | SETREC+8, SETREC+50, SETDRUG+5 |
>> PSUNITS | SETREC+11, SETREC+53, SETDRUG+4 |
>> PSUOCST | SETSUM+8*, SETSUM+31 |
>> PSUODA | SETREC+83 |
>> PSUODSP | SETSUM+7*, SETSUM+31 |
>> PSUOUTP | SETREC+4 |
>> PSUPDA | SETREC+83 |
PSUPICN | SETREC+14*, SETREC+15, SETREC+54, ICN+3~ |
PSUPICN1 | ICN+3~, ICN+7*, ICN+8, ICN+9, ICN+10 |
>> PSUPNAM | SETREC+9, SETREC+51 |
>> PSUPRNM | SETREC+6, SETREC+48 |
>> PSUPTN | ICN+5*, ICN+6*, ICN+7 |
>> PSURATE | GETRATE+1*, GETRATE+3*, GETRATE+6*, GETRATE+9*, GETRATE+12*, GETRATE+15*, GETRATE+18*, GETRATE+21*, GETRATE+24*, GETRATE+27* , SETREC+5, SETREC+46 |
>> PSURCY1 | SETREC+32, SETREC+33, SETREC+61, SETREC+62 |
>> PSURECT | SETREC+21, SETREC+22 |
>> PSUSADM | SETSUM+17*, SETSUM+27 |
>> PSUSCHEM | SETSUM+18*, SETSUM+28 |
>> PSUSHYP | SETSUM+16*, SETSUM+26 |
>> PSUSPIG | SETSUM+14*, SETSUM+24 |
>> PSUSSN | SETREC+4, SETREC+45, ICN+4, ICN+6 |
>> PSUSSYR | SETSUM+15*, SETSUM+25 |
>> PSUTADM | SETSUM+12* |
>> PSUTBAGS | SETSUM+29*, SETSUM+30 |
>> PSUTCHEM | SETSUM+13* |
>> PSUTCS1 | SETREC+75, SETREC+76 |
>> PSUTCST | SETSUM+5*, SETSUM+30 |
>> PSUTDS1 | SETREC+73, SETREC+74 |
>> PSUTDSP1 | SETREC+30, SETREC+31, SETREC+59, SETREC+60 |
>> PSUTHYP | SETSUM+11* |
>> PSUTOP | SETSUM+6*, SETSUM+30 |
>> PSUTORD | SETSUM+3*, SETSUM+30 |
>> PSUTPAT | SETSUM+4*, SETSUM+30, SETSUM+36, SETSUM+37 |
>> PSUTPIG | SETSUM+9* |
>> PSUTRS1 | SETREC+71, SETREC+72 |
>> PSUTSOL1 | SETREC+69, SETREC+70 |
>> PSUTSYR | SETSUM+10* |
>> REC | SETREC+1*, SETREC+3*, SETREC+4*, SETREC+5*, SETREC+6*, SETREC+7*, SETREC+8*, SETREC+9*, SETREC+10*, SETREC+11* , SETREC+15*, SETREC+18*, SETREC+19*, SETREC+21*, SETREC+22*, SETREC+24*, SETREC+25*, SETREC+27*, SETREC+28*, SETREC+30* , SETREC+31*, SETREC+32*, SETREC+33*, SETREC+34*, SETREC+35*, SETREC+36*, SETREC+37*, SETREC+42, SETREC+44*, SETREC+45* , SETREC+46*, SETREC+48*, SETREC+49*, SETREC+50*, SETREC+51*, SETREC+52*, SETREC+53*, SETREC+54*, SETREC+57*, SETREC+59* , SETREC+60*, SETREC+61*, SETREC+62*, SETREC+63*, SETREC+64*, SETREC+65*, SETREC+66*, SETREC+69*, SETREC+70*, SETREC+71* , SETREC+72*, SETREC+73*, SETREC+74*, SETREC+75*, SETREC+76*, SETREC+82, SETDRUG+1*, SETDRUG+4*, SETDRUG+5*, SETDRUG+6 , SETSUM+30*, SETSUM+31*, SETSUM+32*, SETSUM+33*, SETSUM+34 |
>> RECIND | SETREC+10, SETREC+52, SETREC+58, SETREC+68 |
>> RECTYP | SETREC+2, SETREC+4, SETREC+43 |
TYPE | GETRATE~, GETRATE+2, GETRATE+5, GETRATE+8, GETRATE+11, GETRATE+14, GETRATE+17, GETRATE+20, GETRATE+23, GETRATE+26 |
U | SETREC+15, SETREC+18, SETREC+19, SETREC+21, SETREC+22, SETREC+24, SETREC+25, SETREC+27, SETREC+28, SETREC+30 , SETREC+31, SETREC+32, SETREC+33, SETREC+34, SETREC+35, SETREC+36, SETREC+37, SETREC+54, SETREC+57, SETREC+59 , SETREC+60, SETREC+61, SETREC+62, SETREC+63, SETREC+64, SETREC+65, SETREC+66, SETREC+69, SETREC+70, SETREC+71 , SETREC+72, SETREC+73, SETREC+74, SETREC+75, SETREC+76, SETDRUG+4, SETDRUG+5, SETSUM+30, SETSUM+31, SETSUM+32 , SETSUM+33 |