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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCNSP3

Package: Integrated Billing

Routine: IBCNSP3


Information

IBCNSP3 ;ALB/AAS - INSURANCE MANAGEMENT EDIT ;27-APR-2015

Source Information

Source file <IBCNSP3.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Integrated Billing 6 BLD^IBCNSM  COVERED^IBCNSM31  ^IBCNSM4  (BLANK,BLD)^IBCNSP  LOCKED^IBTRCD1  $$EXPAND^IBTRE  
VA FileMan 3 ^DIC  ^DIE  ^DIR  
List Manager 2 FULL^VALM1  EN^VALM2  
Registration 1 OAD^VADPT  

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

Package Total Caller Graph
Integrated Billing 11 IBCEOB01  IBCNSJ  IBCNSM PERSONAL RIDERS  IBCNSM3  IBCNSM32  IBCNSP ADD COMMENT  IBCNSP ADD GROUP COMMENT  IBCNSP EMPLOYER INFO FOR CLAIMS  
IBCNSP PERSONAL RIDERS  IBCNSP1  IBCNSP11  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
SAVEPT(DFN,DA) ; -- Save the global before editing
COMPPT(DFN,DA) ; -- Compare before editing with globals
COMPPTQ
UPDATPT(DFN,DA) ; -- enter date and user if editing has taken place
EM ; -- Employer for claims update
EMQ
GC ;EP
; IB*2.0*549 Added Method
; Protocol action to add/edit a Group Plan Comment
; Input: DFN - IEN of the currently selected patient
; IBCPOL - IEN of the currently selected group plan
; Output: Group Plan Comment is added/edited (Potentially)
BLS(X,Y) ; -- blank a section of lines
VARS ; -- set vars for call to die for .312 node
SAVE(IBCPOL) ; -- Save the global before editing
COMP(IBCPOL) ; -- Compare before editing with globals
UPDATE(IBCPOL) ; -- Update last edited by
RIDERS ; -- add/edit personal riders
R1
RIDERQ
RD ; -- Add riders/ for multiple policies
DISPR ; -- Display riders
DISPRQ
EMPSET(DFN,IBCPOL) ; insert patient or spouses current employer as ESGHP address if that employer sponsors this plan

External References

Name Field # of Occurrence
^DIC R1+4
^DIE UPDATPT+4, EM+9, EM+13, EM+17, GC+14, UPDATE+3, R1+9, EMPSET+8, EMPSET+9
^DIR EMPSET+5
BLD^IBCNSM RD+9
COVERED^IBCNSM31 COMPPTQ
^IBCNSM4 %
BLANK^IBCNSP BLS+2
BLD^IBCNSP EM+20, GC+15
LOCKED^IBTRCD1 EM+5, GC+12, R1+7
$$EXPAND^IBTRE DISPR+6
OAD^VADPT EMPSET+3
FULL^VALM1 EM+1, GC+8, RIDERS+2, RD+1
EN^VALM2 RD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EM+1
Function Call: WRITE
  • Prompt: !!,"You may now enter comments about this Group Plan that pertains to all"
  • Line Location: GC+9
Function Call: WRITE
  • Prompt: " Patients",!!
  • Line Location: GC+10
Function Call: WRITE
  • Prompt: !
  • Line Location: RIDERS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: RIDERS+5
Function Call: WRITE
  • Prompt: !
  • Line Location: R1+11
Function Call: WRITE
  • Prompt: !,"Current Personal Riders: "
  • Line Location: DISPR+4
Function Call: WRITE
  • Prompt: !?5,"None Indicated"
  • Line Location: DISPR+8
Function Call: WRITE
  • Prompt: "...."
  • Line Location: EMPSET+5
Routine Call
  • DIC
  • Line Location:
    • R1+4
Routine Call
  • DIE
  • Line Location:
    • UPDATPT+4
    • EM+9
    • EM+13
    • EM+17
    • GC+14
    • UPDATE+3
    • R1+9
    • EMPSET+8
    • EMPSET+9
Routine Call
  • DIR
  • Line Location:
    • EMPSET+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] Classic Fileman Calls
