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 |  Local Variables |  All
Print Page as PDF
Routine: IBCNSJ12

Package: Integrated Billing

Routine: IBCNSJ12


Information

IBCNSJ12 ;ALB/CPM - INACTIVATE AN INSURANCE PLAN (CON'T) ; 18-JAN-95

Source Information

Source file <IBCNSJ12.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 7 ($$ANYGP,$$SUBS,COV,IRACT)^IBCNSJ  (DEL,DELP)^IBCNSJ11  NEW^IBCNSJ3  $$LK^IBCNSM31  $$PT^IBEFUNC  $$DAT1^IBOUTL  $$EXPAND^IBTRE  
MailMan 1 ^XMD  
Registration 1 OAD^VADPT  
VA FileMan 1 ^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: 2

Package Total Caller Graph
Integrated Billing 2 IBCNSJ1  IBCNSJ2  

Entry Points

Name Comments DBIA/ICR reference
MSG(IBCNS,IBPLAN) ; Send the subscription list to the user.
; Input: IBCNS -- Pointer to the company in file #36 offering the plan
; IBPLAN -- Pointer to the current plan in file #355.3
MSGQ
ADD ; - propose to add a new plan to which the patient may subscribe
NACQ
NAC(IBPLAN,IBPR,IBDEL,IBQ) ; Inactivate the plan.
; Input: IBPLAN -- Pointer to the plan in file #355.3
; IBPR -- Prompt for the Reader call
; IBDEL -- [optional]: set to 1 if the plan may be deleted
; Output: IBQ -- set to 1 if the plan is not inactivated
GETPL ; Select an active group plan or add a new one.
; Required variable input:
; IBCNS -- Pointer to the company in file #36 offering the plan
; IBPLAN -- Pointer to the current plan in file #355.3
; IBFG -- [Optional] -> set to 1 to force creation, if
; necessary, of a group plan

External References

Name Field # of Occurrence
^DIR NAC+10
$$ANYGP^IBCNSJ GETPL+14
$$SUBS^IBCNSJ MSG+25
COV^IBCNSJ MSG+27
IRACT^IBCNSJ NAC+11
DEL^IBCNSJ11 NAC+12
DELP^IBCNSJ11 NAC+10
NEW^IBCNSJ3 ADD+4
$$LK^IBCNSM31 GETPL+17
$$PT^IBEFUNC MSG+28
$$DAT1^IBOUTL MSG+39, MSG+40
$$EXPAND^IBTRE MSG+34
OAD^VADPT MSG+37
^XMD MSG+49

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P($G(^DIC(36,IBCNS,0)),"^")," offers no other active group plans!"
  • Line Location: GETPL+14
Function Call: WRITE
  • Prompt: !,"No plan selected!",!
  • Line Location: GETPL+17
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+4
Function Call: WRITE
  • Prompt: !,"No Insurance Plan has been added or selected."
  • Line Location: ADD+5
Function Call: WRITE
  • Prompt: !,"The plan was not inactivated."
  • Line Location: NAC+10
Function Call: WRITE
  • Prompt: !,"Inactivating the plan... "
  • Line Location: NAC+11
Function Call: WRITE
  • Prompt: "done."
  • Line Location: NAC+11
Function Call: WRITE
  • Prompt: !,"Building the list of inactivated subscriptions to send to you..."
  • Line Location: MSG+7
Routine Call
  • DIR
  • Line Location:
    • NAC+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] GETPL+14, MSG+12
^DPT - [#2] MSG+32
^IBA(355.3 - [#355.3] MSG+6
^TMP($J MSG+10!, MSG+12*, MSG+13*, MSG+15*, MSG+16*, MSG+17*, MSG+18*, MSG+19*, MSG+20*, MSG+21*
, MSG+24!, MSG+26, MSG+30*, MSG+31, MSG+33*, MSG+35, MSG+41*, MSG+44*, MSG+45*, MSG+46*
, MSGQ!

Label References

Name Line Occurrences
ADD GETPL+14
MSGQ MSG+5, MSG+6
NACQ NAC+7, NAC+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN MSG+4~, MSG+26*, MSG+27, MSG+28, MSG+31, MSG+32
DIR NAC+6~
DIR("?" NAC+8*
DIR("A" NAC+9*
DIR(0 NAC+8*
DIROUT NAC+6~
DIRUT NAC+6~
DTOUT NAC+6~
DUOUT NAC+6~
DUZ MSG+48
IBALR GETPL+12~, GETPL+13*
IBC MSG+4~, MSG+21*, MSG+30*, MSG+33*, MSG+35, MSG+41, MSG+44*, MSG+45*, MSG+46*
IBCDFN MSG+4~, MSG+31*, MSG+32
IBCDFND MSG+4~, MSG+32*, MSG+34, MSG+37, MSG+39, MSG+40
IBCNS GETPL+14, GETPL+17, ADD+4, MSG~, MSG+5, MSG+12, MSG+25
>> IBCPOL GETPL+13*, GETPL+17*, ADD+1, ADD+4, ADD+5
IBDEL NAC~, NAC+12
>> IBFG ADD+4
>> IBM MSG+28*, MSG+33*
>> IBNEWP ADD+4*
IBPLAN GETPL+13, GETPL+14, NAC~, NAC+7, NAC+11, NAC+12, MSG~, MSG+5, MSG+6, MSG+25
IBPLAND MSG+4~, MSG+6*, MSG+14, MSG+15
IBPR NAC~, NAC+9
IBQ NAC~, NAC+8*, NAC+10*
>> IBREP ADD+2
IBSUB1 MSG+4~, MSG+25*
IBX MSG+4~, MSG+14*, MSG+15, MSG+35*, MSG+36*, MSG+38*, MSG+39*, MSG+40*, MSG+41
VA MSG+4~
VAERR MSG+4~
VAOA MSG+4~
VAOA("A" MSG+37*
VAOA(9 MSG+38
>> X MSG+28*, MSG+29*, MSG+30, MSG+34*, MSG+36
XMDUZ MSG+4~, MSG+47*
XMSUB MSG+4~, MSG+11*
XMTEXT MSG+4~, MSG+47*
XMY MSG+4~, MSG+48!
XMY( MSG+48*
>> Y NAC+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All