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

Package: Integrated Billing

Routine: IBCEF61


Information

IBCEF61 ;ALB/TMP - EDI TRANSMISSION RULES DEFINITION ;28-APR-99

Source Information

Source file <IBCEF61.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Integrated Billing 6 QUIT^IBCEF5  BTYP^IBCEF51  REBLD^IBCEF6  (EN,REBLD)^IBCEF62  $$GETSPEC^IBEFUNC  $$EXPAND^IBTRE  
VA FileMan 6 EN^DDIOL  FILE^DICN  ^DIE  ^DIK  EN1^DIP  ^DIR  
List Manager 2 (FULL,PAUSE)^VALM1  EN^VALM2  
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: 13

Package Total Caller Graph
Integrated Billing 13 IBCE RULE ACTIVE DATES EDIT  IBCE RULE ACTIVE ONLY  IBCE RULE ADD  IBCE RULE BILL TYPE EDIT  IBCE RULE BOTH ACTIVE AND INACTIVE  IBCE RULE BT ADD  IBCE RULE BT EDIT DATES  IBCE RULE DISPLAY  
IBCE RULE DISPLAY ALL  IBCE RULE INS OPT EDIT  IBCE RULE MISC EDIT  IBCEF5  IBCEF62  

Entry Points

Name Comments DBIA/ICR reference
SELRULE(IBRULE) ; Select rule
ACTIVE(IBRULE) ; Edit rules' active/inactive dates
; IBRULE = ien of rule in file 364.4
ACTQ
SCRACT ; Rebld display - only currently active
NOSCR ; Rebld display - inactive and currently active
BILTYP(IBRULE) ; Allow to edit bill types for rule
; IBRULE = ien of rule - file 364.4
BILTYPQ
SEL(VALMY) ; Select one or more bill type restriction entries
; VALMY = passed by reference and returned subscripted by
; entry #(s) in the LM array selected
BTEDIT(IBRULE) ; Edit bill type restriction dates
; IBRULE = ien of the bill type restriction being edited
; (0)= ien of the RULE - file 364.4
BTEQ
BTADD(IBRULE) ; Add new bill type restrictions
; IBRULE = ien of rule entry - file 364.4
BTAQ
INSCO(IBRULE) ; Allow user to edit rule's ins co data
; IBRULE = ien of rule - file 364.4
INSCOQ
MISC(IBRULE) ; Edit other misc fields for the rule
; IBRULE = ien of rule - file 364.4
DISPRUL(IBRULE) ; Display rule selected
; IBRULE = ien of rule - file 364.4
DISPRQ
SUCCESS(IBOK) ; Display msg after add rule
; IBOK = 1 if successful, 0 if not
ADDBTYP(IB,IBDA1) ; Add bill types in IB(364.41) to rule IBDA1
INSADD(IB,IBDA1) ; Add ins co exceptions from entries in
; IB(364.42 - exclude) or IB(364.43 - include) to rule IBDA1
BTDTOK(IBRULE,IBBT,IBDTYP,X) ; Check bill type date is consistent for rule
; IBRULE = ien of rule - file 364.4
; IBBT = ien of bill type in rule IBRULE (optional if check at top level)
; IBDTYP = 1 for active date check, 2 for inactive date check
; X = Value of date being validated
BTDTQ

External References

Name Field # of Occurrence
EN^DDIOL BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24, BTDTOK+28
FILE^DICN ADDBTYP+11, INSADD+8
^DIE ACTIVE+7, BTEDIT+14, INSCO+8, MISC+7
^DIK BTADD+13, INSCO+12, INSCO+17
EN1^DIP DISPRUL+9
^DIR BILTYP+8, SUCCESS+8
QUIT^IBCEF5 INSCO+21
BTYP^IBCEF51 BTADD+9
REBLD^IBCEF6 ACTIVE+9, SCRACT+2, NOSCR+2, INSCO+22, MISC+8
EN^IBCEF62 BILTYP+12
REBLD^IBCEF62 BTEDIT+15, BTADD+15
$$GETSPEC^IBEFUNC ADDBTYP+8, INSADD+6
$$EXPAND^IBTRE BILTYP+8
FULL^VALM1 SELRULE+1, SEL+5, BTADD+3, DISPRUL+3
PAUSE^VALM1 DISPRQ+1
EN^VALM2 SELRULE+4, SEL+7
$$FMTE^XLFDT BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: BILTYP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: BILTYP+8
Function Call: WRITE
  • Prompt: !!,"Bill Type Restriction #"_Z_" - "_$E($G(^TMP("IBCE-BT",$J,Z,0)),5,50),!
  • Line Location: BTEDIT+13
