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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCOMN1

Package: Integrated Billing

Routine: IBCOMN1


Information

IBCOMN1 ;ALB/CMS - PATIENTS NO COVERAGE VERIFIED REPORT (CON'T);10-09-98

Source Information

Source file <IBCOMN1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 ^%ZISC  ($$FMTE,$$NOW)^XLFDT  
Integrated Billing 1 $$TERMDG^IBCONS2  
Registration 1 (ADD,DEM)^VADPT  
VA FileMan 1 ^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
Integrated Billing 1 IBCOMN  

Entry Points

Name Comments DBIA/ICR reference
BEG ; Entry to run Patients w/no Coverage Verification Report
; Input variables:
; IBAIB - Required. How to sort
; 1= Patient Name Range 2= Terminal Digit Range
QUEQ ; Exit clean-UP
HD ;Write Heading
WRT ;Write data lines
ASK ; Ask to Continue with display

External References

Name Field # of Occurrence
^%ZISC QUEQ+1
^DIR ASK+3
$$TERMDG^IBCONS2 BEG+27
ADD^VADPT BEG+19
DEM^VADPT BEG+19
$$FMTE^XLFDT BEG+34, HD+4, HD+5, HD+10, HD+11
$$NOW^XLFDT HD+4, HD+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"** NO RECORDS FOUND **"
  • Line Location: BEG+38
Function Call: WRITE
  • Prompt: !
  • Line Location: QUEQ+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($E(IOST,1,2)["C-")
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: "Patient Name^SSN^Age^DOB^Phone^Verified"
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($E(IOST,1,2)["C-")
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: "Patient Name^SSN^Age^DOB^Phone^Verified"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: @IOF,!,"Patients w/No Coverage Verification Date Report",?50,$$FMTE^XLFDT($$NOW^XLFDT,"Z"),?70," Page ",IBPAGE
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,?5,"Verification Date Range: "_$$FMTE^XLFDT(IBBDT,"Z")_" to "_$$FMTE^XLFDT(IBEDT,"Z")
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !,?5," Sorted by: "_$S(IBAIB=1:"Patient Name",1:"Terminal Digit")_" Range: "_$S(IBRF="A":"FIRST",1:IBRF)_" to "_$S(IBRL="zzzzzz":"LAST",1:IBRL)
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: !,?20,"(* - Patient Deceased)"
  • Line Location: HD+13
Function Call: WRITE
  • Prompt: !,"Patient Name",?31,"SSN",?38,"Age",?43,"DOB",?55,"Phone",?70,"Verified"
  • Line Location: HD+14
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+15
Function Call: WRITE
  • Prompt: "="
  • Line Location: HD+15
Function Call: WRITE
  • Prompt: !,$P(IBPT,U,1)_U_$E($P(IBPT,U,1),1,1)_$P(IBPT,U,2)_U_$P(IBPT,U,3,6)
  • Line Location: WRT+11
Routine Call
  • DIR
  • Line Location:
    • ASK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(354 - [#354] BEG+16, BEG+17
^TMP("IBCOMN" BEG+15!, BEG+35*, BEG+38, QUEQ+1!, WRT+2, WRT+3, WRT+4

Label References

Name Line Occurrences
ASK BEG+38, WRT+7, WRT+15
HD BEG+38, BEG+39, WRT+8
QUEQ BEG+38
WRT BEG+39

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN BEG+12~, BEG+17*, BEG+27, BEG+35
DIR ASK+2~
DIR(0 ASK+3*
DIROUT ASK+2~
DIRUT ASK+2~, ASK+4
DTOUT ASK+2~
DUOUT ASK+2~, ASK+4
IBA WRT+1~, WRT+2*, WRT+3, WRT+4
IBAIB BEG+23, BEG+24, BEG+27, BEG+30, BEG+35, QUEQ+1!, HD+6, HD+12
>> IBBDT BEG+16, HD+5, HD+11
IBDFN WRT+1~, WRT+3*, WRT+4
IBDT BEG+12~, BEG+16*, BEG+17, BEG+34
>> IBEDT BEG+16, HD+5, HD+11
IBGP BEG+12~
IBI BEG+12~
IBOUT BEG+14*, QUEQ+1!, HD+3, HD+9, WRT+6, WRT+11
IBPAGE BEG+12~, BEG+15*, HD+1*, HD+10
IBPT WRT+1~, WRT+4*, WRT+11, WRT+13
IBQUIT BEG+12~, BEG+15*, WRT+1*, WRT+2, WRT+3, WRT+6, WRT+7, WRT+15, ASK+4*
IBRF BEG+24, BEG+27, QUEQ+1!, HD+6, HD+12
IBRL BEG+23, BEG+27, QUEQ+1!, HD+6, HD+12
IBTD BEG+12~, BEG+27*, BEG+30*, BEG+35
IBTMP BEG+12~, BEG+34*, BEG+35, QUEQ+1!
IBX BEG+12~, HD+15*
IOF HD+10
IOSL WRT+6
IOST HD+3, HD+9, ASK+1
U BEG+14, BEG+22, BEG+34, WRT+11, WRT+13
VA BEG+12~, BEG+18!, QUEQ+1!
VADM BEG+12~, BEG+18!, QUEQ+1!
VADM(1 BEG+22*, BEG+23, BEG+24, BEG+34, BEG+35
VADM(2 BEG+34
VADM(3 BEG+34
VADM(4 BEG+34
VADM(6 BEG+34
VAERR BEG+12~, BEG+18!, QUEQ+1!
VAPA BEG+18!, QUEQ+1!
VAPA(8 BEG+34
X BEG+12~, WRT+1~, ASK+2~
Y BEG+12~, WRT+1~, ASK+2~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All