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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCOPP3

Package: Integrated Billing

Routine: IBCOPP3


Information

IBCOPP3 ;ALB/NLR - LIST INS. PLANS BY CO. (PRINT) ; 20-OCT-2015

Source Information

Source file <IBCOPP3.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 NOW^%DTC  ^DIR  
Integrated Billing 1 $$DAT2^IBOUTL  

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

Package Total Caller Graph
Integrated Billing 1 IBCOPP2  

Entry Points

Name Comments DBIA/ICR reference
COMP(COLEP,COLFTF,TRUNCPT) ; Print Company header
; Input: IBC - ^TMP($J,"PR",IBC), see documentation above
; IBPAG - Current Page Counter
; IBHDT - Current date/time (external format)
; IBAIA - 0 - Only select Inactive Insurance Companies
; 1 - Only select Active Insurance Companies
; 2 - Select both Active and Inactive Insurance Companies
; IBAIPA - 0 - Only select Inactive Insurance Company Plans
; 1 - Only select Active Insurance Company Plans
; 2 - Select both Active and Inactive Insurance Company Plans
; IBAPA - 0 - List Insurance Plans by Insurance Company
; 1 - List Insurance Plans by Insurance Company with
; Subscriber information
; Output: COLEP - Starting Column Position of the Electronic Plan Type Col
; COLFTF - Starting Column Position of the FTF Col
; TRUNCPT - # of characters to truncate from the Plan Type field (if any)
; IBPAG - Updated Page Counter
PLAN(COLEP,COLFTF,TRUNCPT) ; Print Group Plan information.
; Input: COLEP - Starting Column Position of the Electronic Plan Type Col
; COLFTF - Starting Column Position of the FTF Col
; TRUNCPT - # of characters to truncate from the Plan Type field (if any)
; IBPD - ^TMP($J,"PR",IBC,IBPTR), see documentation above
; IBAPA - 0 - List Insurance Plans by Insurance Company
; 1 - List Insurance Plans by Insurance Company with
; Subscriber information
; ^TMP($J,"PR",IBI,IBPTR))- B1^B2^..^B6 where
; IBI - Counter of # of Insurance Companies included
; IBPTR- Group Plan IEN
; B1 - Group Number, field 355.3,2.02
; B2 - Group Name, field 355.3,2.01
; B3 - Group Plan Timely Filing Time frame (max len 21)
; B4 - Electronic Plan Type (max length 26)
; B5 - Type of Plan (max length 40)
; B6 - Total # of subscribers for Group Plan
SUBHDR ; Print the Subscriber Header Line
; IB*2.0*549 New Method
SUBS ; Print subscriber information.
; IB*2.0*549 Changed fields displayed
; Input: IBSD - Subscriber detail - ^TMP($J,"PR",IBI,IBP,IBS)
; Subscriber ID to display more characters.
PAUSE ; Pause for screen output.
; Input: None
; Output: IBQUIT - 1 if user timed out or entered '^'
EXCEL ; Output in excel format

External References

Name Field # of Occurrence
NOW^%DTC IBCOPP3+69, EXCEL+2
^DIR PAUSE+6
$$DAT2^IBOUTL IBCOPP3+70, EXCEL+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?30,"*** End of Report ***"
  • Line Location: IBCOPP3+66
Function Call: WRITE
  • Prompt: !!?90,"Number of Plans Selected = ",$P(IBC,"^",7)
  • Line Location: IBCOPP3+93
Function Call: WRITE
  • Prompt: !?76,"Total Subscribers Under Selected Plans = ",$P(IBC,"^",8)
  • Line Location: IBCOPP3+94
Function Call: WRITE
  • Prompt: !!?30,"*** End of Report ***"
  • Line Location: IBCOPP3+98
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: COMP+20
Function Call: WRITE
  • Prompt: !,"LIST OF PLANS BY INSURANCE COMPANY"
  • Line Location: COMP+22
Function Call: WRITE
  • Prompt: ?IOM-34,IBHDT,?IOM-10,"Page: ",IBPAG
  • Line Location: COMP+24
Function Call: WRITE
  • Prompt: !,$TR($J(" ",IOM)," ","-")
  • Line Location: COMP+25
Function Call: WRITE
  • Prompt: !,"+ =>INDIV. PLAN * => INACTIVE"
  • Line Location: COMP+28
Function Call: WRITE
  • Prompt: !,"Filters: ",$S(IBAI=1:"All",1:"Selected")," Insurances"
  • Line Location: COMP+29
Function Call: WRITE
  • Prompt: ", ",$S(IBAPL=1:"All",1:"Selected")," Group Plans",!
  • Line Location: COMP+30
