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

Package: Integrated Billing

Routine: IBCSC4C


Information

IBCSC4C ;ALB/MJB - MCCR PTF SCREEN (CONT.) ;24 FEB 9:43

Source Information

Source file <IBCSC4C.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 3 ($$BDATE,$$ICD0,$$ICD9)^IBACSV  (D,P)^IBCSC4A  3^IBCSCH1  
VA FileMan 2 ^%DT  ^DIC  

Entry Points

Name Comments DBIA/ICR reference
SETP
SETD
SELP
PD
SELD
CHP
CHD
SEXSCR(IBZ,DFN) ;
DT
PAR
DIC
S

External References

Name Field # of Occurrence
^%DT PD
^DIC DIC
$$BDATE^IBACSV CHP+10, CHD+9
$$ICD0^IBACSV SELP+5
$$ICD9^IBACSV SELD+5
D^IBCSC4A CHD+5
P^IBCSC4A CHP+5
3^IBCSCH1 CHP+1, CHD+1, PAR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SELP+0
Function Call: WRITE
  • Prompt: !,"ICD PROCEDURE CODE (",I,"): "
  • Line Location: SELP+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SELP+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SELD+0
Function Call: WRITE
  • Prompt: !,"DIAGNOSIS CODE (",I,"): "
  • Line Location: SELD+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SELD+6
Function Call: WRITE
  • Prompt: " ...Deleted"
  • Line Location: CHP+3
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: CHP+5
Function Call: WRITE
  • Prompt: " ...Deleted"
  • Line Location: CHD+3
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: CHD+5
Function Call: WRITE
  • Prompt: !?7,"You may only choose codes found in PTF record!"
  • Line Location: PAR+0
Routine Call
  • DIC
  • Line Location:
    • DIC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD9 - [#80] Classic Fileman Calls
^ICD0 - [#80.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] SETP+4*, SETP+5*, SETD+4*, PD*, CHP+3*, CHP+4*, CHP+5*, CHP+9, CHP+14*, CHD+3*
, CHD+4*, CHD+5*, CHD+13*, DT*, S*
^DPT - [#2] SEXSCR+5
^IBE(350.9 - [#350.9] CHP+6, CHD+6
^UTILITY($J CHP+5, CHD+5, DT

Label References

Name Line Occurrences
CHD SELD+7
CHP SELP+7
DIC CHP+13, CHD+12
DT CHP+5
PAR CHP+6, CHD+6
PD SELP+8, CHP+14
S SETP, SETD, SELP, SELP+9, SELD, SELD+7

Naked Globals

Name Field # of Occurrence
^( CHP+5, CHD+5
^("C" SETP+4*, CHP+3*, CHP+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT PD*
>> %DT("A" PD*
DFN SEXSCR~, SEXSCR+4, SEXSCR+5
>> DIC CHP+13*, CHD+12*
>> DIC("S" CHP+12*, CHD+11*
>> DIC(0 DIC*
DTIME SELP+6, SELD+6
>> F SETP+1*, SETP+2*, SETP+4*, SETD+1*, SETD+2*, SETD+4*
>> I SELP*, SELP+3*, SELP+4, PD, SELD*, SELD+3*, SELD+4, CHP+1*, CHP+2, CHP+3
, CHP+4, CHP+5*, CHP+8, CHP+9, CHP+13*, CHP+14, CHD+1*, CHD+2, CHD+3, CHD+4
, CHD+5*, CHD+8, CHD+12*, CHD+13, DT, PAR*
>> IB("C" SETP+3, SETD+3, SELP+4, PD*, SELD+4, CHP+2, CHP+3*, CHD+2, CHD+3*, S*
IB3 SELP+8, PD!, CHD+5*
>> IB4 CHD+5*
>> IB5 CHP+5*, DT
>> IB6( SETD+1*, SETD+2*, SETD+4, CHD+3*
>> IB6(5 SETD+2
>> IB7( SETP+1*, SETP+2*, SETP+4, CHP+3*
>> IB7(3 SETP+2
>> IB8 SETD*, SETD+1*, SETD+2*
>> IB9 SETP*, SETP+1*, SETP+2*
IBCODSEX SEXSCR+1~, SEXSCR+2*, SEXSCR+3, SEXSCR+7
IBDATE CHP~, CHP+9*, CHP+10*, CHP+11, CHD~, CHD+9*, CHD+10
>> IBDIA SETD
>> IBI CHP+8*, CHP+13, CHD+8*, CHD+12
>> IBIFN SETP+4, SETP+5, SETD+4, PD, CHP+3, CHP+4, CHP+5, CHP+9, CHP+10, CHP+14
, CHD+3, CHD+4, CHD+5, CHD+9, CHD+13, DT, S
>> IBNC SETP+1, SETP+2, SETD+1, SETD+2
>> IBP SETP
IBPTSEX SEXSCR+1~, SEXSCR+5*, SEXSCR+6*, SEXSCR+7
>> IBPX SELP+4*, SELP+5, CHP+3*
>> IBPY SELD+4*, SELD+5, SELD+6, CHD+3*
IBQ SELP+1~, SELP+2*, SELP+3, SELP+6*, SELD+1~, SELD+2*, SELD+3, SELD+6*
>> IBUC SELP+5, SELD+5
>> IBWE( SETP+2, SETD+2
>> IBWE(0 SETP+2
>> IBWO( SETP+1, SETD+1
>> IBWO(0 SETP+1
IBZ SELP+1~, SELP+5*, SELD+1~, SELD+5*, SEXSCR~, SEXSCR+2
ICDVDT CHP~, CHP+11*, CHD~, CHD+10*
IOSL SELP, SELD
>> M CHP+5, CHD+5, DT
>> S CHP+5, CHD+5
U SETP+1, SETP+2, SETP+3, SETP+4, SETP+5, SETD+1, SETD+2, SETD+3, SETD+4, SELP+4
, SELP+5, PD, SELD+4, SELD+5, CHP+2, CHP+3, CHP+4, CHP+5, CHP+6, CHP+9
, CHP+14, CHD+2, CHD+3, CHD+4, CHD+5, CHD+6, CHD+13, SEXSCR+2, SEXSCR+5, DT
>> X SELP+6*, SELD+6*, CHP+1, CHP+2, CHP+3, CHP+4, CHP+5, CHP+7*, CHP+14*, CHD+1
, CHD+2, CHD+3, CHD+4, CHD+5, CHD+7*, CHD+13*, PAR
>> Y PD, CHP+13, CHP+14, CHD+12, CHD+13
Info |  Source |  Call 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