Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: RCDMCUT1

Package: Accounts Receivable

Routine: RCDMCUT1


Information

RCDMCUT1 ;HEC/SBW - Utility Functions for Hold Debt to DMC Project ;30/AUG/2007

Source Information

Source file <RCDMCUT1.m>

Call Graph

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Accounts Receivable 10 RCDMC90  RCDMCEDT  RCDMCR1B  RCDMCR2B  RCDMCR3B  RCDMCR4B  RCDMCR5B  RCDMCR6B  
RCDMCR7B  RCDMCUT1  

Entry Points

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

External References

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB("ABIL" GETSERDT+11
^PRCA(430 - [#430] UPDTDMC+13, UPDTDMC+21, FIRSTPAR+12
^RCD(340 - [#340] FIRSTPAR+15

Local Variables

Legend:

>> 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~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All