PSOCIDC2 ;BIR/LE-continuation of Copay Correction of erroneous billed copays ;11/8/05 12:50pm
Source file <PSOCIDC2.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 3 | CHK^PSOCIDC3 CHKIB^PSOCP1 (ACTLOG,RXED)^PSOCPA |
Kernel | 1 | $$NOW^XLFDT |
VA Fileman | 1 | NOW^%DTC |
Name | Comments | DBIA/ICR reference |
---|---|---|
SETIBQ | ; get data from IBQ node, set IBQ node, and 1st piece of IB node
|
|
CHKACT | ;check activity log for prev entry
|
|
SITE | ; SET UP VARIABLES NEEDED BY BILLING
|
|
CAN | ||
CANCEL | ;Cancel erroneous copays/set IBQ node if not there
|
|
TOTAL | ;
|
|
ACCUM | ; ACCUMULATE TOTALS
|
|
CHECK | ;check for ICD and IB nodes
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | ACCUM+10, ACCUM+37 |
^IBAM(354.7 | ACCUM+25, ACCUM+26 |
^PS(59 - [#59] | SITE+3, SITE+4, SITE+5 |
^PSRX - [#52] | CHECK+4, CHECK+7, CHECK+8, CHECK+10, CHECK+11, CHECK+14, CHECK+18, CANCEL+11, CANCEL+16, CANCEL+17 , CANCEL+22, CANCEL+24, CANCEL+26*, CANCEL+37, CANCEL+43, CANCEL+45, CANCEL+47*, CANCEL+49*, CHKACT+2, SETIBQ+12* , SITE+1 |
^XTMP( | TOTAL+5, TOTAL+7, TOTAL+13, TOTAL+15, TOTAL+21, TOTAL+23, CHECK+15*, CHECK+16*, CHECK+20*, CANCEL+6 , CANCEL+7, CANCEL+8*, CANCEL+10, CANCEL+12, CANCEL+19, CANCEL+32, CANCEL+33, CANCEL+34*, CANCEL+36, CANCEL+38 , CANCEL+41, CANCEL+50, ACCUM+7, ACCUM+8*, ACCUM+9*, ACCUM+12*, ACCUM+21, ACCUM+32*, ACCUM+33*, ACCUM+39* , CAN, CAN+1*, CAN+2* |
Name | Line Occurrences |
---|---|
ACCUM | CANCEL+28, CANCEL+50 |
CHKACT | CANCEL+21 |
SETIBQ | CANCEL+25, CANCEL+44 |
SITE | CANCEL+26, CANCEL+40 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | CANCEL+20, CANCEL+47 |
CANCEL | CANCEL+4~, CAN* |
CC | CANCEL+4~, CANCEL+6*, CANCEL+7, CANCEL+32*, CANCEL+33 |
CCOUNT | TOTAL+1~, TOTAL+15* |
CCOUNTED | TOTAL+1~, TOTAL+14*, TOTAL+15* |
COM | CANCEL+4~, CANCEL+46*, CANCEL+47 |
COUNT | TOTAL+1~, TOTAL+7* |
COUNTED | TOTAL+1~, TOTAL+6*, TOTAL+7* |
DA | CANCEL+48! |
I | TOTAL+3~, TOTAL+4*, TOTAL+7*, TOTAL+8*, TOTAL+10*, TOTAL+12*, TOTAL+15*, TOTAL+16*, TOTAL+18*, TOTAL+20* , TOTAL+23*, TOTAL+24*, CANCEL+4~, CANCEL+45* |
IFN | CANCEL+4~, CANCEL+45*, CANCEL+47* |
J | TOTAL+3~, TOTAL+7*, TOTAL+10*, TOTAL+15*, TOTAL+18*, TOTAL+23* |
>> NAMSP | TOTAL+5, TOTAL+7, TOTAL+13, TOTAL+15, TOTAL+21, TOTAL+23, CHECK+15, CHECK+16, CHECK+20, CANCEL+6 , CANCEL+7, CANCEL+8, CANCEL+10, CANCEL+12, CANCEL+19, CANCEL+32, CANCEL+33, CANCEL+34, CANCEL+36, CANCEL+38 , CANCEL+41, CANCEL+50, ACCUM+7, ACCUM+8, ACCUM+9, ACCUM+12, ACCUM+21, ACCUM+32, ACCUM+33, ACCUM+39 , CAN, CAN+1, CAN+2 |
PREA | CANCEL+4~, CANCEL+20*, CHKACT+3*, CHKACT+4* |
PSO | CANCEL+4~, CANCEL+20* |
PSOANSQ | CANCEL+4~, SETIBQ+1! |
PSOANSQ("CV" | SETIBQ+10*, SETIBQ+12 |
PSOANSQ("HNC" | SETIBQ+9*, SETIBQ+12 |
PSOANSQ("MST" | SETIBQ+8*, SETIBQ+12 |
PSOANSQ("PGW" | SETIBQ+7*, SETIBQ+12 |
PSOANSQ("RAD" | SETIBQ+5*, SETIBQ+12 |
PSOANSQ("SC" | SETIBQ+6*, SETIBQ+12 |
PSOANSQ("SHAD" | SETIBQ+11*, SETIBQ+12 |
PSOANSQ("VEH" | SETIBQ+4*, SETIBQ+12 |
PSOBILLD | CHECK+2~, CHECK+12*, CHECK+14, CHECK+18, CANCEL+15*, CANCEL+16*, CANCEL+17*, CANCEL+18 |
PSOCAP | CANCEL+2~ |
PSOCAP(304 | CANCEL+9*, CANCEL+35* |
PSOCAP(305 | CANCEL+9*, CANCEL+35* |
PSOCAP(306 | CANCEL+9*, CANCEL+35* |
>> PSOCCNT | TOTAL+16* |
>> PSOCCNT( | TOTAL+15* |
>> PSOCCNT("YR2004" | TOTAL+12*, TOTAL+16 |
>> PSOCCNT("YR2005" | TOTAL+12*, TOTAL+16 |
>> PSOCCNT("YR2006" | TOTAL+12*, TOTAL+16 |
>> PSOCHRG | ACCUM+1*, ACCUM+5*, ACCUM+6*, ACCUM+8, ACCUM+17*, ACCUM+18*, ACCUM+32, CAN+1 |
>> PSOCNT | TOTAL+8* |
>> PSOCNT( | TOTAL+7* |
>> PSOCNT("YR2004" | TOTAL+4*, TOTAL+8 |
>> PSOCNT("YR2005" | TOTAL+4*, TOTAL+8 |
>> PSOCNT("YR2006" | TOTAL+4*, TOTAL+8 |
>> PSOCOMM | CANCEL+20*, CANCEL+26* |
PSOCPUN | CANCEL+4~, CANCEL+11*, CANCEL+27*, CANCEL+37*, CANCEL+51*, ACCUM+8, ACCUM+9, ACCUM+32, ACCUM+33, CAN+1 , CAN+2 |
>> PSOCVETS | TOTAL+11*, TOTAL+15* |
>> PSODA | CANCEL+20*, CANCEL+22, CHKACT+2 |
>> PSODFN | TOTAL+5*, TOTAL+7, TOTAL+13*, TOTAL+15, CHECK+15, CHECK+16, CHECK+20, CANCEL+6*, CANCEL+10, CANCEL+12 , CANCEL+19, CANCEL+32*, CANCEL+36, CANCEL+38, CANCEL+41, CANCEL+50, ACCUM+7, ACCUM+8, ACCUM+9, ACCUM+10 , ACCUM+12, ACCUM+21, ACCUM+25, ACCUM+26, ACCUM+32, ACCUM+33, ACCUM+37, ACCUM+39, CAN, CAN+1 , CAN+2 |
PSODIV | CANCEL+2~ |
>> PSODT | CHECK+15, CHECK+16, CHECK+20, CANCEL+20* |
PSODV | CANCEL+2~ |
PSOFILL | CANCEL+2~, CAN~* |
PSOFLD | CANCEL+4~, CANCEL+19*, CANCEL+41*, ACCUM+3, ACCUM+12 |
PSOIB | CHECK+2~, CHECK+12, CANCEL+3~, CANCEL+16, CANCEL+17, CANCEL+22* |
PSOLOG | CANCEL+2~, ACCUM+1*, ACCUM+26*, ACCUM+27 |
PSONAM | CANCEL+2~, ACCUM+1*, ACCUM+10*, ACCUM+11*, ACCUM+12, ACCUM+37*, ACCUM+38*, ACCUM+39 |
PSONIBQ | CANCEL+3~, SETIBQ+2~ |
PSONW | CANCEL+4~, CANCEL+20*, CHKACT+3*, CHKACT+4* |
PSOOIB | CANCEL+3~, CANCEL+23*, CANCEL+24*, CANCEL+42*, CANCEL+43* |
PSOOIBQ | CANCEL+3~, CANCEL+23*, CANCEL+24*, CANCEL+25, CANCEL+42*, CANCEL+43*, CANCEL+44 |
PSOOICD | CHECK+2~, CHECK+4*, CHECK+15, CHECK+16, CHECK+19, CANCEL+3~, CANCEL+23*, CANCEL+24*, CANCEL+25, CANCEL+26 , CANCEL+42*, CANCEL+43*, CANCEL+44, CANCEL+49, SETIBQ+4, SETIBQ+5, SETIBQ+6, SETIBQ+7, SETIBQ+8, SETIBQ+9 , SETIBQ+10, SETIBQ+11 |
PSOOLD | CANCEL+4~, CANCEL+20*, CHKACT+3*, CHKACT+4* |
PSOOUT | CANCEL+2~ |
PSOPAR | CANCEL+2~, SITE+3* |
PSOPAR7 | CANCEL+2~, SITE+4* |
PSOREF | CHECK+2~, CHECK+3*, CHECK+6, CHECK+9, CHECK+10, CANCEL+13*, CANCEL+17, CANCEL+22, CANCEL+27*, CANCEL+39* , CANCEL+51*, CHKACT+4!*, ACCUM+12, ACCUM+39 |
PSOREL | CHECK+8*, CHECK+11*, CHECK+15, CHECK+16, CHECK+20, CANCEL+4~, CANCEL+19*, CANCEL+41*, ACCUM+3, ACCUM+14 , ACCUM+39 |
>> PSOSCP | CHECK+15, CHECK+16, CHECK+20, CANCEL+19*, CANCEL+41* |
PSOSITE | CANCEL+2~, SITE+1*, SITE+2, SITE+3, SITE+4, SITE+5 |
PSOSITE7 | CANCEL+3~, SITE+5* |
PSOSQ | CANCEL+3~, ACCUM+25*, ACCUM+26 |
PSOTOT | CANCEL+3~, ACCUM+1*, ACCUM+7*, ACCUM+8, ACCUM+21*, ACCUM+24, ACCUM+27*, ACCUM+32, CAN+1 |
>> PSOTRF | CHECK+21* |
PSOTYP | CANCEL+4~, CANCEL+31*, SETIBQ+3*, SETIBQ+4, SETIBQ+5, SETIBQ+6, SETIBQ+7, SETIBQ+8, SETIBQ+9, SETIBQ+10 , SETIBQ+11 |
PSOTYPE | CANCEL+4~, CANCEL+5*, CAN |
>> PSOUCNT | TOTAL+24* |
>> PSOUCNT( | TOTAL+23* |
>> PSOUCNT("YR2004" | TOTAL+20*, TOTAL+24 |
>> PSOUCNT("YR2005" | TOTAL+20*, TOTAL+24 |
>> PSOUCNT("YR2006" | TOTAL+20*, TOTAL+24 |
>> PSOUDFN | TOTAL+21*, TOTAL+23 |
>> PSOUVETS | TOTAL+19*, TOTAL+23* |
>> PSOVETS | TOTAL+2*, TOTAL+7* |
PSOYEAR | CANCEL+3~, ACCUM+1*, ACCUM+3*, ACCUM+4*, ACCUM+6, ACCUM+7, ACCUM+8, ACCUM+9, ACCUM+15*, ACCUM+16 , ACCUM+18, ACCUM+21, ACCUM+32, ACCUM+33, CAN+1, CAN+2 |
PSOYR | CANCEL+3~, ACCUM+1*, ACCUM+3*, ACCUM+4, ACCUM+14*, ACCUM+15, ACCUM+27 |
>> RXP | CHECK+4, CHECK+7, CHECK+8, CHECK+10, CHECK+11, CHECK+14, CHECK+15, CHECK+16, CHECK+18, CHECK+20 , CANCEL+10*, CANCEL+11, CANCEL+12, CANCEL+16, CANCEL+17, CANCEL+19, CANCEL+20, CANCEL+22, CANCEL+24, CANCEL+26 , CANCEL+36*, CANCEL+37, CANCEL+38, CANCEL+41, CANCEL+43, CANCEL+45, CANCEL+47, CANCEL+49, CANCEL+50, SETIBQ+12 , ACCUM+12, ACCUM+39, CAN, SITE+1 |
SAVCPUN | CANCEL+3~, CANCEL+11*, CANCEL+27, CANCEL+37*, CANCEL+51 |
SAVREF | CANCEL+3~, CANCEL+13*, CANCEL+27, CANCEL+39*, CANCEL+51 |
SSN | CANCEL+3~ |
>> STOP | CANCEL+6, CANCEL+8*, CANCEL+32, CANCEL+34* |
UCOUNT | TOTAL+1~, TOTAL+23* |
UCOUNTED | TOTAL+1~, TOTAL+22*, TOTAL+23* |
>> YY | CHECK+3, CHECK+11, CHECK+15, CHECK+16, CHECK+20, CHECK+21, CANCEL+12*, CANCEL+13, CANCEL+16, CANCEL+17 , CANCEL+19, CANCEL+22, CANCEL+38*, CANCEL+39, CANCEL+41, CANCEL+47, CANCEL+50, CHKACT+4, CAN, SITE+1 |
ZACT | CHKACT+1~, CHKACT+2, CHKACT+3*, CHKACT+4 |
ZACTI | CHKACT+1~, CHKACT+2*, CHKACT+3 |
ZPSI | CHKACT+1~, CHKACT+2* |