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

Package: Integrated Billing

Routine: IBCSC4E


Information

IBCSC4E ;ALB/ARH - ADD/ENTER PTF/OE DIAGNOSIS ;3/2/94

Source Information

Source file <IBCSC4E.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 5 ^DIE  ^DIK  CLEAN^DILF  $$GET1^DIQ  ^DIR  
Integrated Billing 4 ($$BDATE,$$DRG,$$DRGTD,$$ICD9)^IBACSV  $$FT^IBCEF  $$ADD^IBCSC4D  (PTFDXDT,SETPOA)^IBCSC4F  
Kernel 1 $$FMTE^XLFDT  

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 IBCSC4D  

Entry Points

Name Comments DBIA/ICR reference
DXINPT(IBIFN) ; display and ask user to select PTF diagnosis
PTFASK ;
PTFASK1
PTF ;
ITPTF ;
PTFADD(IBIFN,LIST) ;
PTFDSP(IBIFN) ; display PTF diagnosis within date range of the bill
; Output: ^TMP($J,"IBDX") as defined by PTFDXDT^IBCSC4F and
; ^TMP($J,"IBDX","S",x) = DIAGNOSIS w/x=selection identifer for a dx
DELALL(IBIFN) ; ask/delete all diagnosis on a bill, including all CPT associated Diagnosis
POAASK ; POA edit

External References

Name Field # of Occurrence
^DIE DELALL+11, POAASK+7
^DIK DELALL+16
CLEAN^DILF POAASK+10
$$GET1^DIQ POAASK+7
^DIR PTFASK1+5, PTFASK1+8, PTFDSP+47, DELALL+6, POAASK+5
$$BDATE^IBACSV PTFDSP+8
$$DRG^IBACSV PTFDSP+38
$$DRGTD^IBACSV PTFDSP+38
$$ICD9^IBACSV PTFADD+4, PTFDSP+31
$$FT^IBCEF DXINPT+4
$$ADD^IBCSC4D PTFADD+4
PTFDXDT^IBCSC4F PTFDSP+12
SETPOA^IBCSC4F DXINPT+4
$$FMTE^XLFDT PTFDSP+21, PTFDSP+40

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PTFASK+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: PTFADD+4
Function Call: WRITE
  • Prompt: @IOF,"=============================== Diagnosis Screen ==============================="
  • Line Location: PTFDSP+45
Function Call: WRITE
  • Prompt: !
  • Line Location: PTFDSP+47
Function Call: WRITE
  • Prompt: !
  • Line Location: DELALL+3
Function Call: WRITE
  • Prompt: " .... deleted"
  • Line Location: DELALL+17
Function Call: WRITE
  • Prompt: !
  • Line Location: POAASK+2
Routine Call
  • DIE
  • Line Location:
    • DELALL+11
    • POAASK+7
