PSUAR6 ;BIR/DAM - AR/WS AMIS Summary Data;11 March 2004
Source file <PSUAR6.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;Entry point to gather AMIS data. Called from PSUAR0
|
|
DSP | ;Calculate AR/WS dispensed data
|
|
RET | ;Calculate AR/WS returned data
|
|
NET | ;Calculate Net dispensed data
|
|
TCOST | ;Calculate total cost
|
|
AVE | ;Calculate Average cost per dose
|
|
TRUNC | ;Truncate pieces with dollar values to 2 decimal places
|
|
TOTAL | ;Calculate column totals for each division
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | TRUNC+3~, TRUNC+6*, TRUNC+7, TRUNC+8, TOTAL+12~, TOTAL+13*, TOTAL+14, TOTAL+15, TOTAL+36~, TOTAL+37* , TOTAL+38, TOTAL+39, TOTAL+59~, TOTAL+60*, TOTAL+61, TOTAL+62, TOTAL+85~, TOTAL+86*, TOTAL+87, TOTAL+88 |
B | TRUNC+3~, TRUNC+7*, TRUNC+10, TOTAL+12~, TOTAL+14*, TOTAL+17, TOTAL+36~, TOTAL+38*, TOTAL+41, TOTAL+59~ , TOTAL+61*, TOTAL+64, TOTAL+85~, TOTAL+87*, TOTAL+90 |
C | TRUNC+3~, TRUNC+8*, TRUNC+9*, TRUNC+10, TOTAL+12~, TOTAL+15*, TOTAL+16*, TOTAL+17, TOTAL+36~, TOTAL+39* , TOTAL+40*, TOTAL+41, TOTAL+59~, TOTAL+62*, TOTAL+63*, TOTAL+64, TOTAL+85~, TOTAL+88*, TOTAL+89*, TOTAL+90 |
DBLD | DSP+1~, DSP+18*, DSP+19*, DSP+20 |
DFLD | DSP+1~, DSP+13*, DSP+14*, DSP+15 |
DSP | DSP+1~, DSP+3*, DSP+4*, DSP+5 |
DUNT | DSP+1~, DSP+8*, DSP+9*, DSP+10 |
>> I | TRUNC+2*, TRUNC+4, TRUNC+5, TRUNC+6, TRUNC+7, TRUNC+8, TRUNC+10 |
NET | EN+2~, AVE+1~, AVE+2*, AVE+3*, AVE+5, AVE+10!, AVE+13*, AVE+14*, AVE+16, AVE+21! , AVE+26*, AVE+27*, AVE+29, AVE+34!, AVE+39*, AVE+40*, AVE+42, AVE+47! |
PSUAMIS | EN+7! |
PSUAMIS( | EN+8*, EN+10, DSP+3, DSP+8, DSP+13, DSP+18, RET+3, RET+8, RET+13, RET+18 |
PSUAR | EN+1! |
PSUAR("BLD" | DSP+20*, RET+20*, NET+11*, TCOST+17, TCOST+18*, AVE+38, AVE+39, AVE+41, AVE+42*, AVE+43 , AVE+45*, AVE+48, AVE+49*, TOTAL+75, TOTAL+78, TOTAL+79, TOTAL+80, TOTAL+81, TOTAL+82, TOTAL+97 |
PSUAR("DSP" | DSP+5*, RET+5*, NET+2*, TCOST+7*, AVE+2, AVE+4, AVE+5*, AVE+6, AVE+8*, TOTAL+2 , TOTAL+5, TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+9 |
PSUAR("FLD" | DSP+15*, RET+15*, NET+8*, TCOST+15*, AVE+25, AVE+26, AVE+28, AVE+29*, AVE+30, AVE+32* , AVE+35, AVE+36*, TOTAL+49, TOTAL+52, TOTAL+53, TOTAL+54, TOTAL+55, TOTAL+56, TOTAL+71 |
PSUAR("UNIT" | DSP+10*, RET+10*, NET+5*, TCOST+12*, AVE+12, AVE+13, AVE+15, AVE+16*, AVE+17, AVE+19* , AVE+22, AVE+23*, TOTAL+26, TOTAL+29, TOTAL+30, TOTAL+31, TOTAL+32, TOTAL+33 |
>> PSUARSUB | EN+4, EN+6, EN+8 |
>> PSUCA | TCOST+2*, TCOST+3*, TCOST+4, TCOST+9, TCOST+14, TCOST+15, TCOST+16, TCOST+18 |
>> PSUCAT | EN+9*, EN+10*, DSP+2, DSP+7, DSP+12, DSP+17, RET+2, RET+7, RET+12, RET+17 , NET+1, NET+4, NET+7, NET+10 |
>> PSUCT | EN+5*, EN+6*, EN+8, EN+10, DSP+3, DSP+8, DSP+13, DSP+18, RET+3, RET+8 , RET+13, RET+18 |
>> PSUDIV | AVE+38, TOTAL+4*, TOTAL+5*, TOTAL+6, TOTAL+7, TOTAL+8, TOTAL+9, TOTAL+28*, TOTAL+29*, TOTAL+30 , TOTAL+31, TOTAL+32, TOTAL+33, TOTAL+51*, TOTAL+52*, TOTAL+53, TOTAL+54, TOTAL+55, TOTAL+56, TOTAL+77* , TOTAL+78*, TOTAL+79, TOTAL+80, TOTAL+81, TOTAL+82 |
>> PSUDV | EN+3*, EN+4*, EN+6, EN+8, EN+10, DSP+3, DSP+5, DSP+8, DSP+10, DSP+13 , DSP+15, DSP+18, DSP+20, RET+3, RET+5, RET+8, RET+10, RET+13, RET+15, RET+18 , RET+20, NET+2, NET+5, NET+8, NET+11, TCOST+3, TCOST+5, TCOST+6, TCOST+7, TCOST+10 , TCOST+11, TCOST+12, TCOST+15, TCOST+17, TCOST+18, AVE+2, AVE+4, AVE+5, AVE+6, AVE+8 , AVE+12, AVE+13, AVE+15, AVE+16, AVE+17, AVE+19, AVE+22, AVE+23, AVE+25, AVE+26 , AVE+28, AVE+29, AVE+30, AVE+32, AVE+35, AVE+36, AVE+38, AVE+39, AVE+41, AVE+42 , AVE+43, AVE+45, AVE+48, AVE+49 |
RBLD | RET+1~, RET+18*, RET+19*, RET+20 |
RET | RET+1~, RET+3*, RET+4*, RET+5 |
RFLD | RET+1~, RET+13*, RET+14*, RET+15 |
RUNT | RET+1~, RET+8*, RET+9*, RET+10 |
T1 | TCOST+1~, TCOST+5*, TCOST+7, TCOST+8!, TCOST+10*, TCOST+12, TCOST+13! |
T2 | TCOST+1~, TCOST+6*, TCOST+7, TCOST+8!, TCOST+11*, TCOST+12, TCOST+13! |
TAVE | TOTAL+3~, TOTAL+10*, TOTAL+11*, TOTAL+13, TOTAL+14, TOTAL+15, TOTAL+17*, TOTAL+18*, TOTAL+20, TOTAL+27~ , TOTAL+34*, TOTAL+35*, TOTAL+37, TOTAL+38, TOTAL+39, TOTAL+41*, TOTAL+42*, TOTAL+43, TOTAL+50~, TOTAL+57* , TOTAL+58*, TOTAL+60, TOTAL+61, TOTAL+62, TOTAL+64*, TOTAL+65*, TOTAL+66, TOTAL+76~, TOTAL+83*, TOTAL+84* , TOTAL+86, TOTAL+87, TOTAL+88, TOTAL+90*, TOTAL+91*, TOTAL+92 |
TCST | TOTAL+3~, TOTAL+9*, TOTAL+10, TOTAL+20, TOTAL+27~, TOTAL+33*, TOTAL+34, TOTAL+43, TOTAL+50~, TOTAL+56* , TOTAL+57, TOTAL+66, TOTAL+76~, TOTAL+82*, TOTAL+83, TOTAL+92 |
TDSP | TOTAL+3~, TOTAL+6*, TOTAL+20, TOTAL+27~, TOTAL+30*, TOTAL+43, TOTAL+50~, TOTAL+53*, TOTAL+66, TOTAL+76~ , TOTAL+79*, TOTAL+92 |
TNET | TOTAL+3~, TOTAL+8*, TOTAL+10, TOTAL+20, TOTAL+27~, TOTAL+32*, TOTAL+34, TOTAL+43, TOTAL+50~, TOTAL+55* , TOTAL+57, TOTAL+66, TOTAL+76~, TOTAL+81*, TOTAL+83, TOTAL+92 |
TOT | EN+2~, AVE+1~, AVE+4*, AVE+5, AVE+10!, AVE+15*, AVE+16, AVE+21!, AVE+28*, AVE+29 , AVE+34!, AVE+41*, AVE+42, AVE+47! |
>> TOTAL("BLD" | TOTAL+92*, TOTAL+93, TOTAL+95*, TOTAL+98* |
>> TOTAL("DSP" | TOTAL+20*, TOTAL+21, TOTAL+23* |
>> TOTAL("FLD" | TOTAL+66*, TOTAL+67, TOTAL+69*, TOTAL+72* |
>> TOTAL("UNIT" | TOTAL+43*, TOTAL+44, TOTAL+46* |
TRET | TOTAL+3~, TOTAL+7*, TOTAL+20, TOTAL+27~, TOTAL+31*, TOTAL+43, TOTAL+50~, TOTAL+54*, TOTAL+66, TOTAL+76~ , TOTAL+80*, TOTAL+92 |
TRUNC | EN+2~, AVE+6*, AVE+8, AVE+9!, AVE+17*, AVE+19, AVE+20!, AVE+30*, AVE+32, AVE+33! , AVE+43*, AVE+45, AVE+46!, TRUNC+4, TRUNC+5*, TRUNC+6, TRUNC+7, TRUNC+8, TRUNC+10*, TOTAL+21* , TOTAL+23, TOTAL+24!, TOTAL+44*, TOTAL+46, TOTAL+47!, TOTAL+67*, TOTAL+69, TOTAL+70!, TOTAL+93*, TOTAL+95 , TOTAL+96! |
U | EN+10, DSP+3, DSP+5, DSP+8, DSP+10, DSP+13, DSP+15, DSP+18, DSP+20, RET+3 , RET+5, RET+8, RET+10, RET+13, RET+15, RET+18, RET+20, NET+2, NET+5, NET+8 , NET+11, TCOST+7, TCOST+12, TCOST+15, TCOST+17, TCOST+18, AVE+2, AVE+4, AVE+5, AVE+13 , AVE+15, AVE+16, AVE+23, AVE+26, AVE+28, AVE+29, AVE+36, AVE+39, AVE+41, AVE+42 , AVE+49, TRUNC+4, TRUNC+5, TRUNC+6, TRUNC+7, TRUNC+8, TRUNC+10, TOTAL+6, TOTAL+7, TOTAL+8 , TOTAL+9, TOTAL+20, TOTAL+30, TOTAL+31, TOTAL+32, TOTAL+33, TOTAL+43, TOTAL+53, TOTAL+54, TOTAL+55 , TOTAL+56, TOTAL+66, TOTAL+72, TOTAL+79, TOTAL+80, TOTAL+81, TOTAL+82, TOTAL+92, TOTAL+98 |