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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBJDF51

Package: Integrated Billing

Routine: IBJDF51


Information

IBJDF51 ;ALB/RB - CHAMPVA/TRICARE FOLLOW-UP REPORT (COMPILE) ;15-APR-00

Source Information

Source file <IBJDF51.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Integrated Billing 7 $$CHK^IBCNS1  ($$CLMACT,$$DT)^IBJD  $$VA^IBJD1  $$ACT^IBJDF2  EN^IBJDF52  (EN,INIT)^IBJDF53  $$STOP^IBOUTL  
Kernel 2 ^%ZISC  $$FMDIFF^XLFDT  
Registration 2 (DEM,KVA)^VADPT  $$PRIM^VASITE  
VA FileMan 2 $$GET1^DIQ  EN^DIQ1  

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: 2

Package Total Caller Graph
Integrated Billing 2 IBJDF5  IBJDF61  

Entry Points

Name Comments DBIA/ICR reference
ST ; - Tasked entry point.
ENQ
ENQ1
PAT(IBDA) ; - Find the claim patient and decide to include the claim.
; Input: IBDA=Pointer to the claim/AR in file #399/#430 plus all
; variable input in IBS*
; Output: Y=Sort key (name or last 4)_@@_patient IEN to file #2
; ^ Patient name ^ Age ^ SSN ^ Patient IEN to file #2
PATC ; - Find all patient data.
PATQ
DIV(CLM) ;Find the default division of the bill.
QDIV
SID(DFN,INS) ; - Find the subscriber ID for a bill (if any).
; Input: DFN=Pointer to the patient in file #2
; INS=Pointer to the patient's primary carrier in file #36
; Output: Subscriber ID no. or null
SIDQ
PHDL ; - Print the header line for the Excel spreadsheet
OTH(DFN,INS,DS) ; - Find a patient's other valid insurance carrier (if any).
; Input: DFN=Pointer to the patient in file #2
; INS=Pointer to the patient's primary carrier in file #36
; DS=Date of service for validity check
; Output: Valid insurance carrier (first 15 chars.) or null
OTHQ
COM ; - Get bill comments.

External References

Name Field # of Occurrence
^%ZISC ENQ+3
$$GET1^DIQ SID+7
EN^DIQ1 PAT+23, PAT+25
$$CHK^IBCNS1 OTH+9
$$CLMACT^IBJD ST+44, ST+74
$$DT^IBJD ST+88, ST+89, COM+7
$$VA^IBJD1 ST+79
$$ACT^IBJDF2 ST+67
EN^IBJDF52 ST+103
EN^IBJDF53 ST+57
INIT^IBJDF53 ST+18, ST+19
$$STOP^IBOUTL ST+27
DEM^VADPT PAT+14, PAT+21
KVA^VADPT ENQ1+2
$$PRIM^VASITE ST+84, QDIV
$$FMDIFF^XLFDT ST+67, ST+93, COM+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,IBEXCEL1
  • Line Location: ST+94
Function Call: WRITE
  • Prompt: !,X
  • Line Location: PHDL+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.312 GET1^DIQ
