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 |  Local Variables  | All
Print Page as PDF
Routine: IBACCWLAIBILL1

Package: Integrated Billing

Routine: IBACCWLAIBILL1


Information

IBACCWLAIBILL1 ;EDE/TPF - ACC (Automated Community Care) Claims - Action Items related to actions on a Bill (cont.); 12-SEP-2023

Source Information

Source file <IBACCWLAIBILL1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 5 PULLLIST^IBACCWL1  ($$CHKSTATUS,UPDSTATUS)^IBACCWLUTIL  ($$STATUS,$$TRANSMITTED,EEPUBLISH)^IBACCWLUTIL1  ^IBCB1  VIEW1^IBCB2  
Kernel 2 ENS^%ZISS  $$FMTE^XLFDT  
List Manager 2 (FULL,PAUSE)^VALM1  EN^VALM2  
VA FileMan 2 $$GET1^DIQ  ^DIR  

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

Package Total Caller Graph
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EDIT ;EP - EDIT BILL.
SEL(IBDA,OPTION) ;EP -

External References

Name Field # of Occurrence
ENS^%ZISS EDIT+75, EDIT+88, EDIT+94
$$GET1^DIQ EDIT+48, EDIT+49, EDIT+101
^DIR EDIT+66, EDIT+70
PULLLIST^IBACCWL1 EDIT+106
$$CHKSTATUS^IBACCWLUTIL EDIT+55
UPDSTATUS^IBACCWLUTIL EDIT+100
$$STATUS^IBACCWLUTIL1 EDIT+30
$$TRANSMITTED^IBACCWLUTIL1 EDIT+90
EEPUBLISH^IBACCWLUTIL1 EDIT+103
^IBCB1 EDIT+83
VIEW1^IBCB2 EDIT+72
FULL^VALM1 EDIT+60, SEL+2
PAUSE^VALM1 EDIT+28, EDIT+35, EDIT+44, EDIT+51, EDIT+75, EDIT+93, EDIT+99
EN^VALM2 SEL+3
$$FMTE^XLFDT EDIT+101

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"VistA claim ",$$GET1^DIQ(399,IBIFN_",",.01)," with status of ",$$GET1^DIQ(399,IBIFN_",",.13)," can no longer be edited."
  • Line Location: EDIT+49
Function Call: WRITE
  • Prompt: !,"CURRENT STATUS OF ENCOUNTER: ",$$CHKSTATUS^IBACCWLUTIL(IBENCIFN)
  • Line Location: EDIT+55
Function Call: WRITE
  • Prompt: !!,"BILL TRANSMITTED!!"
  • Line Location: EDIT+97
Routine Call
  • DIR
  • Line Location:
    • EDIT+66
    • EDIT+70

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(364 - [#364] GET1^DIQ
^DGCR(399 - [#399] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(364.9 EDIT+86
^DGCR(399 - [#399] EDIT+38, EDIT+39, EDIT+64, EDIT+73, EDIT+75, EDIT+85
^IBA(364.9 - [#364.9] EDIT+20, EDIT+68, EDIT+74

Label References

Name Line Occurrences
SEL EDIT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EDIT+1~, EDIT+20*, EDIT+21*, EDIT+38*
DIR EDIT+27~, EDIT+34~, EDIT+43~, EDIT+50~, EDIT+66~, EDIT+70~, EDIT+75~, EDIT+92~, EDIT+98~
DIR(0 EDIT+66*, EDIT+70*
IBAC EDIT+1~, EDIT+80*
IBBILL EDIT+1~, EDIT+39*, EDIT+56, EDIT+91
>> IBBILLER EDIT+106
IBDA EDIT+6~, EDIT+8, EDIT+10, EDIT+17, EDIT+18, EDIT+23, EDIT+25, EDIT+82, EDIT+84*, EDIT+103
, SEL~, SEL+1!, SEL+7*, SEL+8*, SEL+9, SEL+11*
IBDA( EDIT+10, SEL+9*
IBDA("" SEL+11
IBDA("TOTAL" SEL+6*, SEL+10*
>> IBDAYSMAX EDIT+106
>> IBDIV EDIT+106
IBENCIFN EDIT+1~, EDIT+14*, EDIT+18*, EDIT+20, EDIT+30, EDIT+55, EDIT+68, EDIT+74, EDIT+86, EDIT+100
IBER EDIT+1~, EDIT+79*
>> IBFROMVALMDDF EDIT+103
>> IBICAMEFROMEE EDIT+107*
IBIFN EDIT+1~, EDIT+15*, EDIT+17*, EDIT+37, EDIT+38, EDIT+39, EDIT+48, EDIT+49, EDIT+64, EDIT+73
EDIT+75, EDIT+85, EDIT+90, EDIT+101
>> IBPARENT EDIT+13, EDIT+60, EDIT+82, EDIT+84, EDIT+103, EDIT+106
IBPOPOUT EDIT+1~, EDIT+75
IBREEDIT EDIT+1~, EDIT+61*
>> IBSORT EDIT+106
IBV EDIT+1~, EDIT+62*
IBVIEW EDIT+1~, EDIT+78*
>> IORVON EDIT+75, EDIT+88, EDIT+94
>> IOUON EDIT+75, EDIT+88, EDIT+94
>> LASTONEPUBLISHED EDIT+103
OPTION SEL~, SEL+3
TMPIBDA EDIT+2~, EDIT+82*, EDIT+84
TRANSMITDATE EDIT+1~, EDIT+101*
TRANSMITTED EDIT+1~
U EDIT+20, EDIT+38, EDIT+39
>> VALM("LINES" EDIT+106
>> VALMAR EDIT+14, EDIT+15, EDIT+17, EDIT+18, EDIT+23, EDIT+25, EDIT+106, SEL+9
>> VALMBCK EDIT+8*, EDIT+10*, EDIT+26*, EDIT+33*, EDIT+45*, EDIT+52*, EDIT+65*, EDIT+69*, EDIT+75*, EDIT+95*
EDIT+103*, EDIT+106*, EDIT+107*, EDIT+109*
>> VALMBG EDIT+106*
>> VALMLST EDIT+106
>> VALMSG EDIT+4*
VALMY SEL+1!, SEL+4
VALMY( SEL+8
>> XQORNOD(0 SEL+3
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 |  Local Variables  | All