^IBA(355.7 - [#355.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] SAVEPT+2, SAVEPT+3, SAVEPT+4, SAVEPT+5, SAVEPT+6, SAVEPT+7, SAVEPT+8, COMPPT+2, COMPPT+3, COMPPT+4
, COMPPT+5, COMPPT+6, COMPPT+7, COMPPT+8, COMPPTQ, EM+5, EM+11, EM+13, EM+17, EM+21
, EMPSET+2, EMPSET+6
^IBA(355.3 - [#355.3] GC+11, GC+16, SAVE+2, SAVE+3, SAVE+4, SAVE+6, COMP+2, COMP+3, COMP+4, COMP+6
^IBA(355.7 - [#355.7] R1+7, R1+10, DISPR+5
^TMP("IBNSM" RD+5
^TMP("IBNSMDX" RD+5
^TMP($J SAVEPT+1!, SAVEPT+2*, SAVEPT+3*, SAVEPT+4*, SAVEPT+5*, SAVEPT+6*, SAVEPT+7*, SAVEPT+8*, COMPPT+2, COMPPT+3
, COMPPT+4, COMPPT+5, COMPPT+6, COMPPT+7, COMPPT+8, SAVE+1!, SAVE+2*, SAVE+3*, SAVE+4*, SAVE+6*
, COMP+2, COMP+3, COMP+4, COMP+6

Label References

Name Line Occurrences
COMPPT EM+19
COMPPTQ COMPPT+2, COMPPT+3, COMPPT+4, COMPPT+5, COMPPT+6, COMPPT+7, COMPPT+8
DISPR RIDERS+5
DISPRQ DISPR+3
EMPSET EM+11
EMQ EM+5
R1 R1+11
RIDERQ R1+5, R1+7
RIDERS RD+7
SAVEPT EM+3
UPDATPT EM+20
VARS EM+4, EM+13, EM+17, EMPSET+6

Naked Globals

Name Field # of Occurrence
^( DISPR+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA SAVEPT~, SAVEPT+2, SAVEPT+3, SAVEPT+4, SAVEPT+5, SAVEPT+6, SAVEPT+7, SAVEPT+8, COMPPT~, COMPPT+2
, COMPPT+3, COMPPT+4, COMPPT+5, COMPPT+6, COMPPT+7, COMPPT+8, UPDATPT~, EM+2~, EM+11, EM+13
, EM+17, GC+6~, GC+13*, VARS+1*, UPDATE+1~, UPDATE+2*, RIDERS+3~, R1+8*, R1+9!
DA(1 UPDATPT+2*, VARS+1*, VARS+2
DFN SAVEPT~, SAVEPT+2, SAVEPT+3, SAVEPT+4, SAVEPT+5, SAVEPT+6, SAVEPT+7, SAVEPT+8, COMPPT~, COMPPT+2
, COMPPT+3, COMPPT+4, COMPPT+5, COMPPT+6, COMPPT+7, COMPPT+8, COMPPTQ, UPDATPT~, UPDATPT+2, EM+3
, EM+5, EM+11, EM+13, EM+17, EM+19, EM+20, EM+21, VARS+1, R1+1, DISPR+3
, DISPR+5, EMPSET~, EMPSET+2, EMPSET+6
DIC UPDATPT+1~, EM+2~, GC+6~, UPDATE+1~, RIDERS+3~, R1*, R1+4!, R1+9!
DIC("B" R1+3*
DIC("DR" R1+1*
DIC("S" R1+2*
DIC(0 R1*
DIDEL R1+8*, R1+9!
DIE UPDATPT+1~, UPDATPT+2*, EM+2~, EM+9!, EM+13!, GC+6~, GC+13*, VARS+2*, UPDATE+1~, UPDATE+2*
, RIDERS+3~, R1+8*, R1+9!
DIR EMPSET+1~
DIR("A" EMPSET+5*
DIR("B" EMPSET+5*
DIR(0 EMPSET+5*
DLAYGO R1*, R1+9!
DR UPDATPT+1~, UPDATPT+3*, EM+2~, EM+9*!, EM+13*!, EM+17*, GC+6~, GC+13*, UPDATE+1~, UPDATE+2*
, RIDERS+3~, R1+8*, R1+9!, EMPSET+1~, EMPSET+8*, EMPSET+9*
DUZ UPDATPT+3, UPDATE+2
I BLS+1~, BLS+2*, RD+2~, DISPR+1~, DISPR+2*, DISPR+5*
IBCDFN EM+3, EM+19, EM+20, RIDERS+3~, RIDERS+4*, R1+1, DISPR+3, DISPR+5
>> IBCOVP COMPPTQ
IBCPOL GC+11, GC+13, GC+16, SAVE~, SAVE+2, SAVE+3, SAVE+4, SAVE+6, COMP~, COMP+2
, COMP+3, COMP+4, COMP+6, UPDATE~, UPDATE+2, EMPSET~, EMPSET+2
IBDIF COMPPT+1*, COMPPT+2*, COMPPT+3*, COMPPT+4*, COMPPT+5*, COMPPT+6*, COMPPT+7*, COMPPT+8*, COMPPTQ, EM+2~
, EM+20, COMP+1*, COMP+2*, COMP+3*, COMP+4*, COMP+6*, RIDERS+3~
IBE EMPSET+1~, EMPSET+6*
IBEMPST EMPSET+1~, EMPSET+6*, EMPSET+9
>> IBPPOL EM+5, EM+21, VARS+1, RIDERS+4, RD+5*, RD+6
IBPR DISPR+1~, DISPR+5*, DISPR+6
IBPRD RIDERS+3~, R1+3, R1+4!, DISPR+6*, DISPR+7, DISPR+8
IBPRY RIDERS+3~, R1+6*, R1+7, R1+10
IBWHOS EMPSET+1~, EMPSET+2*, EMPSET+6
IBXX RD+2~, RD+4*, RD+5
J RD+2~, DISPR+1~, DISPR+5*
U EM+11, EM+13, EM+17, EMPSET+2, EMPSET+6, EMPSET+9
>> VALMBCK EMQ*, GC+7*, RIDERQ*, RD+10*
VALMY RD+2~, RD+4
VALMY( RD+4
VAOA EMPSET+1~
VAOA("A" EMPSET+2*, EMPSET+3
VAOA(1 EMPSET+8
VAOA(11 EMPSET+9
VAOA(2 EMPSET+8
VAOA(3 EMPSET+8
VAOA(4 EMPSET+8
VAOA(5 EMPSET+9
VAOA(8 EMPSET+9
VAOA(9 EMPSET+3, EMPSET+5, EMPSET+8
X GC+6~, BLS~, BLS+2, RIDERS+3~, EMPSET+1~
>> XQORNOD(0 RD+3
Y GC+6~, BLS~, BLS+2, RIDERS+3~, R1+5, R1+6, R1+8, EMPSET+1~, EMPSET+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All