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

Package: Integrated Billing

Routine: IBCEP7


Information

IBCEP7 ;ALB/TMP - Functions for fac level PROVIDER ID MAINT ;11-07-00

Source Information

Source file <IBCEP7.m>

Entry Points

Name Comments DBIA/ICR reference
HDR ; -- hdr code
INIT ; Initialize
SET1(IBLCT,TEXT,IBCT) ;
DIV(IBD) ; Returns 'ALL/DEFAULT' or div NAME whose ien=IBD
EDIT1 ;
EDIT1Q
EXPND ;
HELP ;
EXIT ;
SEL ;
EDITFAC(IBDA,IBFUNC,IBEFTFL) ; edits ins co facility id (355.92), entry IBDA
FACID(Y) ;
ADD1 ;
ADD1Q
DEL1 ;
DEL1Q
NEXTONE() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Insurance Co: ",$P($G(^DIC(36,+IBDA0,0)),U)
  • Line Location: EDITFAC+20
Function Call: WRITE
  • Prompt: !," Division: ",$$DIV($P(IBDA0,U,5))
  • Line Location: EDITFAC+21
Function Call: WRITE
  • Prompt: !," ID Qualifier: ",$$EXTERNAL^DILFD(355.92,.06,"",$P(IBDA0,U,6))
  • Line Location: EDITFAC+23
Function Call: WRITE
  • Prompt: !," Form Type: ",$$EXTERNAL^DILFD(355.92,.04,"",$P(IBDA0,U,4))
  • Line Location: EDITFAC+24
Function Call: WRITE
  • Prompt: !," ID: ",$P(IBDA0,U,7),!
  • Line Location: EDITFAC+25
Function Call: WRITE
  • Prompt: !
  • Line Location: EDITFAC+37

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] FIND1^DIC
^IBA(355.92 - [#355.92] Classic Fileman Calls,  EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call