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 |