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

Package: Integrated Billing

Routine: IBCNSM31


Information

IBCNSM31 ;ALB/AAS/JNM - INSURANCE MANAGEMENT - OUTPUTS ;28-MAY-93

Source Information

Source file <IBCNSM31.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Integrated Billing 10 ALL^IBCNS1  (PAT,POL)^IBCNSEH  (,AFTER,BEFORE)^IBCNSEVT  $$ANYGP^IBCNSJ  (BLD,EN)^IBCNSM  EDPOL^IBCNSM3  PATPOL^IBCNSM32  AIP^IBCNSP02  
AI^IBCNSP1  LKP^IBCNSU2  
VA FileMan 3 ^DIC  ^DIE  ^DIR  
List Manager 2 (FULL,PAUSE)^VALM1  EN^VALM2  

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

Package Total Caller Graph
Integrated Billing 14 IBCNBAR  IBCNBME  IBCNEUT7  IBCNSA  IBCNSJ12  IBCNSM EDIT ALL  IBCNSM1  IBCNSM3  
IBCNSM32  IBCNSMM1  IBCNSP2  IBCNSP3  IBCNSUR  IBY579PO  

Entry Points

Name Comments DBIA/ICR reference
EA ; -- Edit all insurance policy data
EAQ
LK(IBCNS) ; -- screened look up to policy file
; input: IBCNS = pointer to insurance company file (36)
LKQ
FUTURE ; -- if expiration date in future give warning
COVERED(DFN,IBCOVP) ; -- update covered by insurance in background
; -- input ibcovp = the covered by insurance field prior to editing
; (add/edit/delete) of the 2.312 insurance type mult.
  • ICR #945
    • Status: Active
    • Usage: Private
    3 ; -- display group name as uneditable
    ; called by die, expects da = entry in 355.3
    4 ; -- display group number as uneditable
    ; called by die, expects da = entry in 355.3

    External References

    Name Field # of Occurrence
    ^DIC LK+24
    ^DIE COVERED+17
    ^DIR LK+11, LK+15
    ALL^IBCNS1 COVERED+7
    PAT^IBCNSEH EA+18
    POL^IBCNSEH EA+23
    ^IBCNSEVT EA+21
    AFTER^IBCNSEVT EA+21
    BEFORE^IBCNSEVT EA+19
    $$ANYGP^IBCNSJ LK+7
    BLD^IBCNSM EAQ
    EN^IBCNSM %
    EDPOL^IBCNSM3 EA+23
    PATPOL^IBCNSM32 EA+20
    AIP^IBCNSP02 EA+24
    AI^IBCNSP1 EA+24
    LKP^IBCNSU2 LK+17
    FULL^VALM1 EA+3
    PAUSE^VALM1 EA+9
    EN^VALM2 EA+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,*7,"Sorry, but you do not have the required privileges to Edit All"
    • Line Location: EA+7
    Function Call: WRITE
    • Prompt: !!,"Can't identify the policy!"
    • Line Location: EA+15
    Function Call: WRITE
    • Prompt: !!,"This company does not offer any active group plans."
    • Line Location: LK+7
    Function Call: WRITE
    • Prompt: !!,*7,"WARNING: The expiration date for this policy is in the future!",!," Normally this is a past date or left blank or a past date",!
    • Line Location: FUTURE+2
    Function Call: WRITE
    • Prompt: !!,"COVERED BY HEALTH INSURANCE changed to '"_$S(IBNCOV="Y":"YES",IBNCOV="N":"NO",1:"UNKNOWN"),"'.",!
    • Line Location: COVERED+18
    Routine Call
    • DIC
    • Line Location:
      • LK+24
    Routine Call
    • DIE
    • Line Location:
      • COVERED+17
    Routine Call
    • DIR
    • Line Location:
      • LK+11
      • LK+15

    FileMan Files Accessed Via FileMan Db Call

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

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DPT - [#2] FUTURE+2, COVERED+6, COVERED+10, COVERED+13
    ^IBA(355.3 - [#355.3] 3+3, 4+3
    ^IBE(350.9 - [#350.9] EA+18
    ^TMP("IBNSM" EA+13
    ^TMP("IBNSMDX" EA+13
    ^XUSEC("IB GROUP PLAN EDIT" EA+6

    Label References

    Name Line Occurrences
    EAQ EA+10
    LKQ LK+5, LK+7, LK+11, LK+15, LK+17

    Naked Globals

    Name Field # of Occurrence
    ^(0 FUTURE+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA COVERED+5~, COVERED+17*, 3+3, 4+3
    DFN FUTURE+2, COVERED~, COVERED+4, COVERED+6, COVERED+7, COVERED+10, COVERED+13, COVERED+17
    DIC LK+3~, LK+21*, LK+24!, COVERED+5~
    DIC("A" LK+20*
    DIC("S" LK+21*
    DIC("W" LK+23*
    DIC(0 LK+21*
    DIE COVERED+5~, COVERED+17*
    DIR EA+8!, LK+3~, LK+11!, LK+15!
    DIR("?" LK+10*, LK+14*
    DIR("A" LK+9*, LK+13*
    DIR("B" LK+13*
    DIR(0 LK+9*, LK+13*
    DIROUT LK+3~
    DIRUT LK+3~, LK+15
    DR COVERED+5~, COVERED+17*
    DT FUTURE+2, COVERED+7
    DTOUT LK+3~
    DUOUT LK+3~
    DUZ EA+6
    I EA+1~, COVERED+5~
    >> IBALR LK+17
    IBCDFN EA+1~, EA+15*, EA+20, EA+23, FUTURE+2
    IBCNS LK~, LK+5, LK+7, LK+17
    >> IBCNSEH EA+18*
    IBCOV COVERED+5~, COVERED+6*, COVERED+16
    IBCOVP COVERED~, COVERED+10, COVERED+13
    IBCPOL LK+3~, LK+4*, LK+17, LK+24*, LKQ
    IBDIF EA+1~
    IBFUTUR FUTURE+1!, FUTURE+3*
    IBINS COVERED+5~
    IBINS(0 COVERED+7
    IBINSD COVERED+5~, COVERED+7*, COVERED+10, COVERED+13
    IBNCOV COVERED+5~, COVERED+6*, COVERED+10*, COVERED+13*, COVERED+16, COVERED+17, COVERED+18
    >> IBPPOL EA+13*, EA+14, EA+15
    IBQUIT EA+17~*, EA+23
    >> IBSUPRES COVERED+18
    IBTRC EA+1~, EA+24
    IBX LK+3~
    IBXX EA+1~, EA+12*, EA+13
    J EA+1~
    >> VALMBCK EAQ+1*
    VALMY EA+1~, EA+12
    VALMY( EA+12
    X LK+3~, COVERED+5~, 3+2~, 3+3*, 3+4, 4+2~, 4+3*, 4+4
    >> XQORNOD(0 EA+2
    Y LK+3~, LK+11, LK+17, LK+24, FUTURE+2*, COVERED+5~
    >> ZTQUEUED COVERED+18
    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