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 |  Marked Items |  All
Print Page as PDF
Routine: IBCEU5

Package: Integrated Billing

Routine: IBCEU5


Information

IBCEU5 ;ALB/TMP - EDI UTILITIES (continued) FOR CMS-1500 ;13-DEC-99

Source Information

Source file <IBCEU5.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Integrated Billing 3 ($$FT,$$INPAT)^IBCEF  ($$CKPROV,$$CRED,$$PRVOK,GETPRV)^IBCEU  $$EXPAND^IBTRE  
VA FileMan 3 FILE^DIE  FDA^DILF  ^DIR  
Kernel 1 HOME^%ZIS  

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

Package Total Caller Graph
Integrated Billing 24 IBCCC2  IBCCCB0  IBCEF7  IBCSCH2  IBNCPDP5  IBXS3  IBXS6  IBXS63  
IBXS7  IBXS73  IBXSA21  IBXSAH1  IBXSC3  IBXSC61  IBXSC68  IBXSC712  
IBXSC74  IBXSC79  IBXSC821  IBXSC8H1  IBXX21  IBXX35  LINE PROVIDER  PROVIDER  

Entry Points

Name Comments DBIA/ICR reference
EXTCR(IBPRV) ; Called by trigger on field .02 of file 399.0222
; Also called by trigger on field .02 of file 399.0404 (DEM;432).
; Function returns the first 3 digits of the provider's degree if
; a VA provider or the credentials in file 355.9 if non-VA provider
; IBPRV = vp to file 200 or 355.93
FTPRV(IBIFN,NOASK) ; If form type changes from UB-04 to CMS-1500 or vice
; versa, ask to change provider function to appropriate function for
; form type (ATTENDING = UB-04, RENDERING = CMS-1500)
; IBIFN = ien of bill in file 399
; NOASK (flag) = 1 if change should happen without asking first
TXFERPRV(IBIFN,FT) ; Ask to change the function of the main provider on
; bill IBIFN to the function appropriate to the form type FT
;
PRVCHG(IBIFN,IBFT) ; Change provider type to type consistent with current
; data on bill
CLEANUP(IBIFN,FT)
PRVHELP ; Text for the provider function help
SPECIFIC(IBIFN) ; Display specific provider requirements for the bill IBIFN
HLPTXT ; Helptext for provider function
LINKRX(IBIFN,IBREV) ; Ask for revenue code's RX if not already there
LINKCPT(IBIFN,IBREV) ; Ask for revenue code's CPT
UPDPTR(IBIFN,IBREV,Y) ;
INSFT(IBIFN) ; Returns 1 if form type is UB-04, 0 if CMS-1500 or J430D

External References

Name Field # of Occurrence
HOME^%ZIS PRVHELP+5
FILE^DIE PRVCHG+9, CLEANUP+19, LINKRX+12, UPDPTR+4
FDA^DILF PRVCHG+8, CLEANUP+10, CLEANUP+17, LINKRX+11, UPDPTR+3
^DIR TXFERPRV+7, PRVHELP+8, PRVHELP+12, PRVHELP+15, LINKRX+8, LINKCPT+10, LINKCPT+14, LINKCPT+24
$$FT^IBCEF FTPRV+6, PRVHELP+9, SPECIFIC+2, INSFT+1
$$INPAT^IBCEF SPECIFIC+5
$$CKPROV^IBCEU FTPRV+7, FTPRV+8, SPECIFIC+9
$$CRED^IBCEU EXTCR+5
$$PRVOK^IBCEU SPECIFIC+8
GETPRV^IBCEU SPECIFIC+3
$$EXPAND^IBTRE SPECIFIC+15, LINKCPT+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TXFERPRV+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRVHELP+8
Function Call: WRITE
  • Prompt: !,$P($T(HLPTXT+IBZ),";;",2)
  • Line Location: PRVHELP+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRVHELP+16
Function Call: WRITE
  • Prompt: !,"This bill is ",$S(IBFT=7:"J430D",IBFT=3:"UB-04",1:"CMS-1500"),"/",$S($$INPAT^IBCEF(IBIFN):"Inpatient",1:"Outpatient")
  • Line Location: SPECIFIC+5
Function Call: WRITE
  • Prompt: !!,"The valid provider functions for this bill are:"
  • Line Location: SPECIFIC+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SPECIFIC+16
