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* |