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

Package: Integrated Billing

Routine: IBJDI41


Information

IBJDI41 ;ALB/CPM - PATIENTS WITH UNIDENTIFIED INSURANCE (CONT'D) ;17-DEC-96

Source Information

Source file <IBJDI41.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 7 ^IBCNS  E^IBJDE  $$TESTP^IBJDI1  ($$DIV,OUTPT)^IBJDI21  ($$TITLE,$$TYPE)^IBJDI4  ($$DAT1,$$DAT2,$$STOP)^IBOUTL  CLOSE^IBSDU  
VA FileMan 2 NOW^%DTC  ^DIR  
Registration 1 ELIG^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: 1

Package Total Caller Graph
Integrated Billing 1 IBJDI4  

Entry Points

Name Comments DBIA/ICR reference
EN ; - Entry point from IBJDI4.
PRT ; - Print the reports.
ENQ
ENC(IBOED) ; - Encounter extract for all patients loop.
; Input: IBOED = Outpatient encounter in file #409.68
; Pre-set variables IB array, IBSORT also required.
PROC(DFN,IBINDT,IBIPC) ; - Process each specific patient.
; Input: DFN = Pointer to the patient in file #2
; IBINDT = Encounter or discharge date
; IBIPC = Inpatient treatment marker
; ("*"=Had inpat. treatment, null=No inpat. treatment)
PRCQ
DIV(X) ; - Return division name.
DET ; - Print the detailed report.
DETQ
EXCOUT ; OUTPUT EXCEL FORMAT
HDET ; - Write the detail report header.
EXCHDR ; Write the excel header.
SUM ; - Print the summary report.
EXCSUM ; - Print the summary report in excel format.
DASH(X) ; - Return a dashed line.
ELIG(X) ; - Return eligibility code name.
INSC(X) ; - Return insurance company.
PAUSE ; - Page break.
SSN(X) ; - Format the SSN.

External References

Name Field # of Occurrence
NOW^%DTC PRT+7
^DIR PAUSE+4
^IBCNS PROC+18
E^IBJDE PRT+5
$$TESTP^IBJDI1 PROC+8
$$DIV^IBJDI21 EN+7, ENC+4
OUTPT^IBJDI21 EN+17
$$TITLE^IBJDI4 DET+1, DET+3, HDET+2, EXCHDR+1
$$TYPE^IBJDI4 PROC+24
$$DAT1^IBOUTL EN+36, HDET+3, EXCHDR+3, SUM+5, EXCSUM+5
$$DAT2^IBOUTL PRT+7
$$STOP^IBOUTL EN+5, EN+27, HDET+7
CLOSE^IBSDU EN+16, EN+18
ELIG^VADPT EN+30, PROC+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There were no ",$$TITLE^IBJDI4(0)," during this period."
  • Line Location: DET+1
Function Call: WRITE
  • Prompt: !!,"There were no ",$$TITLE^IBJDI4(IBX)," during this period."
  • Line Location: DET+3
Function Call: WRITE
  • Prompt: ?80,$$ELIG(+IBELIG)
  • Line Location: DET+12
Function Call: WRITE
  • Prompt: ?102,$$INSC(+IBINSC),?124,$P(IBX2,U,6),!
  • Line Location: DET+13
Function Call: WRITE
  • Prompt: ?2,"Remarks: ",$P(IBX2,U,7)
  • Line Location: DET+14
Function Call: WRITE
  • Prompt: !
  • Line Location: DET+15
Function Call: WRITE
  • Prompt: !,$P(IBX1,"@@")_U_$$SSN($P(IBX2,U))_U_$E($P(IBX2,U,2),1,15)_U_$P(IBX2,U,3)_U
  • Line Location: EXCOUT+1
Function Call: WRITE
  • Prompt: $$ELIG(+IBELIG)_U
  • Line Location: EXCOUT+2
Function Call: WRITE
  • Prompt: $$INSC(+IBINSC)_U_$P(IBX2,U,6)_U
  • Line Location: EXCOUT+3
Function Call: WRITE
  • Prompt: $P(IBX2,U,7)_U
  • Line Location: EXCOUT+4
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDET+1
Function Call: WRITE
  • Prompt: !,"Patients treated in the period "_$$DAT1^IBOUTL(IBBDT)_" to "_$$DAT1^IBOUTL(IBEDT)," NOTE: *=Had inpatient care, +=Billable insurance"
  • Line Location: HDET+3
Function Call: WRITE
  • Prompt: !!?45,"Home",?62,"Work",?124,"Date of"
  • Line Location: HDET+4
Function Call: WRITE
  • Prompt: !,"Patient",?27,"SSN",?41,"Phone Number",?58,"Phone Number",?80,"Eligibility",?102,"Insurance",?125,"Death"
  • Line Location: HDET+5
Function Call: WRITE
  • Prompt: !,$$DASH(132),!!
  • Line Location: HDET+6
Function Call: WRITE
  • Prompt: !,"Run Date: ",IBRUN
  • Line Location: EXCHDR+2
Function Call: WRITE
  • Prompt: !,"Patients treated in the period "_$$DAT1^IBOUTL(IBBDT)_" to "_$$DAT1^IBOUTL(IBEDT)," NOTE: *=Had inpatient care, +=Billable insurance"
  • Line Location: EXCHDR+3
Function Call: WRITE
  • Prompt: !,"Patient"_U_"SSN"_U_"Home Phone Number"_U_"Work Phone Number"_U_"Eligibility"_U_"Insurance"_U_"Date of Death"
  • Line Location: EXCHDR+4
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: SUM+1
Function Call: WRITE
  • Prompt: !!?26,"PATIENT INSURANCE STATISTICS",!
  • Line Location: SUM+2
Function Call: WRITE
  • Prompt: ?(61-$L(IBDIV))\2,"SUMMARY REPORT for ",IBDIV
  • Line Location: SUM+3
Function Call: WRITE
  • Prompt: ?33,"SUMMARY REPORT"
  • Line Location: SUM+4
Function Call: WRITE
  • Prompt: !!?19,"Patients treated from ",$$DAT1^IBOUTL(IBBDT)," - ",$$DAT1^IBOUTL(IBEDT)
  • Line Location: SUM+5
Function Call: WRITE
  • Prompt: !!?24,"Run Date: ",IBRUN,!?20,$$DASH(40),!!
  • Line Location: SUM+6
Function Call: WRITE
  • Prompt: ?22,"Number of Patients Treated:",?50,$J(IB(IBDIV,"TOT"),5)
  • Line Location: SUM+24
Function Call: WRITE
  • Prompt: !?9,"Number of Patients Covered by Insurance:",?50,$J(IB(IBDIV,"YES"),5)," (",IBPER(1),"%)"
  • Line Location: SUM+25
Function Call: WRITE
  • Prompt: !?3,"No. of Patients Covered by Billable Insurance:",?50,$J(IB(IBDIV,"BILL"),5)," (",IBPER(2),"%-",IBPER(3),"%)*"
  • Line Location: SUM+26
Function Call: WRITE
  • Prompt: !?12,"Number of Patients Covered by an HMO:",?50,$J(IB(IBDIV,"HMO"),5)," (",IBPER(4),"%-",IBPER(5),"%-",IBPER(6),"%)**"
  • Line Location: SUM+27
Function Call: WRITE
  • Prompt: !?10,"Number of Patients Covered by Medicare:",?50,$J(IB(IBDIV,"MEDC"),5)," (",IBPER(7),"%-",IBPER(8),"%)*"
  • Line Location: SUM+28
Function Call: WRITE
  • Prompt: !?11,"Number of Patients Covered by Medigap:",?50,$J(IB(IBDIV,"MEDG"),5)," (",IBPER(9),"%-",IBPER(10),"%-",IBPER(11),"%)**"
  • Line Location: SUM+29
Function Call: WRITE
  • Prompt: !?2,"No. of Patients Covered by an Indemnity Policy:",?50,$J(IB(IBDIV,"IND"),5)," (",IBPER(12),"%)"
  • Line Location: SUM+30
Function Call: WRITE
  • Prompt: !?5,"Number of Patients Not Covered by Insurance:",?50,$J(IB(IBDIV,"NO"),5)," (",IBPER(13),"%)"
  • Line Location: SUM+31
Function Call: WRITE
  • Prompt: !?7,"Number of Patients with Unknown Insurance:",?50,$J(IB(IBDIV,"UNK"),5)," (",IBPER(14),"%)"
  • Line Location: SUM+32
Function Call: WRITE
  • Prompt: !," No. of Patients w/Insurance Question Unanswered:",?50,$J(IB(IBDIV,"NULL"),5)," (",IBPER(15),"%)"
  • Line Location: SUM+33
Function Call: WRITE
  • Prompt: !?21,"Number of Deceased Patients:",?50,$J(IB(IBDIV,"DEC"),5)," (",IBPER(16),"%)"
  • Line Location: SUM+34
Function Call: WRITE
  • Prompt: !!," *(% from patients treated-% from patients with insurance)"
  • Line Location: SUM+35
Function Call: WRITE
  • Prompt: !,"**(% from patients treated-% from patients w/ins-% from patients w/billable ins)"
  • Line Location: SUM+36
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: EXCSUM+1
Function Call: WRITE
  • Prompt: !!,"PATIENT INSURANCE STATISTICS",!
  • Line Location: EXCSUM+2
Function Call: WRITE
  • Prompt: ?(61-$L(IBDIV))\2,"SUMMARY REPORT for ",IBDIV
  • Line Location: EXCSUM+3
Function Call: WRITE
  • Prompt: ?33,"SUMMARY REPORT"
  • Line Location: EXCSUM+4
Function Call: WRITE
  • Prompt: !!,"Patients treated from ",$$DAT1^IBOUTL(IBBDT)," - ",$$DAT1^IBOUTL(IBEDT)
  • Line Location: EXCSUM+5
Function Call: WRITE
  • Prompt: !!,"Run Date: ",IBRUN,!?20,$$DASH(40),!!
  • Line Location: EXCSUM+6
Function Call: WRITE
  • Prompt: "Number of Patients Treated:"_U_$J(IB(IBDIV,"TOT"),5)
  • Line Location: EXCSUM+24
Function Call: WRITE
  • Prompt: !,"Number of Patients Covered by Insurance:"_U_$J(IB(IBDIV,"YES"),5)," (",IBPER(1),"%)"
  • Line Location: EXCSUM+25
Function Call: WRITE
  • Prompt: !,"No. of Patients Covered by Billable Insurance:"_U_$J(IB(IBDIV,"BILL"),5)," (",IBPER(2),"%-",IBPER(3),"%)*"
  • Line Location: EXCSUM+26
Function Call: WRITE
  • Prompt: !,"Number of Patients Covered by an HMO:"_U_$J(IB(IBDIV,"HMO"),5)," (",IBPER(4),"%-",IBPER(5),"%-",IBPER(6),"%)**"
  • Line Location: EXCSUM+27
Function Call: WRITE
  • Prompt: !,"Number of Patients Covered by Medicare:"_U_$J(IB(IBDIV,"MEDC"),5)," (",IBPER(7),"%-",IBPER(8),"%)*"
  • Line Location: EXCSUM+28
Function Call: WRITE
  • Prompt: !,"Number of Patients Covered by Medigap:"_U_$J(IB(IBDIV,"MEDG"),5)," (",IBPER(9),"%-",IBPER(10),"%-",IBPER(11),"%)**"
  • Line Location: EXCSUM+29
Function Call: WRITE
  • Prompt: !,"No. of Patients Covered by an Indemnity Policy:"_U_$J(IB(IBDIV,"IND"),5)," (",IBPER(12),"%)"
  • Line Location: EXCSUM+30
Function Call: WRITE
  • Prompt: !,"Number of Patients Not Covered by Insurance:"_U_$J(IB(IBDIV,"NO"),5)," (",IBPER(13),"%)"
  • Line Location: EXCSUM+31
Function Call: WRITE
  • Prompt: !,"Number of Patients with Unknown Insurance:"_U_$J(IB(IBDIV,"UNK"),5)," (",IBPER(14),"%)"
  • Line Location: EXCSUM+32
Function Call: WRITE
  • Prompt: !,"No. of Patients w/Insurance Question Unanswered:"_U_$J(IB(IBDIV,"NULL"),5)," (",IBPER(15),"%)"
  • Line Location: EXCSUM+33
Function Call: WRITE
  • Prompt: !,"Number of Deceased Patients:"_U_$J(IB(IBDIV,"DEC"),5)," (",IBPER(16),"%)"
  • Line Location: EXCSUM+34
Function Call: WRITE
  • Prompt: !!," *(% from patients treated-% from patients with insurance)"
  • Line Location: EXCSUM+35
Function Call: WRITE
  • Prompt: !,"**(% from patients treated-% from patients w/ins-% from patients w/billable ins)"
  • Line Location: EXCSUM+36
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] DIV+1
^DGPM - [#405] EN+6
^DGPM("ATT3" EN+3, EN+4
^DIC(36 - [#36] PROC+21, INSC+1
^DIC(8 - [#8] ELIG+1
^DPT - [#2] EN+34, EN+35, EN+36, PROC+12, PROC+46
^TMP("IBJDI41" EN+11, EN+25, PROC+44*
^TMP("IBJDI42" EN+38*, DET+1, DET+3, DET+6, DET+8

Label References

Name Line Occurrences
$$DASH HDET+6, SUM+6, EXCSUM+6
$$ELIG DET+12, DET+17, EXCOUT+2, EXCOUT+6
$$INSC DET+13, DET+17, EXCOUT+3, EXCOUT+6
$$SSN DET+11, EXCOUT+1
DET PRT+9
DETQ DET+1
ENQ EN+13, EN+20, EN+42, PRT+3
EXCHDR DET+5
EXCOUT DET+9
EXCSUM PRT+10
HDET DET+1, DET+3, DET+7, DET+10
PAUSE PRT+10, PRT+11, DET+10, DETQ
PRCQ PROC+9
PROC EN+11, ENC+5
PRT EN+22
SUM PRT+11

Naked Globals

Name Field # of Occurrence
^( EN+25, EN+36, DET+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRT+7
DFN EN+8*, EN+11, EN+25*, EN+27, EN+34, EN+35, EN+36, EN+38, PROC~, PROC+8
, PROC+12, PROC+44, PROC+46
DIR PAUSE+2~
DIR(0 PAUSE+4*
DIROUT PAUSE+2~
DIRUT PAUSE+2~, PAUSE+4
DTOUT PAUSE+2~
DUOUT PAUSE+2~, PAUSE+4
>> IB( EN+7, PRT+4*, PRT+8, ENC+4, PROC+15*, PROC+16*, PROC+22*, PROC+26*, PROC+29*, PROC+32*
, PROC+35*, PROC+38*, PROC+40*, PROC+45*, PROC+46*, SUM+8, SUM+9, SUM+10, SUM+11, SUM+12
SUM+13, SUM+14, SUM+15, SUM+16, SUM+17, SUM+18, SUM+19, SUM+20, SUM+21, SUM+22
SUM+23, SUM+24, SUM+25, SUM+26, SUM+27, SUM+28, SUM+29, SUM+30, SUM+31, SUM+32
SUM+33, SUM+34, EXCSUM+8, EXCSUM+9, EXCSUM+10, EXCSUM+11, EXCSUM+12, EXCSUM+13, EXCSUM+14, EXCSUM+15
EXCSUM+16, EXCSUM+17, EXCSUM+18, EXCSUM+19, EXCSUM+20, EXCSUM+21, EXCSUM+22, EXCSUM+23, EXCSUM+24, EXCSUM+25
EXCSUM+26, EXCSUM+27, EXCSUM+28, EXCSUM+29, EXCSUM+30, EXCSUM+31, EXCSUM+32, EXCSUM+33, EXCSUM+34
>> IB("ALL" PRT+4
>> IBBDT EN+3, EN+17, HDET+3, EXCHDR+3, SUM+5, EXCSUM+5
>> IBD EN+3*, EN+4, EN+11
IBDD PRCQ!
IBDD( PROC+19, PROC+24
>> IBDIV EN+7*, PRT+8*, ENC+4*, PROC+15, PROC+16, PROC+22, PROC+26, PROC+29, PROC+32, PROC+35
, PROC+38, PROC+40, PROC+44, PROC+45, PROC+46, DET+1, DET+3, DET+6, DET+8, HDET+2
EXCHDR+1, SUM+3, SUM+8, SUM+9, SUM+10, SUM+11, SUM+12, SUM+13, SUM+14, SUM+15
SUM+16, SUM+17, SUM+18, SUM+19, SUM+20, SUM+21, SUM+22, SUM+23, SUM+24, SUM+25
SUM+26, SUM+27, SUM+28, SUM+29, SUM+30, SUM+31, SUM+32, SUM+33, SUM+34, EXCSUM+3
EXCSUM+8, EXCSUM+9, EXCSUM+10, EXCSUM+11, EXCSUM+12, EXCSUM+13, EXCSUM+14, EXCSUM+15, EXCSUM+16, EXCSUM+17
EXCSUM+18, EXCSUM+19, EXCSUM+20, EXCSUM+21, EXCSUM+22, EXCSUM+23, EXCSUM+24, EXCSUM+25, EXCSUM+26, EXCSUM+27
EXCSUM+28, EXCSUM+29, EXCSUM+30, EXCSUM+31, EXCSUM+32, EXCSUM+33, EXCSUM+34
>> IBDN EN+34*, EN+38
>> IBDOD EN+36*, EN+38
>> IBEDT EN+3, EN+17, HDET+3, EXCHDR+3, SUM+5, EXCSUM+5
>> IBELIG EN+30*, EN+31*, EN+38, DET+12*, DET+15, DET+16, DET+17, EXCOUT+2*, EXCOUT+5, EXCOUT+6
IBFL PRCQ!
IBFL( PROC+18*
IBFL(0 PROC+21, PROC+22*
IBFL(1 PROC+25, PROC+26*
IBFL(2 PROC+28, PROC+29*
IBFL(3 PROC+31, PROC+32*
IBFL(4 PROC+34, PROC+35*
IBINDT PROC~
IBINS PROC+18, PRCQ!
IBINSC PROC+12*, PROC+20*, PROC+41*, PROC+44, PRCQ!, DET+13*, DET+15, DET+16, DET+17, EXCOUT+3*
EXCOUT+5, EXCOUT+6
IBIPC PROC~, PROC+44
IBOED ENC~, ENC+4, ENC+5
>> IBOUT PRT+10, DET+5, DET+7, DET+9
IBOUTP PROC+18*, PRCQ!
>> IBPAG DET+3*, DET+7*, HDET+1*, HDET+2, SUM+1*, EXCSUM+1*
>> IBPAT EN+34*, EN+38
>> IBPER(1 SUM+8*, SUM+25, EXCSUM+8*, EXCSUM+25
>> IBPER(10 SUM+17*, SUM+29, EXCSUM+17*, EXCSUM+29
>> IBPER(11 SUM+18*, SUM+29, EXCSUM+18*, EXCSUM+29
>> IBPER(12 SUM+19*, SUM+30, EXCSUM+19*, EXCSUM+30
>> IBPER(13 SUM+20*, SUM+31, EXCSUM+20*, EXCSUM+31
>> IBPER(14 SUM+21*, SUM+32, EXCSUM+21*, EXCSUM+32
>> IBPER(15 SUM+22*, SUM+33, EXCSUM+22*, EXCSUM+33
>> IBPER(16 SUM+23*, SUM+34, EXCSUM+23*, EXCSUM+34
>> IBPER(2 SUM+9*, SUM+26, EXCSUM+9*, EXCSUM+26
>> IBPER(3 SUM+10*, SUM+26, EXCSUM+10*, EXCSUM+26
>> IBPER(4 SUM+11*, SUM+27, EXCSUM+11*, EXCSUM+27
>> IBPER(5 SUM+12*, SUM+27, EXCSUM+12*, EXCSUM+27
>> IBPER(6 SUM+13*, SUM+27, EXCSUM+13*, EXCSUM+27
>> IBPER(7 SUM+14*, SUM+28, EXCSUM+14*, EXCSUM+28
>> IBPER(8 SUM+15*, SUM+28, EXCSUM+15*, EXCSUM+28
>> IBPER(9 SUM+16*, SUM+29, EXCSUM+16*, EXCSUM+29
>> IBPH EN+35*, EN+38
>> IBPM EN+4*, EN+5, EN+6
>> IBPMD EN+6*, EN+7, EN+8
>> IBQ EN+3, EN+4, EN+5*, EN+13, EN+17, EN+20, EN+25, EN+27*, EN+42, PRT+7*
PRT+8, PRT+11, DET+6, DET+7, DET+8, DET+10, DETQHDET+7*, PAUSE+4*
>> IBQUERY EN+16, EN+17, EN+18
>> IBRMK EN+38, DET+14, EXCOUT+4
>> IBRPT EN+22, PRT+9, PROC+20, PROC+41, PROC+44
>> IBRUN PRT+7*, HDET+2, EXCHDR+2, SUM+6, EXCSUM+6
>> IBSEL EN+26, PROC+12, PROC+15, PROC+16, PROC+20, PROC+23, PROC+27, PROC+30, PROC+33, PROC+36
, PROC+38, PROC+40, PROC+41, DET+1, DET+2
>> IBSEL1 EN+35*, EN+37, PROC+12*, PROC+15*, PROC+16*, PROC+23*, PROC+27*, PROC+30*, PROC+33*, PROC+36*
, PROC+38*, PROC+40*, PROC+44
>> IBSORT EN+7, ENC+4
IBTYP PROC+24*, PROC+25, PROC+28, PROC+31, PROC+34, PRCQ!
IBWNR PROC+18*, PRCQ!
IBX EN+25*, EN+26, EN+34, EN+35, EN+38, PROC+12*, PROC+13, PROC+14, PROC+37, PROC+39
, PROC+41, PRCQ!, DET+1*, DET+2*, DET+3, DET+6*, DET+8, HDET+2, EXCHDR+1, PAUSE+2~
PAUSE+3*
>> IBX1 DET+8*, DET+11, EXCOUT+1
>> IBX2 DET+8*, DET+11, DET+12, DET+13, DET+14, DET+15, EXCOUT+1, EXCOUT+2, EXCOUT+3, EXCOUT+4
>> IBXTRACT PRT+3
IOF HDET+1, SUM+1, EXCSUM+1
IOSL DET+10, PAUSE+3
IOST PAUSE+1
U EN+7, EN+8, EN+26, EN+34, EN+35, EN+38, ENC+4, ENC+5, PROC+12, PROC+21
, PROC+44, DIV+1, DET+11, DET+12, DET+13, DET+14, DET+15, EXCOUT+1, EXCOUT+2, EXCOUT+3
EXCOUT+4, EXCOUT+6, EXCHDR+4, EXCSUM+24, EXCSUM+25, EXCSUM+26, EXCSUM+27, EXCSUM+28, EXCSUM+29, EXCSUM+30
EXCSUM+31, EXCSUM+32, EXCSUM+33, EXCSUM+34, ELIG+1, INSC+2
VA EN+40!, PRCQ!
VAEL EN+40!, PRCQ!
VAEL(1 EN+30, EN+31
VAEL(4 PROC+9
VAERR EN+40!, PRCQ!
X EN+31*, EN+37*, PRT+4*, PROC+18*, PROC+19*, PROC+20, PROC+21, PROC+24, PRCQ!, DIV~
, DIV+1, DET+2*, DET+16*, DET+17, EXCOUT+5*, EXCOUT+6, DASH~, DASH+1, ELIG~, ELIG+1
, INSC~, INSC+1*, INSC+2, PAUSE+2~, SSN~, SSN+1
>> X1 EN+37*, EN+38
Y DIV+1*, DIV+2, PAUSE+2~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All