PSUOP1 ;BIR/CFL - PSU PBM Outpatient Pharmacy Data Collection for Version 6.0 ;25 AUG 1998
Source file <PSUOP1.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Benefits Management | 2 | (GETDRUG,PROVDR,SETREC)^PSUOP3 ($$VALI,GETS,MOVEI)^PSUTL |
Registration | 1 | PID^VADPT |
VA FileMan | 1 | C^%DTC |
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 |
---|---|---|
Pharmacy Benefits Management | 1 | PSUOP0 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Entry to data collection
|
|
ADLOOP | ;Loop through the AD cross reference
|
|
ARLOOP | ;Check to see if CMOP Data exists for the reporting period
|
|
ADPLOOP | ;Get data for partial fills
|
|
GETDATA | ;Get the data for New Fills, Refills and Partial fills
|
|
GETPART | ;Get data for Partial Fills
|
|
COMVAR | ;Get the common variables
|
|
CMOPARY | ;Loop through the "AR" cross reference and build CMOP array
|
Name | Field # of Occurrence |
---|---|
C^%DTC | ADLOOP+2, CMOPARY+2 |
GETDRUG^PSUOP3 | COMVAR+10 |
PROVDR^PSUOP3 | GETDATA+15, GETDATA+36, GETPART+15 |
SETREC^PSUOP3 | ADLOOP+21, ARLOOP+6, ADPLOOP+8 |
$$VALI^PSUTL | GETDATA+13, GETDATA+33, GETDATA+34, GETPART+13 |
GETS^PSUTL | GETDATA+18, GETPART+2, COMVAR+1 |
MOVEI^PSUTL | GETDATA+19, GETPART+3, COMVAR+2 |
PID^VADPT | COMVAR+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | ADLOOP+2!, CMOPARY+2! |
%H | ADLOOP+2!, CMOPARY+2! |
%T | ADLOOP+2!, CMOPARY+2! |
>> DFN | COMVAR+4* |
>> PSUCDT | CMOPARY+3*, CMOPARY+4*, CMOPARY+6, CMOPARY+8 |
>> PSUCLN | CMOPARY+7*, CMOPARY+8*, CMOPARY+9 |
>> PSUCMOP | ADLOOP+13*, ADLOOP+17, ARLOOP+2*, ADPLOOP+3*, GETDATA+12, GETDATA+32 |
>> PSUCRX | CMOPARY+5*, CMOPARY+6*, CMOPARY+8, CMOPARY+9 |
>> PSUDIVP | GETDATA+10*, GETDATA+23*, GETPART+7* |
>> PSUDR | GETDATA+30*, COMVAR+7* |
>> PSUDRCT | GETDATA+5*, GETDATA+26*, GETPART+10* |
>> PSUDRUG(31 | GETDATA+14, GETDATA+35, GETPART+14 |
>> PSUDS | GETDATA+3*, GETDATA+24*, GETPART+8* |
>> PSUEDT | ADLOOP+4, ARLOOP+5, ADPLOOP+7 |
>> PSUFD | ADPLOOP+7, GETDATA+2*, GETDATA+20*, GETPART+4* |
>> PSUFDT | ADLOOP+3*, ADLOOP+4*, ADLOOP+6, ADLOOP+8, ADLOOP+18 |
>> PSUFIL | ADLOOP+7*, ADLOOP+8*, ADLOOP+11 |
>> PSUFLN | ADLOOP+11*, ADLOOP+19, ARLOOP+1, ARLOOP+3 |
>> PSUMW | GETDATA+9*, GETDATA+22*, GETPART+6* |
>> PSUNDC | GETDATA+11*, GETDATA+13*, GETDATA+14*, GETDATA+31*, GETDATA+33*, GETDATA+34*, GETDATA+35*, GETPART+13*, GETPART+14* |
PSUOP | ADLOOP+10! |
PSUOP( | COMVAR+3 |
PSUOP(11 | GETDATA+9 |
PSUOP(17 | GETDATA+5 |
PSUOP(2 | COMVAR+4 |
PSUOP(20 | GETDATA+10 |
PSUOP(22 | GETDATA+2 |
PSUOP(27 | GETDATA+14 |
PSUOP(3 | GETDATA+29, COMVAR+8 |
PSUOP(31 | GETDATA+6 |
PSUOP(4 | GETDATA+8 |
PSUOP(6 | GETDATA+30, COMVAR+7 |
PSUOP(7 | GETDATA+4 |
PSUOP(8 | GETDATA+3 |
>> PSUOPSUB | ADLOOP+22 |
PSUPART | GETPART+1! |
PSUPART( | GETPART+4, GETPART+6, GETPART+7, GETPART+8, GETPART+9, GETPART+10 |
PSUPART(6 | GETPART+5 |
PSUPART(8 | GETPART+11 |
>> PSUPFN | ADPLOOP+1*, ADPLOOP+2* |
>> PSUPRID | GETDATA+8*, GETDATA+21*, GETPART+5* |
>> PSUQTY | GETDATA+4*, GETDATA+25*, GETPART+9* |
>> PSUREFIL( | GETDATA+20, GETDATA+24, GETDATA+26 |
>> PSUREFIL(1 | GETDATA+25 |
>> PSUREFIL(15 | GETDATA+21 |
>> PSUREFIL(17 | GETDATA+27 |
>> PSUREFIL(2 | GETDATA+22 |
>> PSUREFIL(8 | GETDATA+23 |
>> PSURELDT | ARLOOP+5, GETDATA+6*, GETDATA+7*, GETDATA+27*, GETDATA+28*, GETPART+11*, GETPART+12* |
>> PSURXIEN | ADLOOP+5*, ADLOOP+6*, ADLOOP+8, ADLOOP+9, ADLOOP+16, ADLOOP+22, ARLOOP+1, ADPLOOP+2, COMVAR+1 |
>> PSURXN | COMVAR+3* |
>> PSURXP | GETDATA+29*, COMVAR+8* |
>> PSUSDT | ADLOOP+1, ADLOOP+18, ARLOOP+5, ADPLOOP+7, CMOPARY+1 |
>> PSUSSN | COMVAR+5* |
PSUTYP | ADLOOP+10!, ADLOOP+19*, ARLOOP+3*, ADPLOOP+5*, GETDATA+1, GETDATA+17 |
>> PSUWPC | COMVAR+6* |
REC | GETDATA+17! |
>> VA("PID" | COMVAR+5 |
>> X | ADLOOP+3, CMOPARY+3 |
>> X1 | ADLOOP+1*, CMOPARY+1* |
>> X2 | ADLOOP+1*, CMOPARY+1* |