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

Package: Integrated Billing

Routine: IBCCPT


Information

IBCCPT ;ALB/LDB - MCCR OUTPATIENT VISITS LISTING CONT. ;29 MAY 90

Source Information

Source file <IBCCPT.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Integrated Billing 15 ($$BDATE,$$ICD9)^IBACSV  ($$NBOEP,ADDDX)^IBCCPT1  $$INPAT^IBCEF  (Q,Q1,VFILE1)^IBCOPV1  $$PRVTYP^IBCRU6  $$CLNSCRN^IBCU  $$QMED^IBCU1  ($$ADDTNL,$$DEFDIV,$$NOCPROC,$$SPCUNIT,ATTACH)^IBCU7  
(DX,ORAL)^IBCU72  EN^IBCU7B  EN^IBCU7C  $$NBOE^IBCU81  $$GETSPEC^IBEFUNC  $$BDSRC^IBEFUNC3  ($$SCE,SCAN)^IBSDU  
VA FileMan 5 FIND^DIC  (FILE,YN)^DICN  ^DIE  $$GET1^DIQ  ^DIR  
CPT HCPCS Codes 2 $$CPT^ICPTCOD  $$MOD^ICPTMOD  
Kernel 1 $$FMTE^XLFDT  
Scheduling 1 GETCPT^SDOE  
Vendor - Document Storage Systems 1 DX^VEJDIBE1  

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

Package Total Caller Graph
Integrated Billing 3 IBCD3  IBCSCE  IBCU7U  

Entry Points

Name Comments DBIA/ICR reference
EN1(IBQUERY,IBHLP) ;
EN
OK1
OK
OK2
FILE
FILE1 ; file procedures, if BASC, only for 1 visit date
CPRT
CHDR
ADDMOD(IBIFN,IBY,IBMOD) ; Add modifier(s) from PCE procedure to CPT code mult
DSPPRC(CPTNM,NOD,DX) ; display summary of procedure being added
VST(IBQUERY) ;Procedures for outpatient visits ... If IBQUERY is defined
; on entry, the QUERY OBJECT defined by this value will be used for
; loop to extract procedures for visits, otherwise, a new QUERY will be opened
; If passed by reference, IBQUERY will be ret'd as the new QUERY ref #
VSTQ
WRNO
SCR
HLP
CPT
PROC(IBQUERY) ; -find outpatient procedures, flag if billable
; - ^utility($j,cpt-cnt,count)=code^date^on bill^is BASC^divis^nb^nb mess^provider^clinic^mod,mod^Opt Enc Ptr
; - ^utility($j,cpt-cnt,count,"dx")=assoc dx(1)^assoc dx(2)^assoc dx(3)^assoc dx(4)
EXTPROC(IBIFN,IBOE,IBOE0,IBCNT) ; Extract procedures for an encounter
; IBIFN = the ien of the bill
; IBOE0 = 0-node of the outpatient encounter file entry IBOE
; IBCNT extracted entry counter
TOMANY(DATE) ; - returns 1 if more than 1 visit date on bill (for basc)
TOMANYQ
CHECK(IBPSCD,DGNOD) ;

External References

