PSUOP3 ;BIR/CFL,TJH,PDW-PSU PBM Outpatient Pharmacy shared variables ;08/25/2003
Source file <PSUOP3.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Benefits Management | 5 | LAB^PSULR0 DIVNM^PSUOP6 MULTI^PSUOPAM ($$UPPER,$$VAL,$$VALI,GETS,MOVEI)^PSUTL ICN^PSUV2 |
Kernel | 2 | $$VERSION^XPDUTL $$GET^XUA4A72 |
VA Fileman | 2 | ^DIC $$GET1^DIQ |
National Drug File | 1 | ($$FORMI,$$FORMR)^PSNAPIS |
Package | Total | Caller Graph |
---|---|---|
Pharmacy Benefits Management | 2 | PSUOP1 PSUOP2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDRUG | ;Get drug data
|
|
SUMDRUG | ; total drug info for summary report
|
|
REC6 | ;
|
|
GETDRUGQ | ||
NOPROV | ; set up PSUPROV array when provider isn't found in ^VA(200
|
|
GETVAR | ;Get shared variables
|
|
SETREC | ;Set the record into the ^XTMP global
|
|
PROVDR | ;Get provider data, site number and AMIS category
|
|
REC4 | ;Multidose records greater than 200 characters in length
|
|
REC5 | ;
|
Name | Field # of Occurrence |
---|---|
^DIC | PROVDR+4 |
$$GET1^DIQ | GETVAR+4, GETVAR+14 |
$$FORMI^PSNAPIS | GETDRUG+20 |
$$FORMR^PSNAPIS | GETDRUG+21 |
LAB^PSULR0 | SETREC+98 |
DIVNM^PSUOP6 | PROVDR+7 |
MULTI^PSUOPAM | SETREC+69 |
$$UPPER^PSUTL | GETVAR+19 |
$$VAL^PSUTL | PROVDR+5, GETVAR+18 |
$$VALI^PSUTL | PROVDR+1, GETVAR+2, GETVAR+16, GETVAR+17 |
GETS^PSUTL | GETVAR+6, GETDRUG+2 |
MOVEI^PSUTL | GETVAR+8, GETDRUG+3 |
ICN^PSUV2 | SETREC+15 |
$$VERSION^XPDUTL | GETDRUG+19 |
$$GET^XUA4A72 | GETVAR+21 |
FileNo | Call Tags |
---|---|
^PSRX - [#52] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("PSOR" | SETREC+67, SETREC+68 |
^XTMP( | SETREC+56, SETREC+57*, SETREC+58*, SETREC+59*, SETREC+60*, SETREC+87, SETREC+88*, SETREC+89*, SETREC+90*, SETREC+91* , SETREC+92*, SETREC+93*, SETREC+95*, SUMDRUG+2, SUMDRUG+12* |
^XTMP("PSU_" | PROVDR+8*, GETVAR+11*, SETREC+15, SETREC+97 |
Name | Line Occurrences |
---|---|
NOPROV | GETVAR+7 |
REC4 | SETREC+70 |
REC5 | REC4+2 |
REC6 | REC5+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DFN | SETREC+98 |
>> DIC | PROVDR+4* |
>> DIC(0 | PROVDR+4* |
>> I | NOPROV+1*, GETDRUG+4*, SUMDRUG+3* |
>> PSECT( | GETVAR+20 |
>> PSOPNFI | GETDRUG+18*, GETDRUG+20*, SETREC+8, SUMDRUG+11 |
>> PSOPNFR | GETDRUG+18*, GETDRUG+21*, SETREC+8 |
>> PSU2U | SETREC+2*, SETREC+3, SETREC+4, SETREC+5, SETREC+6, SETREC+7, SETREC+8, SETREC+9, SETREC+10, SETREC+11 , SETREC+12, SETREC+13, SETREC+14, SETREC+16, SETREC+21, SETREC+23, SETREC+26, SETREC+28, SETREC+31, SETREC+32 , SETREC+33, SETREC+35, SETREC+36, SETREC+37, SETREC+42, SETREC+43, SETREC+44, SETREC+45, SETREC+46, SETREC+47 , SETREC+48, SETREC+49, SETREC+50, SETREC+71, SETREC+72, SETREC+73, SETREC+74, SETREC+75, SETREC+76, SETREC+77 , SETREC+78, SETREC+79, REC4+3, REC4+4, REC4+5, REC4+6, REC4+7, REC4+8, REC4+9, REC4+10 , REC4+11, REC5+2, REC5+3, REC5+4, REC5+5, REC5+6, REC5+7, REC5+8, REC5+9, REC5+10 , REC6+1, REC6+2, REC6+3, REC6+4, REC6+5, REC6+6, REC6+7, REC6+8, REC6+9 |
>> PSUAMMD | SETREC+68* |
>> PSUCAN | SETREC+16 |
>> PSUCLN | SETREC+21 |
>> PSUCMID | GETDRUG+16*, SETREC+23 |
>> PSUCMOP | SETREC+10, SUMDRUG+2, SUMDRUG+12 |
>> PSUCONJ | SETREC+47 |
>> PSUCONMD | SETREC+76, REC4+8, REC5+7, REC6+6 |
>> PSUCOPAY | SETREC+35 |
>> PSUD1 | SETREC+66*, SETREC+67*, SETREC+68 |
>> PSUDEA | GETDRUG+9*, SETREC+9 |
>> PSUDISPU | SETREC+43 |
>> PSUDIVNM | PROVDR+5*, PROVDR+7, PROVDR+8 |
>> PSUDIVP | PROVDR+1, SETREC+1* |
>> PSUDOC(9 | GETVAR+12* |
>> PSUDR | GETDRUG+2 |
>> PSUDRCT | SETREC+13, SUMDRUG+8 |
PSUDRUG | GETDRUG+1!, GETDRUG+4 |
PSUDRUG( | GETDRUG+4*, GETDRUG+5, GETDRUG+11 |
PSUDRUG(2 | GETDRUG+12 |
PSUDRUG(20 | GETDRUG+15 |
PSUDRUG(21 | GETDRUG+7 |
PSUDRUG(22 | GETDRUG+13 |
PSUDRUG(27 | GETDRUG+16 |
PSUDRUG(3 | GETDRUG+9 |
PSUDRUG(51 | GETDRUG+10 |
PSUDRUG(52 | GETDRUG+14 |
>> PSUDS | SETREC+14 |
>> PSUDSG | SETREC+42 |
>> PSUDSGMD | SETREC+71, REC4+3, REC5+2, REC6+1 |
>> PSUDSPMD | SETREC+72, REC4+4, REC5+3, REC6+2 |
>> PSUDUN | GETDRUG+11*, SETREC+13 |
>> PSUDUR | SETREC+46 |
>> PSUDURMD | SETREC+75, REC4+7, REC5+6, REC6+5 |
>> PSUFD | SETREC+3 |
>> PSUFDT | GETVAR+21 |
>> PSUFP | SETREC+25, SETREC+26, SETREC+27 |
>> PSUGNM | GETDRUG+5*, GETDRUG+6*, SETREC+6, SETREC+98, SUMDRUG+2, SUMDRUG+12 |
>> PSUJOB | PROVDR+8, GETVAR+11, SETREC+15, SETREC+97 |
>> PSUMDFLG | SETREC+37, SETREC+65, SETREC+86 |
>> PSUMW | SETREC+10 |
>> PSUNADR | GETDRUG+15*, GETDRUG+20, GETDRUG+21 |
>> PSUNAF | GETDRUG+14*, SETREC+14 |
>> PSUNDC | SETREC+7 |
>> PSUNDCL | GETDRUG+13*, GETDRUG+20, GETDRUG+21 |
>> PSUNFI | GETDRUG+10*, SETREC+7, SUMDRUG+10 |
>> PSUNITMD | SETREC+73, REC4+5, REC5+4, REC6+3 |
>> PSUNITS | SETREC+44 |
>> PSUNMD | SETREC+74, REC4+6, REC5+5, REC6+4 |
>> PSUNOUN | SETREC+45 |
>> PSUOPSUB | SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+60, SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91 , SETREC+92, SETREC+93, SETREC+95, SUMDRUG+2, SUMDRUG+12 |
>> PSUOPVER | SETREC+60 |
>> PSUORDT | SETREC+31 |
>> PSUPCLS | GETVAR+15*, GETVAR+16*, GETVAR+17*, NOPROV+2* |
>> PSUPDT | SETREC+33 |
>> PSUPI | SETREC+36 |
>> PSUPICN | SETREC+15*, SETREC+16 |
>> PSUPRID | GETVAR+6, GETVAR+11, GETVAR+21, SETREC+16 |
PSUPROV | GETVAR+5!, GETVAR+7 |
PSUPROV( | GETVAR+13, GETVAR+15, GETVAR+16, GETVAR+17, NOPROV+1* |
PSUPROV(29 | GETVAR+18 |
PSUPROV(9 | GETVAR+9 |
>> PSUPRSSN | GETVAR+9*, GETVAR+10*, GETVAR+11, GETVAR+12, NOPROV+2*, SETREC+11 |
>> PSUPSERV | GETVAR+19*, GETVAR+20*, NOPROV+2* |
>> PSUPST | GETVAR+2*, GETVAR+3 |
>> PSUPSV | GETVAR+18*, GETVAR+19*, GETVAR+20 |
>> PSUPTYP | GETVAR+13*, GETVAR+14*, NOPROV+2*, SETREC+11 |
>> PSUQTY | SETREC+14, SUMDRUG+7, SUMDRUG+8 |
>> PSURCT | SETREC+56*, SETREC+57, SETREC+58, SETREC+59, SETREC+87*, SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92 , SETREC+93, SETREC+95 |
>> PSUREC | SUMDRUG+2*, SUMDRUG+3 |
>> PSUREDT | SETREC+32 |
>> PSURELDT | SETREC+4 |
>> PSUROUT | SETREC+48 |
>> PSURTMD | SETREC+77, REC4+9, REC5+8, REC6+7 |
>> PSURXIEN | GETVAR+4, GETVAR+14, SETREC+56, SETREC+57, SETREC+58, SETREC+59, SETREC+60, SETREC+67, SETREC+68, SETREC+87 , SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92, SETREC+93, SETREC+95, SETREC+98 |
>> PSURXN | SETREC+4 |
>> PSURXP | GETVAR+2 |
>> PSUSC | GETVAR+3*, GETVAR+4*, SETREC+5 |
>> PSUSCHED | SETREC+49 |
>> PSUSCHMD | SETREC+78, REC4+10, REC5+9, REC6+8 |
>> PSUSITE | PROVDR+1*, PROVDR+4, PROVDR+7, PROVDR+8, SETREC+3, SETREC+26, SETREC+56, SETREC+57, SETREC+58, SETREC+59 , SETREC+87, SETREC+88, SETREC+89, SETREC+90, SETREC+91, SETREC+92, SETREC+93, SETREC+95, SETREC+98, SUMDRUG+2 , SUMDRUG+12 |
>> PSUSNDR | PROVDR+1, SETREC+1 |
>> PSUSP1 | GETVAR+22*, NOPROV+2* |
>> PSUSP2 | GETVAR+22*, NOPROV+2* |
>> PSUSPTY | GETVAR+21*, GETVAR+22 |
>> PSUSSN | SETREC+5 |
>> PSUTCST | SUMDRUG+8*, SUMDRUG+9 |
>> PSUTFIL | SUMDRUG+5*, SUMDRUG+9 |
>> PSUTPART | SUMDRUG+4*, SUMDRUG+9 |
>> PSUTQTY | SUMDRUG+7*, SUMDRUG+9 |
>> PSUTRFIL | SUMDRUG+6*, SUMDRUG+9 |
>> PSUTYP | SETREC+9, SETREC+31, SETREC+32, SETREC+33, SETREC+60, SUMDRUG+4, SUMDRUG+5, SUMDRUG+6 |
>> PSUVACLS | GETDRUG+12*, SETREC+6, SETREC+98 |
>> PSUVANM | GETDRUG+7*, GETDRUG+8*, SETREC+5 |
>> PSUVARS | SUMDRUG+1*, SUMDRUG+3 |
>> PSUVERB | SETREC+50 |
>> PSUVRBMD | SETREC+79, REC4+11, REC5+10, REC6+9 |
>> PSUWPC | SETREC+12 |
>> REC | SUMDRUG+9*, SUMDRUG+10*, SUMDRUG+11*, SUMDRUG+12 |
>> REC1 | SETREC+2*, SETREC+3*, SETREC+4*, SETREC+5*, SETREC+6*, SETREC+7*, SETREC+8*, SETREC+9*, SETREC+10*, SETREC+11* , SETREC+12*, SETREC+13*, SETREC+14*, SETREC+16*, SETREC+57, SETREC+88 |
>> REC2 | SETREC+2*, SETREC+21*, SETREC+23*, SETREC+26*, SETREC+28*, SETREC+31*, SETREC+32*, SETREC+33*, SETREC+35*, SETREC+36* , SETREC+37*, SETREC+42*, SETREC+43*, SETREC+44*, SETREC+45*, SETREC+46*, SETREC+47*, SETREC+48*, SETREC+49*, SETREC+50* , SETREC+58, SETREC+89 |
>> REC3 | SETREC+2*, SETREC+70, SETREC+71*, SETREC+72*, SETREC+73*, SETREC+74*, SETREC+75*, SETREC+76*, SETREC+77*, SETREC+78* , SETREC+79*, SETREC+90 |
>> REC4 | SETREC+2*, SETREC+91, REC4+2, REC4+3*, REC4+4*, REC4+5*, REC4+6*, REC4+7*, REC4+8*, REC4+9* , REC4+10*, REC4+11* |
>> REC5 | SETREC+2*, SETREC+92, REC5+1, REC5+2*, REC5+3*, REC5+4*, REC5+5*, REC5+6*, REC5+7*, REC5+8* , REC5+9*, REC5+10* |
>> REC6 | SETREC+2*, SETREC+93, REC6+1*, REC6+2*, REC6+3*, REC6+4*, REC6+5*, REC6+6*, REC6+7*, REC6+8* , REC6+9* |
U | GETVAR+22, SETREC+14, SETREC+56, SETREC+59, SETREC+87, SETREC+95, SUMDRUG+3, SUMDRUG+9, SUMDRUG+10, SUMDRUG+11 |
>> X | PROVDR+4*, PROVDR+5*, PROVDR+7* |
>> Y | PROVDR+5 |