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

Package: Integrated Billing

Routine: IBCNSU41


Information

IBCNSU41 ;ALB/CPM - SPONSOR UTILITIES (CON'T) ; 5/9/03 1:25pm

Source Information

Source file <IBCNSU41.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Integrated Billing 6 IBACUS  IBCNBAR  IBCNSJ13  IBCNSM  IBCNSM32  IBCSC3  
Registration 1 DGRP15  

Entry Points

Name Comments DBIA/ICR reference
SPONQ
POLQ
LSPQ
POL(DFN) ; Update TRICARE policies with Sponsor information.
; Input: DFN -- Pointer to the patient in file #2
SPON(DFN) ; Add/edit sponsor/sponsor relationships for a patient.
; Input: DFN -- Pointer to the patient in file #2
  • ICR #2037
    • Status: Active
    • Usage: Private
    LSP ; Main loop to collect sponsor and relation data.
    LSPC ; - allow edit of non-patient sponsor name/dob/ssn

    External References

    Name Field # of Occurrence
    ^DIC LSP+6
    FILE^DICN LSP+17, LSP+22, LSPC+20
    ^DIE LSPC+4, LSPC+9, LSPC+23, POL+53
    ^DIR LSP+1, LSP+12, LSPC+17

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"New sponsors must be in the format LAST,FIRST.",!
    • Line Location: LSP+8
    Function Call: WRITE
    • Prompt: !,"Unable to add a new sponsor!"
    • Line Location: LSP+18
    Function Call: WRITE
    • Prompt: !,"Unable to add a new sponsor!"
    • Line Location: LSP+23
    Function Call: WRITE
    • Prompt: !
    • Line Location: LSPC+17
    Function Call: WRITE
    • Prompt: !
    • Line Location: LSPC+24
    Routine Call
    • DIE
    • Line Location:
      • LSPC+4
      • LSPC+9
      • LSPC+23
      • POL+53
    Routine Call
    • DIC
    • Line Location:
      • LSP+6
    Routine Call
    • DIR
    • Line Location:
      • LSP+1
      • LSP+12
      • LSPC+17

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls
    ^IBA(355.8 - [#355.8] Classic Fileman Calls
    ^IBA(355.81 - [#355.81] Classic Fileman Calls
    ^IBA(355.82 - [#355.82] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DPT - [#2] POL+17, POL+29, POL+39
    ^IBA(355.3 - [#355.3] POL+32
    ^IBA(355.8 - [#355.8] LSP+7, POL+12
    ^IBA(355.81 - [#355.81] LSPC+12, POL+6, POL+7
    ^IBA(355.82 - [#355.82] POL+20
    ^IBE(355.1 - [#355.1] POL+32

    Label References

    Name Line Occurrences
    LSP SPON+5, LSP+8, LSP+13
    LSPC LSP+7
    LSPQ LSP+2, LSP+18, LSP+23, LSPC+13
    POLQ POL+3, POL+26
    SPONQ SPON+3

    Naked Globals

    Name Field # of Occurrence
    ^( POL+29
    ^(7 POL+29

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA LSPC+2*, LSPC+4!, LSPC+7*, LSPC+9!, LSPC+23*!, POL+53*!
    DA(1 POL+53*
    DFN SPON~, SPON+3, LSPC+12, LSPC+19, POL~, POL+3, POL+6, POL+29, POL+39, POL+53
    DIC LSP+6*!, LSP+16*, LSP+21*, LSPC+19*
    DIC("DR" LSPC+19*
    DIC(0 LSP+6*, LSP+16*, LSP+21*, LSPC+19*
    DIE LSPC+2*, LSPC+4!, LSPC+7*, LSPC+9!, LSPC+23*!, POL+53*!
    DIR LSP+1!, LSP+12!, LSPC+17!
    DIR("?" LSPC+16*
    DIR("A" LSP+1*, LSP+11*, LSPC+15*
    DIR(0 LSP+1*, LSP+11*, LSPC+15*
    DIROUT LSP+2!, LSP+13!, LSPQ!
    DIRUT LSP+2!, LSP+13!, LSPQ!
    DLAYGO LSP+6*!, LSP+16*, LSP+17!, LSP+21*, LSP+22!, LSPC+19*, LSPC+20!
    DR LSPC+3*, LSPC+4!, LSPC+8*, LSPC+9!, LSPC+23*!, POL+42*, POL+44*, POL+45*, POL+46*, POL+47*
    , POL+48*, POL+50, POL+51*, POL+53!
    DTOUT LSP+2!, LSP+13!, LSPQ!
    DUOUT LSP+2!, LSP+13!, LSPQ!
    IBNAM LSP+7*, LSP+16*, LSPC+14, LSPQ!
    IBQ SPON+4~*, SPON+5, LSP+2*
    IBQQ LSPC+13*, LSPC+17*, LSPC+20*, LSPQ!
    IBSP LSP+7*, LSP+22*, LSP+23, LSPC+7, LSPC+12, LSPC+19, LSPQ!
    IBSPD LSP+7*, LSP+21*, LSPC+1, LSPC+2, LSPQ!
    IBSPP LSP+17*, LSP+18, LSP+21, LSPQ!
    IBSPR LSPC+12*, LSPC+13, LSPC+20*, LSPC+23, LSPQ!
    IBX LSP+3*, LSP+8, LSP+11, LSP+16, LSPQ!, POL+4~, POL+29*, POL+39, POL+53
    IBY POL+4~, POL+29*, POL+32, POL+35
    IBY7 POL+4~, POL+29*, POL+44
    SPON POL+4~, POL+12*, POL+16, POL+17, POL+20, POL+23
    X LSP+3, LSP+16*, LSP+21*, LSPC+19*, LSPQ!, POL+4~, POL+6*, POL+7
    X1 POL+4~, POL+17*, POL+18, POL+20*, POL+21
    X3 POL+4~, POL+39*, POL+40, POL+45, POL+46, POL+47, POL+48
    Y LSP+7, LSP+13, LSP+17, LSP+22, LSPC+17, LSPC+20, LSPQ!, POL+4~, POL+7*, POL+10
    , POL+12
    Y(0 LSP+7
    Z POL+4~, POL+6, POL+26
    Z("BRAN" POL+23*, POL+46
    Z("DOB" POL+18*, POL+21*, POL+40, POL+45
    Z("NAME" POL+18*, POL+21*, POL+44
    Z("RANK" POL+23*, POL+47
    Z("SSN" POL+18*, POL+21*, POL+48
    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