Name Field # of Occurrence
FIND^DIC FILE1+43, FILE1+49, FILE1+61
FILE^DICN FILE1+13, FILE1+134, FILE1+137, ADDMOD+5
YN^DICN OK2
^DIE FILE+1, FILE1+24, FILE1+81, FILE1+107, FILE1+108, FILE1+121, FILE1+140
$$GET1^DIQ FILE1+53, FILE1+55, FILE1+64, FILE1+65, FILE1+66, FILE1+70, FILE1+71, FILE1+72, CHECK+2
^DIR OK+1
$$BDATE^IBACSV EN+2, CPRT+2, DSPPRC+7
$$ICD9^IBACSV DSPPRC+11
$$NBOEP^IBCCPT1 EXTPROC+20
ADDDX^IBCCPT1 FILE1+21
$$INPAT^IBCEF FILE1+93
Q^IBCOPV1 OK2
Q1^IBCOPV1 OK+1, FILE+3
VFILE1^IBCOPV1 FILE1+4
$$PRVTYP^IBCRU6 DSPPRC+4
$$CLNSCRN^IBCU EXTPROC+12
$$QMED^IBCU1 FILE1+111
$$ADDTNL^IBCU7 FILE1+116
$$DEFDIV^IBCU7 FILE1+105
$$NOCPROC^IBCU7 FILE1+68, FILE1+78
$$SPCUNIT^IBCU7 FILE1+108
ATTACH^IBCU7 FILE1+95
DX^IBCU72 FILE1+115
ORAL^IBCU72 FILE1+143
EN^IBCU7B FILE1+88
EN^IBCU7C FILE1+34
$$NBOE^IBCU81 EXTPROC+10
$$GETSPEC^IBEFUNC FILE1+10, ADDMOD+3
$$BDSRC^IBEFUNC3 EXTPROC+9
$$SCE^IBSDU EXTPROC+6
SCAN^IBSDU PROC+8
$$CPT^ICPTCOD FILE1+5, CPRT+3
$$MOD^ICPTMOD CPRT+10, DSPPRC+8
GETCPT^SDOE EXTPROC+7
DX^VEJDIBE1 FILE1+111
$$FMTE^XLFDT CPRT+4, DSPPRC+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"YOU HAVE SELECTED CPT CODE(S) NUMBERED-",$E(Y,1,$L(Y)-1),!,"IS THIS CORRECT"
  • Line Location: OK2+0
Function Call: WRITE
  • Prompt: !,"Respond 'Y'es to include these codes in the bill.",!,"Respond 'N'o to reselect."
  • Line Location: OK2+1
Function Call: WRITE
  • Prompt: !?10,"Can't add Amb. Surg. ",$P(IBCPTNM,U,2)," without visit date!"
  • Line Location: FILE1+6
Function Call: WRITE
  • Prompt: !?10,"Can't add Billable Amb. Surg. ",$P(IBCPTNM,U,2)," when more than one visit date!",*7
  • Line Location: FILE1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: FILE1+143
Function Call: WRITE
  • Prompt: !,DGCNT,")",?5,$P(IBCPTNM,U,2),?13,$E($P(IBCPTNM,U,3),1,24),?39,$E($P($G(^SC(+$P(DGNOD,U,9),0)),U,1),1,15),?56,$$FMTE^XLFDT(DGDAT,2)
  • Line Location: CPRT+4
Function Call: WRITE
  • Prompt: ?64,IBNBM
  • Line Location: CPRT+8
Function Call: WRITE
  • Prompt: !,?13,$P(IBZ,U,2),?18,$P(IBZ,U,3)
  • Line Location: CPRT+10
Function Call: WRITE
  • Prompt: @IOF,!,?15,"<<CURRENT PROCEDURAL TERMINOLOGY CODES>>",!!,?10,"LISTING FROM VISIT DATES WITH ASSOCIATED CPT CODES",!,?22,"IN OUTPT ENCOUNTERS FILE",!
  • Line Location: CHDR+0
Function Call: WRITE
  • Prompt: !,L,!,"NO.",?5,"CODE",?13,"SHORT NAME",?39,"CLINIC",?56,"DATE",!,L,!
  • Line Location: CHDR+2
Function Call: WRITE
  • Prompt: !!?4,"Adding CPT Procedure: ",$P(CPTNM,U,2),?34,$P(CPTNM,U,3)
  • Line Location: DSPPRC+6
Function Call: WRITE
  • Prompt: !,?34,$P(IBMOD,U,2)," - ",$E($P(IBMOD,U,3),1,40)
  • Line Location: DSPPRC+8
Function Call: WRITE
  • Prompt: !,?34,"Visit: ",$$FMTE^XLFDT(+$P(NOD,U,2),2),", ",$E($P($G(^SC(+$P(NOD,U,9),0)),U,1),1,29)
  • Line Location: DSPPRC+9
Function Call: WRITE
  • Prompt: !,?44
  • Condition for execution: IBL=""
  • Line Location: DSPPRC+10