^RCD(340 - [#340] Classic Fileman Calls
^PRCA(430 - [#430] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] ST+84
^DGCR(399 - [#399] ST+29, ST+50, ST+61, ST+62, ST+75, PAT+12, PAT+13, PAT+17, DIV+1
^DIC(36 - [#36] ST+63, OTH+8
^DPT - [#2] SID+5, OTH+6
^IB - [#350] ST+46, ST+75
^IBA(362.4 - [#362.4] ST+51
^IBE(350.1 - [#350.1] ST+47
^PRCA(430 - [#430] ST+25, ST+28, ST+70, PAT+9
^PRCA(430.2 - [#430.2] ST+90
^PRCA(433 - [#433] COM+2, COM+3, COM+11, COM+12, COM+17
^RCD(340 - [#340] PAT+19
^TMP("IBJDF5" ST+1!, ST+98, ST+99*, ST+100*, ENQ!, COM+20*

Label References

Name Line Occurrences
$$DIV ST+38
$$OTH ST+79
$$PAT ST+55
$$SID ST+78
COM ST+92, ST+101
ENQ1 ENQ+1
OTHQ OTH+5
PATC PAT+33
PATQ PAT+8, PAT+12, PAT+17, PAT+31, PAT+32, PAT+34
PHDL ST+22
SIDQ SID+4

Naked Globals

Name Field # of Occurrence
^( SID+5, OTH+6, COM+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AGE PAT+5~, PAT+9*, PAT+14*, PAT+21*, PATC+1
ALL PAT+5~, PAT+30*, PAT+32
ARZ PAT+5~, PAT+9*, PAT+18
CLM DIV~, DIV+1
COM ENQ1+2!, COM+10!
COM( COM+17*, COM+19, COM+20
COM(0 COM+10*
COM(1 COM+13*, COM+14*
COM1 ENQ1+2!, COM+10!
COM1(1 COM+11*, COM+13
COM1(2 COM+12*, COM+13
DA PAT+5~, PAT+23*, PAT+24, PAT+25*, PAT+26
DAT ST+93, ENQ1+2!, COM+1*, COM+2, COM+6*, COM+7, COM+10
DBTR PAT+5~, PAT+18*, PAT+19, PAT+25
>> DEB(340 PAT+26
>> DEB(430 PAT+24
DFN ST+78*, ST+79, ENQ1+2!, PAT+5~, PAT+9*, PAT+12, PAT+13*, PAT+17, PAT+19*, PAT+31
, PAT+32, PATC+1, SID~, SID+4, SID+5, SID+7, OTH~, OTH+5, OTH+6
DIC PAT+5~, PAT+23*, PAT+25*
DIQ PAT+5~, PAT+23*, PAT+25*
>> DIV DIV+1*, QDIV*, QDIV+1
DOB PAT+5~
DR PAT+5~, PAT+23*, PAT+25*
DS OTH~, OTH+5, OTH+9
DT ST+67, ST+93, COM+4
END PAT+5~, PAT+30*, PAT+33, PAT+34
IB ST+1!, ENQ1!
IBA ST+25*, ST+26, ST+28, ST+29, ST+38, ST+44, ST+50, ST+51, ST+55, ST+61
, ST+62, ST+67, ST+70, ST+74, ST+75, ENQ1!, COM+2
IBA1 ENQ1!, COM+1*, COM+2*, COM+3, COM+11, COM+12, COM+17, COM+20
IBAC ST+44*, ST+45, ST+46, ST+49, ST+75, ST+76, ST+77, ENQ1+1!
IBAR ST+28*, ST+30, ST+74, ST+80, ENQ1!
IBARD ST+66, ST+67*, ENQ1!
IBBA ST+70*, ST+71, ST+90, ST+100, ENQ1+1!
IBBN ST+80*, ST+89, ST+100, ENQ1+1!, COM+20
IBBU ST+75*, ST+76, ST+77, ENQ1!
IBC ENQ1!, COM+3*, COM+4, COM+5, COM+6
IBCAT ST+15*, ST+17, ST+30*, ST+31, ST+44, ST+74, ST+90, ST+98, ST+99, ST+100
, ENQ1!, COM+20
IBCAT( ST+9*, ST+15, ST+30, ST+31
IBCAT(19 ST+5*
IBCAT(28 ST+12*
IBCAT(29 ST+11*
IBCAT(30 ST+8*
IBCAT(31 ST+4*
IBCAT(32 ST+10*
IBCAT1 ST+31*, ST+34, ST+36, ENQ1!
IBD ST+93*, ST+94!, ENQ1!
IBDA PAT~, PAT+8, PAT+9, PAT+12, PAT+13, PAT+17, PAT+23
IBDIV ST+16*, ST+18*, ST+34*, ST+37*, ST+38*, ST+40, ST+84*, ST+94, ST+98, ST+99
, ST+100, ENQ1!, COM+20
IBDP ST+74*, ST+88, ST+93, ST+96, ST+100, ENQ1+1!
>> IBEXCEL ST+22, ST+57, ST+83, ST+103, COM+7
IBEXCEL1 ST+86*, ST+87*, ST+88*, ST+89*, ST+90*, ST+91*, ST+93, ST+94*!, COM+7*
IBFR ST+76*, ST+79, ST+88, ST+96, ST+100, ENQ1+1!
IBI ST+9*, ST+60*, ST+61, ST+62*, ST+63, ST+78, ST+79, ENQ1!, ENQ1+1!
IBIN ST+60*, ST+62*, ST+63*, ST+87, ST+98, ST+99, ST+100, ENQ1+1!, COM+20
IBKEY ST+96*, ST+98, ST+99, ST+100, ENQ1+1!, COM+20
IBOI ST+79*, ST+87, ST+99, ENQ1+1!
IBOR ST+80*, ST+89, ST+100, ENQ1+1!
IBPT ST+55*, ST+78, ST+86, ST+96, ST+99, ENQ1!
IBQ ST+1*, ST+25, ST+26, ST+27*, ST+103, ENQ1!
>> IBRPT ST+55, ST+57
>> IBSAM ST+71
>> IBSD ST+17, ST+37, ST+40
>> IBSEL ST+4, ST+5, ST+7, ST+10, ST+11, ST+12
>> IBSEL1 ST+53, ST+97
>> IBSH ST+92, ST+101
>> IBSH1 COM+1, COM+2, COM+7
>> IBSH2 COM+4
IBSID ST+78*, ST+89, ST+100, ENQ1+1!
>> IBSMN ST+66
>> IBSMX ST+66
>> IBSN PAT+29
>> IBSNA PAT+30
>> IBSNF PAT+30
>> IBSNL PAT+30
IBTO ST+77*, ST+89, ST+96, ST+100, ENQ1+1!
IBTYP ST+48*, ST+50*, ST+51*, ST+53, ST+91, ST+97, ENQ1+1!
IBVA ST+79*, ST+86, ST+99, ENQ1+1!
IBZ PAT+5~, PAT+13*
INI PAT+5~, PAT+30*, PAT+31, PAT+33, PAT+34
INS SID~, SID+4, SID+7, OTH~, OTH+5, OTH+7
J ENQ1+2!
KEY PAT+5~, PAT+24*, PAT+29*, PAT+34, PATC+1
NAME PAT+5~, PAT+9*, PAT+14*, PAT+21*, PAT+24*, PAT+29, PATC+1
RCZ PAT+5~, PAT+19*, PAT+20, PAT+22
SSN PAT+5~, PAT+9*, PAT+14*, PAT+21*, PAT+26*, PAT+27*, PAT+29, PATC+1
U ST+29, ST+30, ST+46, ST+47, ST+50, ST+63, ST+70, ST+74, ST+75, ST+76
, ST+77, ST+78, ST+80, ST+84, ST+86, ST+87, ST+88, ST+89, ST+90, ST+91
, ST+93, ST+94, ST+96, ST+99, ST+100, PATC+1, OTH+9, COM+5, COM+6, COM+11
, COM+12
VADM PAT+6~
VADM(1 PAT+14, PAT+21
VADM(2 PAT+14, PAT+21
VADM(4 PAT+14, PAT+21
>> VAUTD ST+40
>> VAUTD( ST+18, ST+40
X ST+46*, ST+47*, ST+48, ST+70*, ST+74*, ST+97*, ST+98, ST+99, ST+100, ENQ1+2!
, SID+4~, SID+5*, SID+7, PHDL+1~, PHDL+2*, PHDL+3*, PHDL+4*, PHDL+5*, PHDL+6, OTH+5~
, OTH+6*, OTH+7, OTH+8, OTH+9, COM+20
X1 ENQ1+2!, OTH+5~, OTH+8*, OTH+9, COM+10*, COM+14*, COM+17, COM+19*, COM+20
X2 ENQ1+2!, COM+17*
Y ENQ1+2!, PAT+6~, PAT+8*, PAT+12*, PAT+17*, PAT+31*, PAT+32*, PAT+34*, PATC+1*, PATQ
, SID+4~*, SID+5, SID+7*, SIDQ, OTH+5~*, OTH+6, OTH+9*, OTHQ
Z ENQ1+2!, PAT+6~, SID+4~, SID+5*, SID+7, OTH+5~, OTH+6*
>> ZTQUEUED ENQ+1
>> ZTREQ ENQ+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All