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

Package: Integrated Billing

Routine: IBTRE5


Information

IBTRE5 ;ALB/AAS - CLAIMS TRACKING EDIT PROVIDER ; 1-SEP-93

Source Information

Source file <IBTRE5.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Integrated Billing 7 $$DAT1^IBOUTL  $$CDT^IBTODD1  LOCKED^IBTRCD1  (,$$EXPAND)^IBTRE  $$TRTP^IBTRE1  $$DGPM^IBTRE3  $$ASK^IBTRE4  
VA Fileman 4 ^DIC  FILE^DICN  ^DIE  IX1^DIK  
Kernel 2 ENDR^%ZISS  $$FMADD^XLFDT  
Registration 1 (FULL,PAUSE)^VALM1  
Scheduling 1 ASK^SDCO3  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Integrated Billing 8 IBTOBI4  IBTRC1  IBTRE1  IBTRPR2  IBTRV1  IBTRV2  IBTRV3  ^IBT(356.94  

Entry Points

Name Comments DBIA/ICR reference
ADD(IBTRN,TYPE) ; -- Add a new provider
NXT
ADDQ
DICSQ
PRVDQ
EDTQ
DTCHKQ
EN(IBTRN) ; -- entry point for protocols
APRVD(IBTRN,IBETYP) ; -- add admitting provider
ENQ ;
SET(IBTRN) ; -- set array
LIST(IBXY) ;List Provider Array
APRVDQ
SETQ
EDT(IBAPR,IBDR) ; -- edit entry
PRVD(IBTRN,IBETYP) ; -- add/edit provider
DTCHK(DA,X) ; -- input transform for 356.94;.01. date not before admission or after discharge
DICS(Y) ; -- called by input transform and screen logic for type of provider
NEW(VA200,IBTRN,TYPE) ; -- file new entry
NEWQ

External References

Name Field # of Occurrence
ENDR^%ZISS APRVD+7, PRVD+6
^DIC NXT+3
FILE^DICN NEW+7
^DIE EDT+7
IX1^DIK NEW+8
$$DAT1^IBOUTL LIST+8
$$CDT^IBTODD1 DTCHK+6
LOCKED^IBTRCD1 EDT+5
^IBTRE %
$$EXPAND^IBTRE LIST+8
$$TRTP^IBTRE1 EN+9
$$DGPM^IBTRE3 NEW+8, SET+2
$$ASK^IBTRE4 PRVD+9
ASK^SDCO3 EN+14
FULL^VALM1 EN+5
PAUSE^VALM1 EN+10, EN+15, APRVD+5, PRVD+4
$$FMADD^XLFDT DTCHK+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Clinical Information comes from the parent package."
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,"Can not add provider to outpatient visits prior to Check-out.",!
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !!,"You can only enter and admitting provider for an admission",!
  • Line Location: APRVD+5
Function Call: WRITE
  • Prompt: !
  • Line Location: APRVD+10
Function Call: WRITE
  • Prompt: !!,"You can only enter a provider for an admission",!
  • Line Location: PRVD+4
Routine Call
  • DIE
  • Line Location:
    • EDT+7
Routine Call
  • DIC
  • Line Location:
    • NXT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^IBT(356.94 - [#356.94] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBT(356 - [#356] EN+7, NEW+5, DTCHK+4
^IBT(356.94 - [#356.94] EN+22, APRVD+8, APRVD+11, NEW+8*, EDT+5, EDT+6, EDT+8, SET+4, LIST+6, DICS+4
, DTCHK+4
^VA(200 - [#200] APRVD+9, LIST+7

Label References

Name Line Occurrences
$$NEW NXT+5
ADD APRVD+11, PRVD+11
ADDQ NXT+3
APRVD EN+22
APRVDQ APRVD+5
DICSQ DICS+3
DTCHKQ DTCHK+3, DTCHK+5, DTCHK+7, DTCHK+8, DTCHK+9
EDT APRVD+10, PRVD+12, NXT+6
EDTQ EDT+5
ENQ EN+10, EN+13
LIST PRVD+9
NXT NXT+6
PRVD EN+26
PRVDQ PRVD+4, PRVD+10
SET PRVD+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA APRVD+2~, PRVD+3~, NEW+2~, NEW+8*, EDT+2~, EDT+4*, EDT+6, DICS+4, DTCHK~, DTCHK+3
, DTCHK+4
DD APRVD+2~, NEW+2~
DIC APRVD+2~, PRVD+3~, ADD+2~, NXT+2*, NXT+3!, NEW+2~, NEW+6*
DIC("A" NXT*
DIC("S" NXT+1*
DIC(0 NXT+2*, NEW+6*
DIE APRVD+2~, PRVD+3~, EDT+2~, EDT+4*
DIK NEW+2~, NEW+6*
DINUM NEW+2~
DLAYGO NEW+2~, NEW+6*
DO APRVD+2~, NEW+2~
DR APRVD+2~, PRVD+3~, EDT+2~, EDT+3*
DT DTCHK+9
DTOUT ADD+2~, ADDQ
>> DUOUT ADDQ
DUTOU ADD+2~
I NEW+2~, LIST+3~, LIST+5*, LIST+6, LIST+8
IBAPR APRVD+2~, APRVD+3*, APRVD+8*, APRVD+9, APRVD+10, NXT+5*, NXT+6, NEW+7*, NEW+8, NEWQ
, EDT~, EDT+4, EDT+5, EDT+8
IBCDT DTCHK+1~, DTCHK+6*, DTCHK+7, DTCHK+8
IBCNT EN+4~, PRVD+9, ADD+3*, NXT, NXT+3, NXT+4*, SET+3*, SET+5*, SET+6
>> IBDA APRVD+8*, APRVD+10, SET+4*, SET+6
IBDGPM EN+4~, EN+7*, EN+20, EN+22, APRVD+5, APRVD+8, APRVD+11, PRVD+4, SET+1~, SET+2*
, SET+4
IBDR EDT~, EDT+3
IBETYP EN+4~, EN+9*, EN+10, EN+13, EN+19, EN+22, EN+26, APRVD~, APRVD+5, PRVD~
, PRVD+2, PRVD+4
IBOK DTCHK+1~, DTCHK+2*, DTCHK+7*, DTCHK+8*, DTCHK+9*, DTCHKQ
IBPRV SET+1~, SET+3*, SET+4*
>> IBQUIT PRVD+10*
>> IBSEL EN+23, PRVD+8*, PRVD+9*, PRVD+10, PRVD+11, PRVD+12, ADDQ*
IBTNOD LIST+3~, LIST+6*, LIST+7, LIST+8
IBTRN EN~, EN+7, EN+9, EN+22, EN+26, APRVD~, APRVD+11, PRVD~, PRVD+1, PRVD+9
, PRVD+11, ADD~, NXT+5, NEW~, NEW+5, NEW+8, SET~, SET+2, DTCHK+1~, DTCHK+4*
, DTCHK+5, DTCHK+6
IBTRND EN+4~, EN+7*, EN+14, EN+15
IBXD LIST+3~, LIST+7*, LIST+8
IBXY EN+4~, PRVD+9, LIST~
IBXY( PRVD+12, SET+6*, LIST+5, LIST+6
IBY DICS+1~, DICS+2*, DICS+3*, DICS+4*, DICSQ
IOINHI APRVD+2~, APRVD+9, PRVD+7
IOINORM APRVD+2~, APRVD+9, PRVD+7
J NEW+2~
SDCOQUIT EN+14!
TYPE ADD~, ADD+4*, NXT, NXT+5, NXT+6, NEW~, NEW+8
U DICS+4
VA200 NEW~, NEW+8
>> VALMBCK EN+6*, EN+16*, EN+27*
X APRVD+7*, PRVD+6*, ADD+2~, NXT+2*, NEW+2~, NEW+5*, DTCHK~, DTCHK+3, DTCHK+7, DTCHK+8
, DTCHK+9
Y ADD+2~, NXT+3, NXT+5, NEW+2~, NEW+7, DICS~, DICS+3, DICS+4
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