Function Call: WRITE
  • Prompt: !,"Warning ... no insurance companies chosen to "_$S(IB(.07)=1:"in",1:"ex")_"clude"
  • Line Location: INSCO+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISPRUL+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SUCCESS+5
Routine Call
  • DIE
  • Line Location:
    • ACTIVE+7
    • BTEDIT+14
    • INSCO+8
    • MISC+7
Routine Call
  • DIR
  • Line Location:
    • BILTYP+8
    • SUCCESS+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(364.4 - [#364.4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(364.4 - [#364.4] BILTYP+5, BILTYP+10, BTADD+7, BTADD+13, INSCO+6, INSCO+9, INSCO+12, INSCO+17, INSCO+19, ADDBTYP+8
, INSADD+6, BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24, BTDTOK+27
^TMP("IBCE-BT" BTEDIT+13
^TMP("IBCE-BTDX" BTEDIT+11
^TMP("IBCE-RULEDX" SELRULE+5

Label References

Name Line Occurrences
ACTQ ACTIVE+3, ACTIVE+8
ADDBTYP BTADD+14
BILTYPQ BILTYP+3, BILTYP+6
BTAQ BTADD+4
BTDTQ BTDTOK+15, BTDTOK+18
BTEQ BTEDIT+3, BTEDIT+9
INSCOQ INSCO+3
SEL BTEDIT+8
SUCCESS BTADD+16

Naked Globals

Name Field # of Occurrence
^( BILTYP+10, BTADD+7, BTDTOK+27
^(0 BILTYP+10, BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BY DISPRUL+4~, DISPRUL+6*
DA ACTIVE+4~, ACTIVE+5*, BILTYP+4~, BILTYP+5*, BTEDIT+5~, BTEDIT+12*, BTADD+13*, INSCO+4~, INSCO+5*, INSCO+12*
, INSCO+17*, MISC+4~, MISC+5*, DISPRUL+4~, ADDBTYP+5~, INSADD+5~
DA(1 BTEDIT+12*, BTADD+13*, INSCO+12*, INSCO+17*, ADDBTYP+10*, INSADD+7*
DD ADDBTYP+5~, INSADD+5~
DHD DISPRUL+4~, DISPRUL+5*
DIC DISPRUL+4~, DISPRUL+6*, ADDBTYP+5~, ADDBTYP+10*, INSADD+5~, INSADD+7*, INSADD+8!
DIC("DR" ADDBTYP+7*
DIC("P" ADDBTYP+8*, INSADD+6*
DIC(0 ADDBTYP+10*, INSADD+7*
DIE ACTIVE+4~, ACTIVE+5*, BILTYP+4~, BILTYP+5*, BTEDIT+5~, BTEDIT+12*, INSCO+4~, INSCO+5*, MISC+4~, MISC+5*
>> DIK BTADD+13*, INSCO+12*, INSCO+17*
DIOBEG DISPRUL+4~, DISPRUL+7*
DIR BILTYP+8!, SUCCESS+3~, SUCCESS+8!
DIR("A" BILTYP+8*, SUCCESS+6*, SUCCESS+7*, SUCCESS+8*
DIR(0 BILTYP+8*, SUCCESS+4*
DLAYGO ADDBTYP+5~, ADDBTYP+10*, INSADD+5~, INSADD+7*
DO ADDBTYP+5~, INSADD+5~
DR ACTIVE+4~, ACTIVE+6*, BILTYP+4~, BTEDIT+5~, BTEDIT+12*, INSCO+4~, INSCO+7*, MISC+4~, MISC+6*
FLDS DISPRUL+4~, DISPRUL+6*
FR DISPRUL+4~, DISPRUL+5*
IB SELRULE+3~, SELRULE+5*, BILTYP+4~, BTADD+2~, BTADD+9, BTADD+14, INSCO+4~, ADDBTYP~, INSADD~
IB( BILTYP+10*, BTADD+7*, INSCO+9*, INSCO+11, INSCO+15, INSCO+16, INSCO+19, INSCO+20, ADDBTYP+3, ADDBTYP+4
, ADDBTYP+6, ADDBTYP+9, INSADD+4
IB(".07O" INSCO+6*, INSCO+11, INSCO+12, INSCO+16
IB0 INSCO+4~, INSCO+6*, INSCO+7
>> IBACTIVE ACTIVE+9, SCRACT+1*, NOSCR+1*, INSCO+22, MISC+8
IBBT BTEDIT+5~, BTEDIT+11*, BTEDIT+12, BTDTOK~, BTDTOK+18, BTDTOK+20, BTDTOK+22, BTDTOK+24
IBC ADDBTYP+2~, ADDBTYP+4*, ADDBTYP+6, ADDBTYP+9
IBCT BILTYP+4~, BILTYP+9*, BILTYP+10*, BTEDIT+7*, BTADD+2~, BTADD+6*, BTADD+7*
IBDA1 ADDBTYP~, ADDBTYP+8, ADDBTYP+10, INSADD~, INSADD+6, INSADD+7
IBDTYP BTDTOK~, BTDTOK+10, BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24, BTDTOK+28
>> IBI( BILTYP+10*
IBNODE INSADD+3~, INSADD+4*, INSADD+6, INSADD+7
>> IBO BILTYP+9*, BILTYP+10*
>> IBO( BILTYP+10*
IBOK BILTYP+4~, BTADD+2~, BTADD+9, BTADD+11, BTADD+16, SUCCESS~, SUCCESS+6, SUCCESS+7, BTDTOK+8~, BTDTOK+9*
, BTDTOK+15*, BTDTOK+18*, BTDTOK+22*, BTDTOK+24*, BTDTOK+27, BTDTOK+28*, BTDTQ
IBPCK BTDTOK+8~, BTDTOK+10*
IBR SELRULE+3~, SELRULE+5*, SEL+6~
IBRT BILTYP+4~, BILTYP+5*, BILTYP+6, BILTYP+8
IBRULE SELRULE~, SELRULE+2*, SELRULE+5*, ACTIVE~, ACTIVE+3, ACTIVE+5, ACTIVE+8*, BILTYP~, BILTYP+3, BILTYP+5
, BILTYP+10, BTEDIT~, BTEDIT+3, BTEDIT+12, BTADD~, BTADD+4, BTADD+7, BTADD+13, BTADD+14, INSCO~
, INSCO+3, INSCO+5, INSCO+6, INSCO+9, INSCO+12, INSCO+17, INSCO+19, MISC~, MISC+3, MISC+5
, DISPRUL~, DISPRUL+3, DISPRUL+5, BTDTOK~, BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24, BTDTOK+27
>> IBX BILTYP+10*
L DISPRUL+4~, DISPRUL+6*
TO DISPRUL+4~, DISPRUL+5*
U SELRULE+5, BILTYP+5, BILTYP+10, BTADD+7, INSCO+6, INSCO+7, INSCO+9, INSCO+12, BTDTOK+15, BTDTOK+18
, BTDTOK+22, BTDTOK+24, BTDTOK+28
>> VALMBCK ACTQ*, SCRACT+3*, NOSCR+3*, BILTYPQ*, BTEQ*, BTAQ*, INSCOQ*, MISC+9*, DISPRQ*, SUCCESS+9*
VALMY SEL~, BTEDIT+5~, BTEDIT+8
VALMY( SELRULE+5, BTEDIT+11
VALMY(0 BTEDIT+9
X ACTIVE+4~, BILTYP+4~, BTEDIT+5~, INSCO+4~, MISC+4~, SUCCESS+3~, ADDBTYP+5~, ADDBTYP+9*, INSADD+7*, BTDTOK~
, BTDTOK+15, BTDTOK+18, BTDTOK+22, BTDTOK+24, BTDTOK+28
>> XQORNOD(0 SELRULE+4, SEL+7
Y ACTIVE+4~, ACTIVE+8, BILTYP+4~, BTEDIT+5~, INSCO+4~, MISC+4~, SUCCESS+3~, ADDBTYP+5~
Z ACTIVE+4~, BILTYP+4~, BILTYP+10*, SEL+4~, BTEDIT+5~, BTEDIT+11*, BTEDIT+13, BTADD+2~, BTADD+6*, BTADD+7*
, BTADD+12~, BTADD+13*, INSCO+4~, INSCO+12*, INSCO+17*, MISC+4~, ADDBTYP+2~, ADDBTYP+6*, ADDBTYP+7, INSADD+3~
, INSADD+4*, BTDTOK+8~, BTDTOK+15*, BTDTOK+18*, BTDTOK+22*, BTDTOK+24*, BTDTOK+26*, BTDTOK+27*
Z0 ACTIVE+4~, BILTYP+4~, INSCO+4~, INSCO+12*, INSCO+17*, MISC+4~, ADDBTYP+2~, ADDBTYP+6*, ADDBTYP+7, INSADD+3~
, INSADD+4*, INSADD+7, BTDTOK+27*, BTDTOK+28
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