Function Call: WRITE
  • Prompt: !,"PROCEDURE #"_$P(IBRC,U,11)_" HAS BEEN ASSOCIATED WITH THIS MANUAL CHARGE"
  • Line Location: LINKCPT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LINKCPT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LINKCPT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LINKCPT+14
Function Call: WRITE
  • Prompt: !
  • Line Location: LINKCPT+24
Routine Call
  • %ZIS
  • Line Location:
    • PRVHELP+5
Routine Call
  • DIE
  • Line Location:
    • PRVCHG+9
    • CLEANUP+19
    • LINKRX+12
    • UPDPTR+4
Routine Call
  • DIR
  • Line Location:
    • TXFERPRV+7
    • PRVHELP+8
    • PRVHELP+12
    • PRVHELP+15
    • LINKRX+8
    • LINKCPT+10
    • LINKCPT+14
    • LINKCPT+24

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
399.0222 FDA^DILF
399.042 FDA^DILF

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] PRVCHG+5, CLEANUP+8, CLEANUP+9, CLEANUP+15, CLEANUP+16, LINKRX+2, LINKRX+3, LINKCPT+2, LINKCPT+16, LINKCPT+20
, LINKCPT+21

Label References

Name Line Occurrences
CLEANUP FTPRV+13
PRVCHG FTPRV+12, TXFERPRV+9
SPECIFIC PRVHELP+7
TXFERPRV FTPRV+11
UPDPTR LINKCPT+15, LINKCPT+25

Naked Globals

