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

Package: Integrated Billing

Routine: IBCNSGE


Information

IBCNSGE ;ALB/ESG - Insurance Company EDI Parameter Report ;07-JAN-2005

Source Information

Source file <IBCNSGE.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry Point
EXIT ;
SELECT ; Select insurance companies to include on the report
SEL1 ;
SELX ;
MULT ; select one or many insurance companies
MULTX ;
RANGE ; select a range of insurance company names
RANGEX ;
SORT ; Choose the sorting method
; MRD;IB*2.0*516 - Removed sort option 6, Use VAMC as Billing Provider.
SORTX ;
COMPILE ; Entry point for task; compile scratch global, print, clean-up
COMPX ;
CALC(INS) ; extract insurance data for company ien=INS
CALCX ;
PRINT ; print the report to the specified device
PRINTX ;
HEADER ; page break and report header information
HEADX ;
DEVICE ; Device selection before compile
DEVX ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SEL1+2
Function Call: WRITE
  • Prompt: !!?21,"Insurance Company EDI Parameter Report"
  • Line Location: SEL1+3
Function Call: WRITE
  • Prompt: !!?5,"This report will display the EDI parameter information for selected"
  • Line Location: SEL1+4
Function Call: WRITE
  • Prompt: !?5,"insurance companies. You can specify one company, multiple companies,"
  • Line Location: SEL1+5
Function Call: WRITE
  • Prompt: !?5,"a range of company names, or all companies on file."
  • Line Location: SEL1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL1+24
Function Call: WRITE
  • Prompt: !
  • Line Location: MULT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: RANGE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: RANGE+12
Function Call: WRITE
  • Prompt: !!?5,"Sorry ..... Ending name must come after Starting name"
  • Line Location: RANGE+28
Function Call: WRITE
  • Prompt: !!?5,"Please try again",*7
  • Line Location: RANGE+29
Function Call: WRITE
  • Prompt: !!?5,"*** Sort Criteria ***"
  • Line Location: SORT+3
Function Call: WRITE
  • Prompt: !!!?5,"No Data Found"
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: !,$E($P(DATA,U,1),1,25)
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: ?27,$E($P(DATA,U,2),1,19)
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: ?47,$E($P(DATA,U,3),1,13)
  • Line Location: PRINT+23
Function Call: WRITE
  • Prompt: ","
  • Line Location: PRINT+24
Function Call: WRITE
  • Prompt: $E($P(DATA,U,4),1,2)
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: ?65,$E($P(DATA,U,7),1,8)
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: ?75,$E($P(DATA,U,8),1,8)
  • Line Location: PRINT+27
Function Call: WRITE
  • Prompt: ?84,$E($P(DATA,U,9),1,8)
  • Line Location: PRINT+28
Function Call: WRITE
  • Prompt: ?93,$E($P(DATA,U,10),1,11)
  • Line Location: PRINT+29
Function Call: WRITE
  • Prompt: ?105,$S($E($P(DATA,U,5))="G":"GROUP PLAN",1:$E($P(DATA,U,5),1,10))
  • Line Location: PRINT+32
Function Call: WRITE
  • Prompt: ?116,$E($P(DATA,U,6),1,16)
  • Line Location: PRINT+33
Function Call: WRITE
  • Prompt: !!?5,"*** End of Report ***"
  • Line Location: PRINT+40
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: "All Companies"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: "Selected Companies"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: "Companies [",C1,"] through [",C2,"]"
  • Line Location: HEADER+17
Function Call: WRITE
  • Prompt: ?45," Insurance Company EDI Parameter Report"
  • Line Location: HEADER+20
Function Call: WRITE
  • Prompt: ?TAB,HDR
  • Line Location: HEADER+22
Function Call: WRITE
  • Prompt: !,"Sorted By "
  • Line Location: HEADER+24
Function Call: WRITE
  • Prompt: "Ins Company Name"
  • Line Location: HEADER+25
Function Call: WRITE
  • Prompt: "Prof ID"
  • Line Location: HEADER+26
Function Call: WRITE
  • Prompt: "Inst ID"
  • Line Location: HEADER+27
Function Call: WRITE
  • Prompt: "Electronic Type"
  • Line Location: HEADER+28
Function Call: WRITE
  • Prompt: "Type of Coverage"
  • Line Location: HEADER+29
Function Call: WRITE
  • Prompt: "Use VAMC as Billing Provider"
  • Line Location: HEADER+30
Function Call: WRITE
  • Prompt: ?TAB,HDR
  • Line Location: HEADER+32
Function Call: WRITE
  • Prompt: !,"Only Blank or 'PRNT' Bill ID's = ",$S(IBRBID:"YES",1:"NO")
  • Line Location: HEADER+39
Function Call: WRITE
  • Prompt: !,"'*' indicates the HPID/OEID failed validation checks"
  • Line Location: HEADER+40
Function Call: WRITE
  • Prompt: !?65,"Electron",?75,"Inst",?84,"Prof",?93,"HPID/",?105,"Electronic"
  • Line Location: HEADER+43
Function Call: WRITE
  • Prompt: !,"Insurance Company Name",?27,"Street Address",?47,"City"
  • Line Location: HEADER+44
Function Call: WRITE
  • Prompt: ?65,"Transmit",?76,"ID",?85,"ID",?93,"OEID",?105,"Type",?116,"Coverage Type"
  • Line Location: HEADER+47
Function Call: WRITE
  • Prompt: !,$$RJ^XLFSTR("",132,"=")
  • Line Location: HEADER+48
Function Call: WRITE
  • Prompt: !!!?5,"*** Report Halted by TaskManager Request ***"
  • Line Location: HEADER+53
Function Call: WRITE
  • Prompt: !!!,"This report is 132 columns wide. Please choose an appropriate device.",!
  • Line Location: DEVICE+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(36 - [#36] EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call