Function Call: WRITE
  • Prompt: !?1,$P(IBC,"^",1)
  • Line Location: COMP+33
Function Call: WRITE
  • Prompt: !?1,$P(IBC,"^",2)
  • Line Location: COMP+34
Function Call: WRITE
  • Prompt: ?45,"FTF = ",$P(IBC,"^",4)
  • Line Location: COMP+35
Function Call: WRITE
  • Prompt: ?105,"GROUP PLAN TOTAL= ",$P(IBC,"^",5)
  • Line Location: COMP+36
Function Call: WRITE
  • Prompt: !?1,$P(IBC,"^",3)
  • Line Location: COMP+37
Function Call: WRITE
  • Prompt: ?105,"SUBSCRIBER TOTAL= ",$P(IBC,"^",6)
  • Line Location: COMP+38
Function Call: WRITE
  • Prompt: !?5,"GROUP NUMBER",?32,"GROUP NAME",?62,"TYPE OF PLAN"
  • Line Location: COMP+50
Function Call: WRITE
  • Prompt: ?COLEP,"ELEC PLAN",?COLFTF,"FTF"
  • Line Location: COMP+51
Function Call: WRITE
  • Prompt: !?5,$P(IBPD,"^",1)
  • Line Location: PLAN+20
Function Call: WRITE
  • Prompt: ?32,$P(IBPD,"^",2)
  • Line Location: PLAN+21
Function Call: WRITE
  • Prompt: ?62,XX
  • Line Location: PLAN+24
Function Call: WRITE
  • Prompt: ?COLEP,$P(IBPD,"^",4)
  • Line Location: PLAN+25
Function Call: WRITE
  • Prompt: ?COLFTF,$P(IBPD,"^",3)
  • Line Location: PLAN+26
Function Call: WRITE
  • Prompt: !?10,"SUBSCRIBERS = ",$P(IBPD,"^",6)
  • Line Location: PLAN+27
Function Call: WRITE
  • Prompt: !?10,"SUBSCRIBER NAME",?35,"SSN",?43,"DOB",?53,"SUB ID",?76,"EFF",?86,"EXP"
  • Line Location: SUBHDR+2
Function Call: WRITE
  • Prompt: ?96,"WHO",?102,"PAT ID"
  • Line Location: SUBHDR+3
Function Call: WRITE
  • Prompt: !?10,$P(IBSD,"^",1),?35,$P(IBSD,"^",2),?43,$P(IBSD,"^",3),?53,$P(IBSD,"^",4)
  • Line Location: SUBS+9
Function Call: WRITE
  • Prompt: ?76,$P(IBSD,"^",5),?86,$P(IBSD,"^",6),?96,$P(IBSD,"^",7),?102,$P(IBSD,"^",8)
  • Line Location: SUBS+10
Function Call: WRITE
  • Prompt: !,"LIST OF PLANS BY INSURANCE COMPANY"
  • Line Location: EXCEL+6
Function Call: WRITE
  • Prompt: " Run On: ",IBHDT
  • Line Location: EXCEL+8
Function Call: WRITE
  • Prompt: !,"+ =>INDIV. PLAN * => INACTIVE"
  • Line Location: EXCEL+12
Function Call: WRITE
  • Prompt: !,"Filters: ",$S(IBAI=1:"All",1:"Selected")," Insurances"
  • Line Location: EXCEL+13
Function Call: WRITE
  • Prompt: ", ",$S(IBAPL=1:"All",1:"Selected")," Group Plans",!
  • Line Location: EXCEL+14
Function Call: WRITE
  • Prompt: !,HDR
  • Line Location: EXCEL+19
Function Call: WRITE
  • Prompt: !,IBC_U_IBPD
  • Line Location: EXCEL+24
Function Call: WRITE
  • Prompt: !,IBC_U_IBPD_U_IBSD
  • Line Location: EXCEL+27
Routine Call
  • DIR
  • Line Location:
    • PAUSE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J IBCOPP3+72, IBCOPP3+75, IBCOPP3+81, IBCOPP3+84, IBCOPP3+85, EXCEL+21, EXCEL+23, EXCEL+26

Label References

Name Line Occurrences
COMP IBCOPP3+73, IBCOPP3+76, IBCOPP3+91, SUBS+6
EXCEL IBCOPP3+65
PAUSE IBCOPP3+76, IBCOPP3+90, IBCOPP3+95, SUBS+5
PLAN IBCOPP3+77, IBCOPP3+92, SUBS+7
SUBHDR IBCOPP3+82, SUBS+8
SUBS IBCOPP3+86

Naked Globals

