Call Graph
Call Graph Total: 5
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^DIE ($$GET1,GETS)^DIQ |
| Accounts Receivable | 1 | ($$DMCELIG,UPDTDMC)^RCDMCUT1 |
| Outpatient Pharmacy | 1 | $$GET1^PSODI |
| Registration | 1 | (DEM,ELIG,IN5,KVAR,MB)^VADPT |
RCDMCUT1 ;HEC/SBW - Utility Functions for Hold Debt to DMC Project ;30/AUG/2007
Source file <RCDMCUT1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^DIE ($$GET1,GETS)^DIQ |
| Accounts Receivable | 1 | ($$DMCELIG,UPDTDMC)^RCDMCUT1 |
| Outpatient Pharmacy | 1 | $$GET1^PSODI |
| Registration | 1 | (DEM,ELIG,IN5,KVAR,MB)^VADPT |
| 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 |
|---|---|---|
| HOLDCHK(IEN,DFN) | ;Check if receivable shouldn't be sent to DMC
|
|
| DMCELIG(DFN) | ;Checks Bill Debtor SC% and Receipt of VA Pension Values
|
|
| UPDTDMC(IEN,VAL,DELBY) | ;Update the DMC Debt Valid Field
|
|
| GETDEM(DFN) | ; Get data from Patient (#2) file
|
|
| FIRSTPAR(IEN430) | ;Check if this is a First Party bill
|
|
| GETSERDT(BILLNUM) | ; Get most recent Outpatient Date, Inpatient Date and RX Date
; from the IB Action (#350) file for the corresponding bill |
| Name | Field # of Occurrence |
|---|---|
| ^DIE | UPDTDMC+20 |
| $$GET1^DIQ | HOLDCHK+23, GETSERDT+19, GETSERDT+31, GETSERDT+37, GETSERDT+42 |
| GETS^DIQ | GETSERDT+14, GETSERDT+26 |
| $$GET1^PSODI | GETSERDT+67, GETSERDT+73, GETSERDT+74, GETSERDT+75 |
| $$DMCELIG^RCDMCUT1 | HOLDCHK+29 |
| UPDTDMC^RCDMCUT1 | HOLDCHK+35 |
| DEM^VADPT | GETDEM+15 |
| ELIG^VADPT | DMCELIG+23 |
| IN5^VADPT | GETSERDT+53 |
| KVAR^VADPT | DMCELIG+37, GETSERDT+58 |
| MB^VADPT | DMCELIG+27 |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | GET1^DIQ, GETS^DIQ |
| ^IBE(350.1 - [#350.1] | GET1^DIQ |
| ^SCE - [#409.68] | GET1^DIQ |
| ^PRCA(430 - [#430] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB("ABIL" | GETSERDT+11 |
| ^PRCA(430 - [#430] | UPDTDMC+13, UPDTDMC+21, FIRSTPAR+12 |
| ^RCD(340 - [#340] | FIRSTPAR+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTTYPE | GETSERDT+12~, GETSERDT+16*, GETSERDT+28*, GETSERDT+37 |
| BILGROUP | GETSERDT+12~, GETSERDT+37*, GETSERDT+40 |
| BILLNUM | GETSERDT~, GETSERDT+10, GETSERDT+11 |
| DA | UPDTDMC+10~, UPDTDMC+16* |
| DELBY | UPDTDMC~, UPDTDMC+19 |
| DFN | HOLDCHK~, HOLDCHK+21, HOLDCHK+29, DMCELIG~, DMCELIG+21, GETDEM~, GETDEM+13, GETSERDT+12~, GETSERDT+15*, GETSERDT+27* , GETSERDT+32 |
| DIE | UPDTDMC+10~, UPDTDMC+17* |
| DISCHARG | GETSERDT+12~, GETSERDT+55*, GETSERDT+57 |
| DMCELIG | HOLDCHK+18~, HOLDCHK+29*, HOLDCHK+32, HOLDCHK+38 |
| DMCVALID | HOLDCHK+18~, HOLDCHK+23*, HOLDCHK+25, HOLDCHK+27, HOLDCHK+32, HOLDCHK+38 |
| DR | UPDTDMC+10~, UPDTDMC+18*, UPDTDMC+19* |
| DTBILLFR | GETSERDT+12~, GETSERDT+18*, GETSERDT+30*, GETSERDT+43 |
| FIRST | FIRSTPAR+7~, FIRSTPAR+9*, FIRSTPAR+16*, FIRSTPAR+17 |
| FLD | FIRSTPAR+7~, FIRSTPAR+15*, FIRSTPAR+16, GETSERDT+62~ |
| IBDATA | GETSERDT+12~ |
| IBDATA(350 | GETSERDT+15, GETSERDT+16, GETSERDT+17, GETSERDT+18, GETSERDT+27, GETSERDT+28, GETSERDT+29, GETSERDT+30 |
| IEN | HOLDCHK~, HOLDCHK+21, HOLDCHK+23, HOLDCHK+35, UPDTDMC~, UPDTDMC+11, UPDTDMC+13, UPDTDMC+16, UPDTDMC+21, GETSERDT+7~ , GETSERDT+8*, GETSERDT+11*, GETSERDT+13, GETSERDT+25 |
| IEN340 | FIRSTPAR+7~, FIRSTPAR+12*, FIRSTPAR+15 |
| IEN430 | FIRSTPAR~, FIRSTPAR+10*, FIRSTPAR+12 |
| IENS | GETSERDT+12~, GETSERDT+13*, GETSERDT+14, GETSERDT+15, GETSERDT+16, GETSERDT+17, GETSERDT+18, GETSERDT+19, GETSERDT+23*, GETSERDT+25 , GETSERDT+26, GETSERDT+27, GETSERDT+28, GETSERDT+29, GETSERDT+30, GETSERDT+31, GETSERDT+62~, GETSERDT+66*, GETSERDT+67, GETSERDT+72* , GETSERDT+73, GETSERDT+74, GETSERDT+75 |
| OPDT | GETSERDT+12~, GETSERDT+41*, GETSERDT+42*, GETSERDT+43*, GETSERDT+44 |
| OUT | HOLDCHK+18~, HOLDCHK+19*, HOLDCHK+21, HOLDCHK+25*, HOLDCHK+27*, HOLDCHK+33*, HOLDCHK+38*, HOLDCHK+39, DMCELIG+15~, DMCELIG+19* , DMCELIG+21, DMCELIG+25, DMCELIG+29*, DMCELIG+31*, DMCELIG+32, DMCELIG+34*, DMCELIG+36*, DMCELIG+38, GETDEM+10~, GETDEM+11* , GETDEM+13, GETDEM+17, GETDEM+19*, GETDEM+20, GETSERDT+7~, GETSERDT+8*, GETSERDT+10, GETSERDT+44*, GETSERDT+57*, GETSERDT+77* , GETSERDT+78 |
| PSOFILE | GETSERDT+62~, GETSERDT+65*, GETSERDT+67, GETSERDT+71*, GETSERDT+73, GETSERDT+74, GETSERDT+75 |
| RESULT | GETSERDT+12~, GETSERDT+17*, GETSERDT+22, GETSERDT+23, GETSERDT+29*, GETSERDT+40, GETSERDT+41, GETSERDT+42, GETSERDT+47, GETSERDT+50 , GETSERDT+51, GETSERDT+61, GETSERDT+64, GETSERDT+66, GETSERDT+70, GETSERDT+72 |
| RXDT | GETSERDT+12~, GETSERDT+67*, GETSERDT+73*, GETSERDT+77 |
| RXNAM | GETSERDT+12~, GETSERDT+68*, GETSERDT+75*, GETSERDT+77 |
| RXNUM | GETSERDT+12~, GETSERDT+68*, GETSERDT+74*, GETSERDT+77 |
| STATUS | GETSERDT+12~, GETSERDT+19*, GETSERDT+31*, GETSERDT+44, GETSERDT+57, GETSERDT+77 |
| U | DMCELIG+29, DMCELIG+31, DMCELIG+34, DMCELIG+36, UPDTDMC+12, FIRSTPAR+12, FIRSTPAR+15, FIRSTPAR+16, GETSERDT+44, GETSERDT+55 , GETSERDT+57, GETSERDT+77 |
| VA | DMCELIG+18~ |
| VADM | DMCELIG+17~ |
| VADMVT | DMCELIG+18~ |
| VAEL | DMCELIG+17~ |
| VAEL(3 | DMCELIG+29 |
| VAERR | DMCELIG+17~, DMCELIG+25, GETDEM+17, GETSERDT+54 |
| VAHOW | DMCELIG+17~ |
| VAIN | DMCELIG+17~ |
| VAINDT | DMCELIG+17~ |
| VAIP | DMCELIG+18~ |
| VAIP("E" | GETSERDT+51* |
| VAIP(17 | GETSERDT+55 |
| VAL | UPDTDMC~, UPDTDMC+12, UPDTDMC+18 |
| VAMB | DMCELIG+17~ |
| VAMB(1 | DMCELIG+34 |
| VAMB(2 | DMCELIG+36 |
| VAMB(4 | DMCELIG+31 |
| VAOA | DMCELIG+17~ |
| VAPA | DMCELIG+17~ |
| VAPD | DMCELIG+18~ |
| VAROOT | DMCELIG+17~ |
| VARP | DMCELIG+18~ |
| VASD | DMCELIG+18~ |
| VASV | DMCELIG+17~ |
| VATEST | DMCELIG+17~ |
| X | UPDTDMC+10~ |
| Y | UPDTDMC+10~, GETDEM+10~ |
