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

Package: Integrated Billing

Routine: IBCNSOK1


Information

IBCNSOK1 ;ALB/AAS - Insurance consisitency stuff ; 2/22/93

Source Information

Source file <IBCNSOK1.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Integrated Billing 1 $$CHK^IBCNS1  

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

Package Total Caller Graph
Integrated Billing 3 IBCNBAR  IBCNSM3  IBCNSP2  

Entry Points

Name Comments DBIA/ICR reference
DUPCO(DFN,IBCNS,IBCDFN,IBTALK) ; -- is this a duplicate company for this patient
; -- make this call after selecting a company
; -- input DFN = patient file pointer (required)
; IBCNS = new insurance company selected
; IBCDFN = if added to patient ins type mult is required as enter number in multiple
; IBTALK = (optional) if defined and true will write messages to current device if not queued
; -- output = $p1 - 0 if no other entry 1 if possible dup.
; $p2 - 1 if another active entry for same company
; $p3 - 1 if same co, same subscriber
; $p4 - 1 if same co, same dates
; $p5 - 1 if same co, same plan
; $p6 - 1 if spouse insurer but not listed
; $p7 - 1 if spouse insurer but no employer
DUPCOQ
DUPPOL(IBCPOL,IBTALK) ; -- is this a duplicate policy for this company
DUPPOLQ

External References

Name Field # of Occurrence
$$CHK^IBCNS1 DUPCO+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," The previous entry is active."
  • Line Location: DUPCO+35
Function Call: WRITE
  • Prompt: !," The WHOSE INSURANCE are the same."
  • Line Location: DUPCO+36
Function Call: WRITE
  • Prompt: !," The Effective and Expiration dates may cover overlapping dates."
  • Line Location: DUPCO+37
Function Call: WRITE
  • Prompt: !," The Group Plans are the same."
  • Line Location: DUPCO+38
Function Call: WRITE
  • Prompt: !," WHOSE INSURANCE is Spouse, patient marital Status Inconsistent."
  • Line Location: DUPCO+39
Function Call: WRITE
  • Prompt: !," WHOSE INSURANCE is Spouse but no Employer listed."
  • Line Location: DUPCO+40
Function Call: WRITE
  • Prompt: !!,"Warning: There is another policy with the same Group Name."
  • Line Location: DUPPOL+8
Function Call: WRITE
  • Prompt: !!,"Warning: There is another policy with the same Group Number."
  • Line Location: DUPPOL+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DUPCO+15, DUPCO+18, DUPCO+24, DUPCO+30, DUPCO+31
^IBA(355.3 - [#355.3] DUPPOL+3
^IBA(366.3 DUPPOL+2

Label References

Name Line Occurrences
DUPCOQ DUPCO+15, DUPCO+32

Naked Globals

Name Field # of Occurrence
^(2 DUPPOL+2, DUPPOL+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN DUPCO~, DUPCO+15, DUPCO+18, DUPCO+24, DUPCO+30, DUPCO+31
DT DUPCO+20
I DUPCO+13~, DUPCO+14*, DUPCO+18*, DUPPOL+1~, DUPPOL+2*, DUPPOL+3*
IBACT DUPCO+13~, DUPCO+20*, DUPCO+22
IBCDFN DUPCO~, DUPCO+18, DUPCO+21, DUPCO+24
IBCDFND DUPCO+13~, DUPCO+24*, DUPCO+25, DUPCO+26, DUPCO+27, DUPCO+29, DUPCO+30, DUPCO+31
IBCNS DUPCO~, DUPCO+18, DUPPOL+1~, DUPPOL+2*, DUPPOL+3
IBCPOL DUPPOL~, DUPPOL+2, DUPPOL+3
IBDUP DUPCO+13~, DUPCO+14*, DUPCO+19*, DUPCO+20*, DUPCO+25*, DUPCO+26*, DUPCO+27*, DUPCO+29*, DUPCO+30*, DUPCO+31*
, DUPCO+32, DUPCO+33, DUPCO+35, DUPCO+36, DUPCO+37, DUPCO+38, DUPCO+39, DUPCO+40, DUPCOQ, DUPPOL+1~
, DUPPOL+2*, DUPPOL+5*, DUPPOL+6*, DUPPOL+7, DUPPOL+8, DUPPOL+9, DUPPOLQ
IBI DUPCO+13~
IBJ DUPCO+13~
IBTALK DUPCO~, DUPCO+33, DUPPOL~, DUPPOL+7
IBX DUPCO+13~, DUPCO+18*, DUPCO+20, DUPCO+25, DUPCO+26, DUPCO+27, DUPCO+29
IBY DUPCO+13~
J DUPCO+13~, DUPPOL+1~, DUPPOL+2*
J2 DUPPOL+1~, DUPPOL+2*, DUPPOL+5, DUPPOL+6
X DUPCO+13~, DUPPOL+1~, DUPPOL+3*, DUPPOL+4
X2 DUPPOL+1~, DUPPOL+3*, DUPPOL+5, DUPPOL+6
Y DUPCO+13~, DUPPOL+1~
Z DUPCO+13~, DUPPOL+1~
>> ZTQUEUED DUPCO+33, DUPPOL+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All