Name Field # of Occurrence
^( IBCOPP3+75

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% IBCOPP3+63~, IBCOPP3+70, EXCEL+3
COLEP IBCOPP3+63~, IBCOPP3+73, IBCOPP3+76, IBCOPP3+77, IBCOPP3+91, IBCOPP3+92, COMP~, COMP+18!, COMP+42*, COMP+43
, COMP+48*, COMP+49, COMP+51, PLAN~, PLAN+25, SUBS+4~, SUBS+6, SUBS+7
COLFTF IBCOPP3+63~, IBCOPP3+73, IBCOPP3+76, IBCOPP3+77, IBCOPP3+91, IBCOPP3+92, COMP~, COMP+18!, COMP+43*, COMP+44*
, COMP+49*, COMP+51, PLAN~, PLAN+26, SUBS+4~, SUBS+6, SUBS+7
COLPID IBCOPP3+63~
DIR PAUSE+3~, PAUSE+6!
DIR(0 PAUSE+5*
DIRUT PAUSE+3~, PAUSE+7
DTOUT PAUSE+3~
DUOUT PAUSE+3~, PAUSE+7
HDR EXCEL+1~, EXCEL+16*, EXCEL+17*, EXCEL+18*, EXCEL+19
>> IBAI COMP+29, EXCEL+13
IBAIA IBCOPP3+100!
IBAIPA IBCOPP3+100!
>> IBAO IBCOPP3+64
IBAPA IBCOPP3+76, IBCOPP3+80, IBCOPP3+100!, COMP+23, EXCEL+7, EXCEL+18, EXCEL+24
>> IBAPL COMP+30, EXCEL+14
IBC IBCOPP3+72*, IBCOPP3+93, IBCOPP3+94, IBCOPP3+100!, COMP+19, COMP+33, COMP+34, COMP+35, COMP+36, COMP+37
, COMP+38, COMP+46, COMP+47, COMP+48, COMP+49, EXCEL+1~, EXCEL+21*, EXCEL+22*, EXCEL+24, EXCEL+27
IBHDT IBCOPP3+70*, IBCOPP3+100!, COMP+24, EXCEL+1~, EXCEL+3*, EXCEL+8
IBI IBCOPP3+68*, IBCOPP3+72*, IBCOPP3+75, IBCOPP3+81, IBCOPP3+84, IBCOPP3+85, IBCOPP3+100!, EXCEL+20*, EXCEL+21*, EXCEL+23
, EXCEL+26
IBJJ IBCOPP3+100!, PAUSE+3~
IBP IBCOPP3+74*, IBCOPP3+75*, IBCOPP3+81, IBCOPP3+84, IBCOPP3+85, IBCOPP3+100!, EXCEL+1~, EXCEL+22*, EXCEL+23*, EXCEL+26
IBPAG IBCOPP3+68*, IBCOPP3+100!, COMP+20, COMP+21*, COMP+24
IBPD IBCOPP3+75*, IBCOPP3+100!, PLAN+20, PLAN+21, PLAN+22, PLAN+25, PLAN+26, PLAN+27, EXCEL+1~, EXCEL+23*
, EXCEL+24, EXCEL+27
IBQUIT IBCOPP3+68*, IBCOPP3+72, IBCOPP3+75, IBCOPP3+76, IBCOPP3+84, IBCOPP3+87, IBCOPP3+90, IBCOPP3+100!, SUBS+5, PAUSE+8*
IBS IBCOPP3+83*, IBCOPP3+84*, IBCOPP3+85, IBCOPP3+100!, EXCEL+1~, EXCEL+25*, EXCEL+26*
IBSD IBCOPP3+85*, IBCOPP3+100!, SUBS+9, SUBS+10, EXCEL+1~, EXCEL+26*, EXCEL+27
IOF COMP+20
IOM COMP+24, COMP+25
IOSL IBCOPP3+76, IBCOPP3+90, SUBS+5
IOST COMP+20, PAUSE+4
LENEP COMP+17~, COMP+19*, COMP+43, COMP+44
LENPT COMP+17~, COMP+19*, COMP+42
TRUNCPT IBCOPP3+63~, IBCOPP3+73, IBCOPP3+76, IBCOPP3+77, IBCOPP3+91, IBCOPP3+92, COMP~, COMP+18!, COMP+45*, COMP+47*
, COMP+48, PLAN~, PLAN+23, SUBS+4~, SUBS+6, SUBS+7
U EXCEL+24, EXCEL+27
XX IBCOPP3+63~, IBCOPP3+81*, IBCOPP3+82, PLAN+19~, PLAN+22*, PLAN+23*, PLAN+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All