Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCNSJ4

Package: Integrated Billing

Routine: IBCNSJ4


Information

IBCNSJ4 ;ALB/CPM - INACTIVATE MULTIPLE INSURANCE PLANS ; 20-MAR-95

Source Information

Source file <IBCNSJ4.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Inactivate/Delete Multiple Plans
CONT ; - explain next step
ENQ
MSTR ; Display Master Plan Information
ASK() ; Does the user wish to inactivate multiple plans?

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This process will allow you to transfer subscribers from many insurance"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"plans into one 'master' plan. After the subscribers from each selected"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"plan are transferred to the master plan, the selected plan will be deleted"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"from your system."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"You should be very careful when you use this tool."
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,"You must first select the master plan into which you will transfer all"
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,"selected plan subscribers. This plan must be an active group plan.",!
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,"Annual Benefits have been established for this plan."
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!,*7,"Please note that any Benefits Used on file for subscribers who",!,"will be merged into the master plan will be deleted!"
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !!,"You may now select the plans to be merged into the master plan... (type <CR>)"
  • Line Location: CONT+8
Function Call: WRITE
  • Prompt: !!,"No plans were selected!"
  • Line Location: CONT+12
Function Call: WRITE
  • Prompt: !!,"Merging each selected plan into the master plan...",!
  • Line Location: CONT+22
Function Call: WRITE
  • Prompt: !!,"All selected plans have been deleted."
  • Line Location: CONT+45
Function Call: WRITE
  • Prompt: !,$S(IBSUB:IBSUB,1:"No")," subscriber",$S(IBSUB=1:" was",1:"s were")," transferred to the master plan."
  • Line Location: CONT+46
Function Call: WRITE
  • Prompt: !,$S(IBBUD:IBBUD,1:"No")," Benefits Used record",$S(IBBUD=1:" was",1:"s were")," deleted."
  • Line Location: CONT+47
Function Call: WRITE
  • Prompt: !,$S(IBBUM:IBBUM,1:"No")," Benefits Used record",$S(IBBUM=1:" was",1:"s were")," merged."
  • Line Location: CONT+48
Function Call: WRITE
  • Prompt: " (",IBBUMC," had the date changed)"
  • Line Location: CONT+49
Function Call: WRITE
  • Prompt: !!?24,"*** M A S T E R P L A N ***"
  • Line Location: MSTR+1
Function Call: WRITE
  • Prompt: !,"Plan Company: ",$P($G(^DIC(36,IBCNS,0)),"^")
  • Line Location: MSTR+2
Function Call: WRITE
  • Prompt: !?3,"Plan Name: ",$S($P(IBPLAND,"^",3)]"":$P(IBPLAND,"^",3),1:"<unspecified>")
  • Line Location: MSTR+3
Function Call: WRITE
  • Prompt: !," Plan Number: ",$S($P(IBPLAND,"^",4)]"":$P(IBPLAND,"^",4),1:"<unspecified>")
  • Line Location: MSTR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call