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

Package: Integrated Billing

Routine: IBCU62


Information

IBCU62 ;ALB/AAS - UTILITY ROUTINE TO SET BEDSECTION/REVENUE CODES FROM PTF DATA ; 29-OCT-90

Source Information

Source file <IBCU62.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ^DIE  IX1^DIK  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  

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

Package Total Caller Graph
Integrated Billing 2 IBCU6  IBCU63  

Entry Points

Name Comments DBIA/ICR reference
SETREV ;find current active revenue codes for bedsection
CHKREV ;check if billing rate (dgbr) is active, and use with payer.
STORREV ;store revenue code in revenue code file
FILE ;manually file entry, index with ix1^dik to use compiled x-ref
EDITREV ;edit revenue code data.
WRT ;S Z="00"_$P(^DGCR(399.5,DGBR,0),"^",3) W:'$G(IBAUTO) !,DGFUNC,?12,$E(Z,($L(Z)-2),$L(Z)),?24,DGBSLOS,?31,"$",$J(DGAMNT,8,2),?44,DGBS
REVHDR

External References

Name Field # of Occurrence
^DIE EDITREV+4
IX1^DIK FILE+9
$$CPT^ICPTCOD WRT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?65,$P($$CPT^ICPTCOD(+DGPROC),U,2)
  • Line Location: WRT+2
Routine Call
  • DIE
  • Line Location:
    • EDITREV+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGCR(399 - [#399] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] STORREV+2, FILE+3, FILE+4, FILE+5, FILE+7*, FILE+8*, FILE+9, EDITREV+2
^DGCR(399.5 - [#399.5] SETREV+2, SETREV+3, SETREV+4, CHKREV+2, STORREV+1, WRT+1

Label References

Name Line Occurrences
CHKREV SETREV+4
EDITREV STORREV+2
FILE STORREV+3
REVHDR FILE+1, EDITREV+1
STORREV SETREV+4
WRT STORREV+3

Naked Globals

Name Field # of Occurrence
^(0 STORREV+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA STORREV+2*, FILE+4*, FILE+5*, FILE+7, FILE+8, EDITREV+2
>> DA(1 STORREV+1*, FILE+9, EDITREV+4*
>> DGACTDT SETREV+1*, SETREV+2*, SETREV+3, SETREV+4
>> DGAMNT STORREV+1*, FILE+7, EDITREV+4, WRT+2
>> DGBR SETREV+1*, SETREV+4*, CHKREV+2, STORREV+1, WRT+1
>> DGBRN CHKREV+2*, CHKREV+3, CHKREV+4, CHKREV+6
>> DGBS EDITREV+4, WRT+2
>> DGBSI SETREV+2, SETREV+3, SETREV+4, STORREV+2, FILE+7
>> DGBSLOS FILE+2*, FILE+7, EDITREV+3*, EDITREV+4, WRT+2
>> DGDIV FILE+7
DGFND SETREV+1!, SETREV+2, CHKREV+6*
>> DGFUNC STORREV+1*, STORREV+2*, WRT+2
>> DGINPAR CHKREV+3, CHKREV+5
>> DGLL FILE+5*
>> DGPROC FILE+7, WRT+2, REVHDR
>> DGREV SETREV+1*, SETREV+3*, SETREV+4, CHKREV+5
>> DGREV00 CHKREV+5*
>> DGREVHDR FILE+1, EDITREV+1, REVHDR*
>> DIC STORREV+1*, EDITREV+4
>> DIC(0 STORREV+1*
>> DIE EDITREV+4*
>> DIK FILE+9*
>> DR EDITREV+4*
>> IBAUTO WRT+2, REVHDR
>> IBCHK SETREV+4, CHKREV+1*, CHKREV+6*
>> IBIDS( CHKREV+3, CHKREV+4, CHKREV+5, CHKREV+6, FILE+2, EDITREV+3
>> IBIDS(151 SETREV+1
>> IBIFN STORREV+1, STORREV+2, FILE+3, FILE+4, FILE+5, FILE+7, FILE+8, FILE+9, EDITREV+2, EDITREV+4
U CHKREV+6, EDITREV+2, WRT+2
>> X STORREV+1*, STORREV+2, FILE+7
>> Z WRT+1*, WRT+2
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