Routine Call
  • DIR
  • Line Location:
    • PTFASK1+5
    • PTFASK1+8
    • PTFDSP+47
    • DELALL+6
    • POAASK+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(362.3 - [#362.3] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] PTFDSP+9, PTFDSP+10, DELALL+9, DELALL+10
^DIC(42.4 - [#42.4] PTFDSP+22
^IBA(362.3 - [#362.3] PTF+6, PTFADD+4, PTFDSP+32, DELALL+1, DELALL+14, DELALL+15, POAASK+6, POAASK+7
^TMP($J DXINPT+5!, PTF+1, PTF+2, PTF+3, PTFADD+1, PTFADD+3, PTFDSP+6!, PTFDSP+12, PTFDSP+14, PTFDSP+17
, PTFDSP+28, PTFDSP+30, PTFDSP+31, PTFDSP+35*

Label References

Name Line Occurrences
ITPTF PTFASK1+7
PTF PTFASK+1
PTFADD DXINPT+2
PTFASK DXINPT+2
PTFASK1 PTFASK1+9
PTFDSP DXINPT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA DELALL+8~, DELALL+11*!, DELALL+16*!, POAASK+7*, POAASK+9!
DA(1 DELALL+11*
DIC DELALL+8~
DIE DELALL+8~, DELALL+11*!, POAASK+6*, POAASK+9!
DIK DELALL+3~, DELALL+16*!
DIR PTFASK+1~, PTFASK1+5!, PTFASK1+8!, PTFDSP+4~, DELALL+3~, DELALL+6!, POAASK+1~, POAASK+5!, POAASK+9!
DIR("?" PTFASK1+1*, PTFASK1+2*, PTFASK1+3*, PTFASK1+4*, DELALL+4*, POAASK+3*
DIR("??" DELALL+4*
DIR("A" PTFASK1*, PTFASK1+7*, DELALL+5*, POAASK+4*
DIR("B" PTFASK1+7*, DELALL+6*, POAASK+5*
DIR(0 PTFASK1+5*, PTFASK1+8*, PTFDSP+47*, DELALL+6*, POAASK+5*
DIRUT PTFASK+1~, PTFASK1+5, PTFASK1+8, DELALL+3~, POAASK+1~
DR DELALL+8~, DELALL+11*!, POAASK+7*, POAASK+9!
DT PTFDSP+41
DTOUT DELALL+3~, POAASK+1~
DUOUT DELALL+3~, POAASK+1~
DX POAASK+1~, POAASK+7*
IB0 PTFDSP+3~, PTFDSP+9*, PTFDSP+10
IB1 ITPTF+1~, ITPTF+6*, ITPTF+7, ITPTF+8*, ITPTF+9
IB2 ITPTF+1~, ITPTF+4*, ITPTF+5, ITPTF+6*, ITPTF+7, ITPTF+8*, ITPTF+10, ITPTF+11, ITPTF+12, ITPTF+13
IB3 ITPTF+1~, ITPTF+8*, ITPTF+10, ITPTF+12, ITPTF+13
IBA ITPTF+1~, ITPTF+2*, ITPTF+3, ITPTF+13*, PTFDSP+3~, PTFDSP+18*, PTFDSP+19*, PTFDSP+32
IBC PTFDSP+3~, PTFDSP+18*, PTFDSP+19*, PTFDSP+26, PTFDSP+28, PTFDSP+34, PTFDSP+37, PTFDSP+38
IBCD PTFADD+1~, PTFADD+2*, PTFADD+3
IBCNT PTFDSP+3~, PTFDSP+14*, PTFDSP+25*, PTFDSP+26*, PTFDSP+28*, PTFDSP+34*, PTFDSP+37*, PTFDSP+38*, PTFDSP+40*, PTFDSP+41*
, PTFDSP+43*, PTFDSP+46*
IBDATE PTFDSP+4~, PTFDSP+8*, PTFDSP+31, PTFDSP+38
IBDSCH PTFDSP+3~, PTFDSP+12*, PTFDSP+40, PTFDSP+41
IBDT PTFDSP+3~, PTFDSP+17*, PTFDSP+18*, PTFDSP+19*, PTFDSP+21
IBDX PTFADD+1~, PTFADD+3*, PTFADD+4, PTFDSP+4~, PTFDSP+31*, PTFDSP+32, PTFDSP+35, DELALL+8~, DELALL+14*, DELALL+15
IBDXCNT PTFDSP+3~, PTFDSP+30*, PTFDSP+32*
IBDXI DELALL+8~, DELALL+15*, DELALL+16
IBFDT PTFDSP+3~, PTFDSP+10*, PTFDSP+12
IBI ITPTF+1~, ITPTF+3*, PTFADD+1~, PTFADD+2*, PTFDSP+3~, PTFDSP+30*, PTFDSP+31, PTFDSP+46*
IBID PTFDSP+4~, PTFDSP+32*, PTFDSP+33, PTFDSP+35
IBIFN DXINPT~, DXINPT+2, DXINPT+4, PTF+6, PTFADD~, PTFADD+1, PTFADD+4, PTFDSP~, PTFDSP+8, PTFDSP+9
, PTFDSP+10, PTFDSP+32, DELALL~, DELALL+1, DELALL+4, DELALL+9, DELALL+10, DELALL+11, DELALL+13, POAASK+6
POAASK+7
IBJ ITPTF+1~, ITPTF+7*, ITPTF+8*
IBLABEL PTFDSP+3~, PTFDSP+18*, PTFDSP+19*, PTFDSP+21, PTFDSP+28
IBLIST DXINPT+1~, DXINPT+2, PTFASK+1!, PTFASK1+7*, PTFASK1+8!, PTFASK1+9!
IBLN PTFDSP+3~, PTFDSP+21*, PTFDSP+22*, PTFDSP+23*, PTFDSP+26, PTFDSP+33*, PTFDSP+34, PTFDSP+37*, PTFDSP+38*
IBMAXMV PTFDSP+4~*, PTFDSP+14, PTFDSP+15*, PTFDSP+43
IBMCNT PTFDSP+3~, PTFDSP+14*, PTFDSP+15*, PTFDSP+18
IBMDRG PTFDSP+4~, PTFDSP+17*, PTFDSP+37, PTFDSP+38
IBMDT PTFDSP+3~, PTFDSP+14*, PTFDSP+17, PTFDSP+28, PTFDSP+30, PTFDSP+31
IBMV PTFDSP+3~, PTFDSP+17*, PTFDSP+22, PTFDSP+23
IBN PTFDSP+3~, PTFDSP+14*, PTFDSP+17, PTFDSP+18, PTFDSP+19, PTFDSP+28, PTFDSP+30, PTFDSP+31, PTFDSP+37
IBNUM PTF+1~, PTF+4*, PTF+5
IBON PTFDSP+4~, PTFDSP+32*, PTFDSP+33
IBORD PTF+1~*, PTF+4*, PTF+5
IBPOA PTFDSP+4~, PTFDSP+31*, PTFDSP+33
IBPROC DELALL+8~, DELALL+9*, DELALL+10, DELALL+11
IBPROCD DELALL+8~, DELALL+10*
IBPTF PTFDSP+3~, PTFDSP+9*, PTFDSP+12
IBPTFDX DXINPT+1~, PTFASK+1, PTF+1!*, PTF+6*
IBPTFDX( PTF+5*, ITPTF+7, ITPTF+11, ITPTF+12
IBTDT PTFDSP+3~, PTFDSP+10*, PTFDSP+12, PTFDSP+40, PTFDSP+41
IBTF PTFDSP+3~, PTFDSP+9*, PTFDSP+12
IBU PTFDSP+3~, PTFDSP+10*
IBW PTFDSP+3~, PTFDSP+6*, PTFDSP+25, PTFDSP+26, PTFDSP+28, PTFDSP+34, PTFDSP+37, PTFDSP+38, PTFDSP+40, PTFDSP+41
IBX PTF+1~, PTF+2*, PTF+3, PTF+4, ITPTF+1~, ITPTF+2*, ITPTF+3, PTFADD+1~
IBXRF DELALL+8~, DELALL+13*, DELALL+14, DELALL+15
IBY PTF+1~, ITPTF+1~, ITPTF+3*, ITPTF+4, ITPTF+6*, ITPTF+7*, ITPTF+8, PTFADD+1~, PTFDSP+4~, PTFDSP+31*
, PTFDSP+33
IBZ PTF+1~, PTF+3*, PTF+6, ITPTF+1~, ITPTF+4*, ITPTF+5, ITPTF+6*, ITPTF+7
IOF PTFDSP+45
LIST PTFADD~, PTFADD+1, PTFADD+2
ORD POAASK+1~, POAASK+6*, POAASK+7
>> POAEDIT DXINPT+2*
U PTFADD+4, PTFDSP+9, PTFDSP+10, PTFDSP+12, PTFDSP+17, PTFDSP+22, PTFDSP+23, PTFDSP+31, PTFDSP+33, PTFDSP+38
, DELALL+10
X PTFASK+1~, PTFASK1+7*, ITPTF+2, ITPTF+3*, ITPTF+4, ITPTF+5!, ITPTF+6!, ITPTF+8, ITPTF+9!, ITPTF+10!
ITPTF+11!, ITPTF+12!, PTFDSP+4~, DELALL+3~, POAASK+1~
X( PTFDSP+25*, PTFDSP+26*, PTFDSP+28*, PTFDSP+34*, PTFDSP+37*, PTFDSP+38*, PTFDSP+40*, PTFDSP+41*, PTFDSP+43*, PTFDSP+46
X("A" PTFDSP+43
Y PTFASK+1~, PTFASK1+5, PTFASK1+7, PTFASK1+9, PTFDSP+4~, PTFDSP+46, DELALL+3~, DELALL+6, POAASK+1~, POAASK+5
POAASK+6
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