Function Call: WRITE
  • Prompt: IBL,IBPRVTYP
  • Line Location: DSPPRC+10
Function Call: WRITE
  • Prompt: !,?34,"Assoc Dx: ",$E($P(IBDXT,"^")_" "_$P(IBDXT,"^",3),1,35)
  • Line Location: DSPPRC+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DSPPRC+12
Function Call: WRITE
  • Prompt: !
  • Line Location: SCR+0
Function Call: READ
  • Formatting: !
  • Prompt: "Press return to continue or ""^"" to exit display "
  • Variable: DGU
  • Timeout: DTIME
  • Line Location: SCR+1
Function Call: WRITE
  • Prompt: !!,"Enter a number between 1 and ",DGCNT1," or a range of numbers separated with commas",!,"or dashes, e.g., 1,3,5 or 2-4,8"
  • Line Location: HLP+0
Function Call: READ
  • Variable: H
  • Timeout: 5
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !,"The number(s) must appear as a selectable number in the sequential list."
  • Line Location: HLP+1
Routine Call
  • DIC
  • Line Location:
    • FILE1+43
    • FILE1+49
    • FILE1+61
Routine Call
  • DIE
  • Line Location:
    • FILE+1
    • FILE1+24
    • FILE1+81
    • FILE1+107
    • FILE1+108
    • FILE1+121
    • FILE1+140