Name Field # of Occurrence
^( LINKRX+3, LINKCPT+16
^(0 LINKRX+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATT FTPRV+5~, FTPRV+8*, FTPRV+10
CLEAN CLEANUP+1~, CLEANUP+19
CLEAN(399 CLEANUP+4*
>> D0 PRVHELP+7, PRVHELP+9
DA TXFERPRV+3~, PRVCHG+2~, PRVCHG+7*, PRVCHG+8, CLEANUP+1~, CLEANUP+10*, CLEANUP+17*, LINKRX+1~, LINKRX+10*, LINKRX+11
, LINKCPT+1~, UPDPTR+1~, UPDPTR+2*, UPDPTR+3
DA(1 PRVCHG+7*, CLEANUP+10*, CLEANUP+17*, LINKRX+10*, LINKCPT+23*, UPDPTR+2*
DIE TXFERPRV+3~, PRVCHG+2~, CLEANUP+1~
DIR TXFERPRV+3~, TXFERPRV+7!, PRVHELP+2~, PRVHELP+8~!, PRVHELP+12~!, PRVHELP+15~!, LINKRX+1~, LINKRX+8!, LINKCPT+1~, LINKCPT+10!
, LINKCPT+14!, LINKCPT+24!
DIR("?" TXFERPRV+6*, LINKRX+6*, LINKRX+7*, LINKCPT+7*, LINKCPT+8*, LINKCPT+9*, LINKCPT+13*, LINKCPT+22*
DIR("A" TXFERPRV+5*, LINKRX+5*, LINKCPT+10*, LINKCPT+14*, LINKCPT+21*
DIR("B" TXFERPRV+6*, LINKCPT+10*, LINKCPT+14*
DIR("S" LINKRX+4*, LINKCPT+20*
DIR(0 TXFERPRV+6*, PRVHELP+8*, PRVHELP+12*, PRVHELP+15*, LINKRX+4*, LINKCPT+10*, LINKCPT+14*, LINKCPT+20*
DR TXFERPRV+3~
FT FTPRV+5~, FTPRV+6*, FTPRV+10, FTPRV+11, FTPRV+12, FTPRV+13, TXFERPRV~, TXFERPRV+5, TXFERPRV+9, CLEANUP~
, CLEANUP+4, CLEANUP+7, CLEANUP+14
HAVE TXFERPRV+3~, PRVCHG+2~, PRVCHG+3*, PRVCHG+5
IB PRVHELP+2~, PRVHELP+10*, PRVHELP+12*
IB1 PRVHELP+2~, PRVHELP+10*, PRVHELP+11*, PRVHELP+12*, PRVHELP+14
IBCP LINKCPT+1~
IBCP( LINKCPT+18*, LINKCPT+19*
IBFT PRVCHG~, PRVCHG+3, PRVCHG+4, SPECIFIC+1~, SPECIFIC+2*, SPECIFIC+5, SPECIFIC+12
IBIFN FTPRV~, FTPRV+6, FTPRV+7, FTPRV+8, FTPRV+11, FTPRV+12, FTPRV+13, TXFERPRV~, TXFERPRV+9, PRVCHG~
, PRVCHG+5, PRVCHG+7, CLEANUP~, CLEANUP+4, CLEANUP+8, CLEANUP+9, CLEANUP+10, CLEANUP+15, CLEANUP+16, CLEANUP+17
, SPECIFIC~, SPECIFIC+2, SPECIFIC+3, SPECIFIC+5, SPECIFIC+8, SPECIFIC+9, LINKRX~, LINKRX+2, LINKRX+3, LINKRX+10
, LINKCPT~, LINKCPT+2, LINKCPT+15, LINKCPT+16, LINKCPT+20, LINKCPT+21, LINKCPT+23, LINKCPT+25, UPDPTR~, UPDPTR+2
, INSFT~, INSFT+1
IBP LINKCPT+1~, LINKCPT+4*, LINKCPT+10
IBPRV EXTCR~, EXTCR+5, SPECIFIC+1~, SPECIFIC+3
IBPRV( SPECIFIC+10
IBQUIT PRVHELP+2~, PRVHELP+3*, PRVHELP+11*, PRVHELP+12*
IBR SPECIFIC+1~, SPECIFIC+10*, SPECIFIC+12*, SPECIFIC+15
IBRC LINKCPT+1~, LINKCPT+2*, LINKCPT+3, LINKCPT+4, LINKCPT+5, LINKCPT+6, LINKCPT+11*, LINKCPT+12, LINKCPT+15*, LINKCPT+21
IBREV LINKRX~, LINKRX+2, LINKRX+3, LINKRX+10, LINKCPT~, LINKCPT+2, LINKCPT+15, LINKCPT+16, LINKCPT+20, LINKCPT+25
, UPDPTR~, UPDPTR+2
IBRX LINKRX+1~
IBRX( LINKRX+3*
IBZ TXFERPRV+3~, PRVCHG+2~, PRVHELP+2~, PRVHELP+11*, SPECIFIC+1~, SPECIFIC+8*, SPECIFIC+9, SPECIFIC+10, SPECIFIC+15, LINKRX+1~
, LINKRX+10*, LINKCPT+1~, UPDPTR+1~, UPDPTR+2*
IOF PRVHELP+8, PRVHELP+16
IOSL PRVHELP+5, PRVHELP+10, PRVHELP+12
IOST PRVHELP+5, PRVHELP+6
NEED TXFERPRV+3~, PRVCHG+2~, PRVCHG+4*, PRVCHG+8
NOASK FTPRV~, FTPRV+11
ONBILL SPECIFIC+1~, SPECIFIC+9*, SPECIFIC+15
PRV CLEANUP+1~, CLEANUP+9*, CLEANUP+10, CLEANUP+16*, CLEANUP+17
REN FTPRV+5~, FTPRV+7*, FTPRV+10
U LINKRX+2, LINKRX+3, LINKCPT+3, LINKCPT+4, LINKCPT+5, LINKCPT+6, LINKCPT+12, LINKCPT+15, LINKCPT+16, LINKCPT+18
, LINKCPT+19, LINKCPT+20, LINKCPT+21
X TXFERPRV+3~, PRVCHG+2~, CLEANUP+1~, CLEANUP+7*, CLEANUP+8, CLEANUP+9, CLEANUP+14*, CLEANUP+15, CLEANUP+16, PRVHELP+1
, PRVHELP+8~, PRVHELP+12~, PRVHELP+15~, LINKRX+1~, LINKCPT+1~
Y TXFERPRV+3~, TXFERPRV+8, PRVCHG+2~, PRVHELP+8~, PRVHELP+12~, PRVHELP+15~, LINKRX+1~, LINKRX+9, LINKRX+11, LINKCPT+1~
, LINKCPT+11, LINKCPT+15, LINKCPT+25, UPDPTR~, UPDPTR+3
Z TXFERPRV+3~, PRVCHG+2~, PRVCHG+5*, PRVCHG+6, PRVCHG+7, PRVHELP+2~, PRVHELP+4*, PRVHELP+9*, SPECIFIC+1~, LINKRX+1~
, LINKRX+3*, LINKCPT+1~, LINKCPT+16*
Z0 LINKRX+1~, LINKRX+3*, LINKCPT+1~, LINKCPT+16*, LINKCPT+18, LINKCPT+19
Z1 LINKCPT+1~

Marked Items

Name Field # of Occurrence
$T(HLPTXT+IBZ PRVHELP+11, PRVHELP+13
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 |  Marked Items |  All