Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(364.4 - [#364.4] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call