Routine Call
  • DIR
  • Line Location:
    • OK+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGCR(399 - [#399] Classic Fileman Calls
399.0304 GET1^DIQ
^ICPT - [#81] GET1^DIQ
^AUPNVCPT - [#9000010.18] FIND^DIC,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] OK+2, FILE1+10, FILE1+56, FILE1+86, FILE1+144, ADDMOD+2, ADDMOD+3, VST+4, VST+5, VST+6
WRNOCPT, EXTPROC+16, TOMANY+2, TOMANY+3
^SC - [#44] CPRT+4, DSPPRC+9
^TMP("DIERR" PROC+8!
^TMP("IBVIS" CHDR+1!, VST+5!, VST+7!
^UTILITY($J EN!, EN+3, OK1FILE+2, WRNO, EXTPROC+24*, EXTPROC+26
^VA(200 - [#200] FILE1+87, DSPPRC+4

Label References

Name Line Occurrences
$$CHECK FILE1+64
$$TOMANY FILE1+7
ADDMOD FILE1+25
CHDR EN+1, SCR+1
CPRT EN+3
DSPPRC FILE1+8
FILE1 FILE+2
HLP EN
OK OK2+2
OK2 OK2+1
PROC VST+4, VST+7
SCR CPRT
TOMANYQ TOMANY+1
VST EN
VSTQ VST+5
WRNO EN+1

Naked Globals

Name Field # of Occurrence
^( EN+3, FILE+2
^("U" VST+6
^(0 EXTPROC+26*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % OK2*, OK2+1, OK2+2
CPTNM DSPPRC~, DSPPRC+2, DSPPRC+6
DA FILE+1*!, FILE1+13*, FILE1+32!, FILE1+33*, FILE1+79*, FILE1+86, FILE1+90*, FILE1+116, FILE1+121!, FILE1+124!
FILE1+134!, FILE1+140*!, FILE1+142*, FILE1+145!, ADDMOD+1~
DA(1 FILE1+13*, FILE1+33*, FILE1+79*, FILE1+86, FILE1+126*, FILE1+137*, FILE1+142*, ADDMOD+2*, ADDMOD+3, CPT*
DA(2 FILE1+126*, ADDMOD+2*, ADDMOD+3
DATE TOMANY~, TOMANY+1, TOMANY+3
DD FILE1+13!, FILE1+121!, FILE1+134!, FILE1+137!, FILE1+140!, ADDMOD+1~, ADDMOD+5!
DFN PROC+4, EXTPROC+4~
>> DGASC EN+3*
>> DGBIL EN+3*, CPRT+5, CPRT+6
>> DGCNT EN+3*, FILE*, CPRT+4, VST+4*
>> DGCNT1 EN+3*, OKHLP
>> DGCNT2 FILE*
DGCPT EN!, EN+3*, CPRT+3
>> DGCPT1 FILE*, FILE+2
>> DGDAT EN+3*, CPRT+4
>> DGDIV EN+3*
DGNOADD FILE1+4!, FILE1+6
DGNOD EN+3*, FILE+2*, FILE1+4, FILE1+5, FILE1+7, FILE1+8, FILE1+13, FILE1+14, FILE1+15, FILE1+16
FILE1+17, FILE1+18, FILE1+25, FILE1+40, FILE1+55, FILE1+64, FILE1+87, FILE1+99, FILE1+100, FILE1+101
CPRT+4, CPRT+5, CPRT+7, CPRT+10, CHECK~, CHECK+2
DGNOD("DX" FILE+2*, FILE1+8, FILE1+21
DGTE CPT+1!
>> DGU EN*, EN+3, EN+4, CPRTSCRSCR+1*
DGVCNT TOMANY+2*, TOMANY+3!
DIC FILE1+13*, FILE1+23*, FILE1+24, FILE1+106*, FILE1+107, FILE1+121!, FILE1+124!, FILE1+125*, FILE1+134!, FILE1+137*
FILE1+140!, FILE1+145!, ADDMOD+1~, ADDMOD+4*, ADDMOD+5!
DIC("DR" FILE1+127*, FILE1+129*, FILE1+130*, FILE1+131*, FILE1+132*, FILE1+133*, ADDMOD+4*
DIC("P" FILE1+10*, FILE1+13!, ADDMOD+3*
DIC(0 FILE1+13*, FILE1+125*, FILE1+137*, ADDMOD+4*
DIE FILE+1*!, FILE1+24*, FILE1+107*, FILE1+121!, FILE1+140*!, FILE1+142*, FILE1+145!, ADDMOD+1~
DIK CPT+1!
DINUM FILE1+4*!, FILE1+121!, FILE1+140!
DIR EN1+3!, ENOK1OK+1!
DIR("?" OK*
DIR("A" OK*
DIR(0 OK*
DLAYGO FILE1+13*!, FILE1+124!, FILE1+125*, FILE1+137*!, ADDMOD+4*
DO FILE1+13!, FILE1+121!, FILE1+134!, FILE1+137!, FILE1+140!, ADDMOD+1~, ADDMOD+5!
DR FILE+1*!, FILE1+14*, FILE1+15*, FILE1+16*, FILE1+17*, FILE1+18*, FILE1+21, FILE1+80*, FILE1+84!, FILE1+85*
FILE1+91!, FILE1+94*, FILE1+96!, FILE1+98*, FILE1+99*, FILE1+100*, FILE1+101*, FILE1+103*, FILE1+105*, FILE1+107
FILE1+108*, FILE1+119!*, FILE1+120*, FILE1+121!, FILE1+124!, FILE1+134!, FILE1+139*, FILE1+140!, FILE1+145!, ADDMOD+1~
DTIME SCR+1
DX DSPPRC~, DSPPRC+11
H HLP+1*!
>> I FILE1+73*
I1 FILE+2*, FILE1+73~*, CPT+1!
I2 EXTPROC+4~, EXTPROC+13*, EXTPROC+14, EXTPROC+15, EXTPROC+17, EXTPROC+24
I7 EXTPROC+4~, EXTPROC+11*, EXTPROC+12, EXTPROC+16, EXTPROC+21
>> I9 FILE+2*
IBARR EXTPROC+4~
IBARR("CPT" EXTPROC+26
IBCBK PROC+3~, PROC+7*, PROC+8
>> IBCCPTX CPT*
>> IBCCPTZ CPT*
IBCLINIC EXTPROC+4~, EXTPROC+12*, EXTPROC+21
IBCNT EXTPROC~, EXTPROC+24*
IBCPT EXTPROC+4~, EXTPROC+14*, EXTPROC+16, EXTPROC+20, EXTPROC+21
IBCPTDAT EXTPROC+4~, EXTPROC+21*, EXTPROC+23*, EXTPROC+24
IBCPTNM FILE1+5~*, FILE1+6, FILE1+7, FILE1+8, CPRT+1~, CPRT+3*, CPRT+4
IBCPTPRV EXTPROC+4~, EXTPROC+15*, EXTPROC+21
IBCPTS EXTPROC+4~
IBCPTS( EXTPROC+13, EXTPROC+14, EXTPROC+15, EXTPROC+17, EXTPROC+24
IBCPTS(0 EXTPROC+8
IBDATE CPRT+1~, CPRT+2*, CPRT+3, CPRT+10, DSPPRC+1~, DSPPRC+7*, DSPPRC+8
IBDENH FILE1+38~, FILE1+45*, FILE1+46, FILE1+49
IBDENH0 FILE1+38~, FILE1+44*, FILE1+45
IBDENHD FILE1+2~, FILE1+51*, FILE1+53, FILE1+56, FILE1+57, FILE1+58, FILE1+70, FILE1+71, FILE1+72, FILE1+75*
FILE1+133
IBDENHD0 FILE1+47~*, FILE1+50*, FILE1+51
IBDICSAV FILE1+3~, FILE1+13*, FILE1+23, FILE1+106
IBDIV EXTPROC+4~, EXTPROC+11*, EXTPROC+21
IBDT FILE1+68, FILE1+78, EXTPROC+4~
IBDX EXTPROC+4~, EXTPROC+20, EXTPROC+24, EXTPROC+25!
IBDXT DSPPRC+1~, DSPPRC+11*
IBEX EXTPROC+4~
IBFILTER PROC+3~, PROC+6*, PROC+8
>> IBFT OK+2*, FILE1+7, FILE1+37, FILE1+93, FILE1+103, FILE1+105, FILE1+115, FILE1+116, FILE1+118
IBHLP EN1~, OK1
IBI DSPPRC+1~, DSPPRC+8*
IBIFN EN+2, OK+2, FILE+1, FILE1+10, FILE1+13, FILE1+21, FILE1+25, FILE1+33, FILE1+66, FILE1+79
FILE1+93, FILE1+105, FILE1+108, FILE1+111, FILE1+115, FILE1+116, FILE1+125, FILE1+126, FILE1+137, FILE1+142
FILE1+144, CPRT+2, ADDMOD~, ADDMOD+2, ADDMOD+4, DSPPRC+7, VST+4, VST+5, VST+6, WRNO
CPT, EXTPROC~, EXTPROC+16, TOMANY+2, TOMANY+3
IBL DSPPRC+1~, DSPPRC+4*, DSPPRC+10
>> IBLNPRV("IBCCPT" FILE1+87*, FILE1+89!
IBM ADDMOD+1~, ADDMOD+2*, ADDMOD+4
IBMOD ADDMOD~, ADDMOD+2, DSPPRC+1~, DSPPRC+8*
IBMODS CPRT+1~, CPRT+10*, DSPPRC+1~, DSPPRC+3*, DSPPRC+8, EXTPROC+4~, EXTPROC+17*, EXTPROC+21
IBNBM CPRT+1~, CPRT+3*, CPRT+5*, CPRT+6*, CPRT+7*, CPRT+8
IBOE EXTPROC~, EXTPROC+6, EXTPROC+7, EXTPROC+10, EXTPROC+21
IBOE0 EXTPROC~, EXTPROC+6*, EXTPROC+9, EXTPROC+10, EXTPROC+11, EXTPROC+12, EXTPROC+20, EXTPROC+23, EXTPROC+26
IBOED EXTPROC+4~, EXTPROC+10*, EXTPROC+20
IBOEDP EXTPROC+4~, EXTPROC+20*, EXTPROC+21
IBONBILL EXTPROC+4~, EXTPROC+16*, EXTPROC+21
>> IBOPV1 VST+4*, VST+6*, PROC+4
>> IBOPV2 VST+4*, VST+6*, PROC+4
>> IBOUT OK2*
IBP DSPPRC+1~, DSPPRC+11*
IBPROCP FILE1+13*, FILE1+21, FILE1+25, FILE1+33, FILE1+34, FILE1+66, FILE1+79, FILE1+90, FILE1+108, FILE1+111
FILE1+115, FILE1+125, FILE1+126, FILE1+142, FILE1+145!
IBPRV DSPPRC+1~, DSPPRC+3*, DSPPRC+4*, DSPPRC+10
IBPRVTYP DSPPRC+1~, DSPPRC+3*, DSPPRC+4*, DSPPRC+10
IBPSC FILE1+38~, FILE1+53*, FILE1+55, FILE1+64, FILE1+66, FILE1+68, FILE1+78
IBPSC2 FILE1+38~, FILE1+66*, FILE1+68, FILE1+78
IBPSCD FILE1+47~, FILE1+64*, FILE1+65, CHECK~, CHECK+2
IBPSCD0 FILE1+47~, FILE1+62*, FILE1+64*
IBPSCDS FILE1+2~, FILE1+62*, FILE1+65*, FILE1+68*, FILE1+80, FILE1+120
IBQUERY EN1~, EN, VST~, VST+4, VST+7, PROC~, PROC+8
IBS ADDMOD+1~, ADDMOD+2*
IBSURF FILE1+2~, FILE1+71*, FILE1+73
IBSURF( FILE1+73*
IBSURF(1 FILE1+127
IBSURF(2 FILE1+129
IBSURF(3 FILE1+130
IBSURF(4 FILE1+131
IBSURF(5 FILE1+132
>> IBTNUM FILE1+138*, FILE1+140
IBTON FILE1+2~, FILE1+70*, FILE1+124, FILE1+127, FILE1+128, FILE1+136, FILE1+137
IBTSTAT FILE1+2~, FILE1+72*, FILE1+136, FILE1+139
IBUSED EN1+2~
IBUSED( FILE1+64, FILE1+65*
IBUSED("D" FILE1+57, FILE1+58*
IBVAL PROC+3~, PROC+8
IBVAL("BDT" PROC+4*
IBVAL("DFN" PROC+4*
IBVAL("EDT" PROC+4*
IBVST FILE1+38~, FILE1+40*, FILE1+43, FILE1+61
IBY ADDMOD~, ADDMOD+2, ADDMOD+4
IBZ CPRT+1~, CPRT+10*, EXTPROC+4~, EXTPROC+16*, EXTPROC+17*
IBZERR EXTPROC+4~
ICPTVDT EN+2~*
IOF ENCHDR
IOSL EN+4, CPRTSCR
IOST SCR
J CPRT+1~, CPRT+10*
L CHDR+2*!
NOD DSPPRC~, DSPPRC+2, DSPPRC+3, DSPPRC+4, DSPPRC+9, DSPPRC+11
>> RET CHECK+1*, CHECK+2*, CHECK+3
STOP FILE1+38~, FILE1+44, FILE1+47*, FILE1+50, FILE1+67*, FILE1+75
TARGET FILE1+47~
TARGET("DILIST" FILE1+50, FILE1+51
TARGET0 FILE1+38~
TARGET0("DILIST" FILE1+44, FILE1+45
TARGET1 FILE1+47~
TARGET1("DILIST" FILE1+64
U FILE1+5, FILE1+6, FILE1+7, FILE1+25, FILE1+87, CPRT+4, CPRT+5, CPRT+7, CPRT+10, DSPPRC+3
, DSPPRC+4, DSPPRC+6, DSPPRC+8, DSPPRC+9, DSPPRC+11, CPT, EXTPROC+9, EXTPROC+11, EXTPROC+12, EXTPROC+14
, EXTPROC+15, EXTPROC+16, EXTPROC+20, EXTPROC+21, EXTPROC+23, EXTPROC+24
>> V VST+4*
X FILE1+4*!, FILE1+13*, FILE1+73*, FILE1+116*, FILE1+128*, FILE1+137*, ADDMOD+2*
Y EN+4*, OK1!, OK+1, OK2OK2+1, OK2+2, FILEFILE1+13, FILE1+113, FILE1+138
, SCR*
Z EXTPROC+4~, EXTPROC+24*
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