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

Package: Integrated Billing

Routine: IBCNSJ53


Information

IBCNSJ53 ;AITC/DTG - INSURANCE PLAN MAINTENANCE ACTION VIEW SUBSCRIBER ; 15-MAY-2023

Source Information

Source file <IBCNSJ53.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 4 NOW^%DTC  DT^DILF  $$GET1^DIQ  ^DIR  
Integrated Billing 3 $$ZND^IBCNS1  $$PT^IBEFUNC  $$DAT2^IBOUTL  
List Manager 3 EN^VALM  ($$SETFLD,CLEAR,FULL)^VALM1  (CLEAN,KILL)^VALM10  
Kernel 2 $$FMTE^XLFDT  DISP^XQORM1  

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

Package Total Caller Graph
Integrated Billing 6 IBCNSC PLAN VIEW SUBSCRIBERS  IBCNSJ PLAN VIEW ACTIVE SUBS  IBCNSJ PLAN VIEW ALL SUBS  IBCNSJ PLAN VIEW INACTIVE SUBS  IBCNSJ PLAN VIEW SORT  IBCNSJ PLAN VIEW SUBSCRIBERS  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
VP ; -- Edit/View Plan (VS entry point)
VSUBS ; entry from list template protocol 'IBCNSJ PLAN VIEW SUBSCRIBERS' from the 'IBCNSC PLAN DETAIL' menu
VSUBX ; quit back
DTC(IBDTCK) ; check date return external if valid
DTCO ; date check exit
DTC5(IBDTCK) ; check date return external if valid ;IB*804/DTG 4 digit year for sort's
DTC5O ; date check exit
EXIT ; -- exit code
HELP ; -- help code
INIT ; -- Load the plan detail segments
ACINI ; active subscribers
ININI ; inactive subscribers
ALLINI ; all subscribers
HDR(IBDIS) ; -- Plan Subscribers
BVA ; Build ALL subscribers
BPAS ; build items from base into valm display
AC ; active subscriber entry
IS ; inactive subscriber entry
SORT ; ask sort questions if sort selected then re-build ^TMP("IBCNSJ53I",$J,
SORTQ ; sort exit point
IBSRTNM ; subscriber name sort type and order
IBSRQU(IBSRNM,IBSRF,IBSRR) ; get the type
IBSRTCOM(IBSORTA,IBWORK) ; go thru the compiled and sort for display
IBSV ; save in selected item order to temp area
IBSVA ; save invalid dates in selected item order to temp area
IBSRTMV ; move from temp and place in viewing order
IBSRTA ; pick up blank and bad date items
IBSRTA1 ; loop through bad/blank dates
IBASE ; reset levels to base

External References

Name Field # of Occurrence
NOW^%DTC INIT+8
DT^DILF IBSRTCOM+26
$$GET1^DIQ VSUBS+34, VSUBS+36, VSUBS+38, VSUBS+41, VSUBS+45, VSUBS+48, VSUBS+63, VSUBS+71, VSUBS+74, VSUBS+88
^DIR HELP+13, SORT+11, IBSRQU+12
$$ZND^IBCNS1 VSUBS+64
$$PT^IBEFUNC VSUBS+66
$$DAT2^IBOUTL INIT+9
EN^VALM VP+2
$$SETFLD^VALM1 BPAS+12, BPAS+13, BPAS+14, BPAS+15, BPAS+16, BPAS+17, BPAS+18, BPAS+19, BPAS+20
CLEAR^VALM1 EXIT+2
FULL^VALM1 VP+1, HELP+3, ACINI+3, ININI+3, ALLINI+3, SORT+4, SORTQ+3
CLEAN^VALM10 EXIT+2
KILL^VALM10 INIT+14
$$FMTE^XLFDT DTC+4, DTC5+4
DISP^XQORM1 HELP+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !," Enter AC to only see active subscribers."
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !," Enter IN to only see inactive subscribers."
  • Line Location: HELP+7
Function Call: WRITE
  • Prompt: !," Enter VA to see all subscribers."
  • Line Location: HELP+10
Function Call: WRITE
  • Prompt: !," Enter ST to sort the subscriber records",!
  • Line Location: HELP+11
Function Call: WRITE
  • Prompt: !!,*7,"Missing Insurance or Plan IEN."
  • Line Location: INIT+12
Routine Call
  • DIR
  • Line Location:
    • HELP+13
    • SORT+11
    • IBSRQU+12
Routine Call
  • VALM
  • Line Location:
    • VP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
2.312 GET1^DIQ
^IBA(355.3 - [#355.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] VSUBS+11, VSUBS+12
^DIC(5 - [#5] VSUBS+14
^DPT("AB" VSUBS+61, VSUBS+62
^IBA(355.3 - [#355.3] VSUBS+54
^TMP("IBCNSJ53" EXIT+1!, INIT+2!
^TMP("IBCNSJ53I" EXIT+1!, HDR+4, BVA+8, AC+8, IS+8, IBSRTCOM+17!, IBSRTCOM+19!, IBSRTCOM+20, IBSRTCOM+21, IBSRTCOM+22
, IBSRTCOM+30!, IBSV+2*, IBSVA+2*, IBSRTMV+5, IBSRTMV+8, IBSRTMV+10, IBSRTMV+11, IBSRTMV+12*, IBSRTA1+3, IBSRTA1+5
IBSRTA1+6, IBSRTA1+7*, IBASE+5!, IBASE+6, IBASE+7, IBASE+8, IBASE+9*

Label References

Name Line Occurrences
$$DTC VSUBS+74, VSUBS+79, VSUBS+82
$$DTC5 VSUBS+76, VSUBS+81, VSUBS+84
$$IBSRQU SORT+18, IBSRTNM+3
AC ACINI+5, SORTQ+6
BPAS BVA+13, AC+13, IS+13
BVA INIT+18, ALLINI+5, SORTQ+5
DTC5O DTC5+6
DTCO DTC+3, DTC+6, DTC5+3
HDR ACINI+4, ININI+4, ALLINI+4, SORTQ+5, SORTQ+6, SORTQ+7
IBASE VSUBS+124, ACINI+2, ININI+2, ALLINI+2, SORTQ+2
IBSRTA IBSRTMV+4, IBSRTMV+13
IBSRTA1 IBSRTA+4, IBSRTA+6
IBSRTCOM SORT+20, IBSRTNM+5
IBSRTMV IBSRTCOM+20
IBSRTNM SORT+15
IBSV IBSRTCOM+23, IBSRTCOM+27
IBSVA IBSRTCOM+28
IS ININI+5, SORTQ+7
SORTQ SORT+13, SORT+14, SORT+15, SORT+17, SORT+19, SORT+20
VSUBS INIT+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % INIT+9
DIR VSUBS+2~, HELP+4~, HELP+14!, SORT+2~, SORT+7!, IBSRQU+6~, IBSRQU+7!
DIR("?" SORT+9*, IBSRQU+11*
DIR("A" HELP+12*, SORT+8*, IBSRQU+10*
DIR("B" SORT+10*, IBSRQU+9*
DIR(0 HELP+12*, SORT+7*, IBSRQU+8*
DIROUT SORT+2~, SORT+12, IBSRQU+6~, IBSRQU+14
DIRUT SORT+2~, SORT+12, IBSRQU+6~, IBSRQU+14
DT VSUBS+98, VSUBS+102
DTOUT SORT+2~, SORT+12, IBSRQU+6~, IBSRQU+14
DUOUT SORT+2~, SORT+12, IBSRQU+6~, IBSRQU+14
FIEN VSUBS+2~
FTF VSUBS+2~
FTFV VSUBS+2~
IB1 HDR+2~, HDR+3*, HDR+10*, HDR+16, HDR+19, HDR+21*, HDR+23, HDR+27, HDR+29*, HDR+31
, HDR+35
IB2 HDR+2~, HDR+3*, HDR+16*, HDR+19, HDR+24*, HDR+27, HDR+32*, HDR+35
IB3 HDR+2~, HDR+3*, HDR+18*, HDR+19, HDR+26*, HDR+27, HDR+34*, HDR+35
>> IB3553 VSUBS+34, VSUBS+36, VSUBS+38, VSUBS+41, VSUBS+45, VSUBS+48, VSUBS+54, VSUBS+63, VSUBS+117, VSUBS+118
INIT+4*, INIT+11
>> IB36 VSUBS+11, VSUBS+12, VSUBS+61, VSUBS+62, INIT+4*, INIT+11
IB5 HDR+12~*, HDR+13*, HDR+14*, HDR+16
IBA VSUBS+2~, VSUBS+58*, VSUBS+63*, HDR+2~, HDR+4*, HDR+10, HDR+21, HDR+29, BPAS+2~, BPAS+8*
BPAS+9*, BPAS+10, BPAS+11, IBSRTCOM+9~, IBSRTCOM+20*, IBSRTCOM+21, IBSRTCOM+22, IBSV+2, IBSVA+2, IBSRTA+2~
IBSRTA+4*, IBSRTA+6*, IBSRTA1+3, IBSRTA1+5, IBSRTA1+6, IBASE+4~, IBASE+5*, IBASE+6*, IBASE+7, IBASE+8
IBASE+9
>> IBACCT VSUBS+8*, VSUBS+106*, VSUBS+120, INIT+5*
>> IBACT VSUBS+92*, VSUBS+100*, VSUBS+104*, VSUBS+106, VSUBS+118
IBB VSUBS+2~, HDR+2~, HDR+4*, HDR+5, HDR+6, HDR+22, HDR+30, BPAS+2~, IBSRTCOM+21*, IBSRTCOM+22
IBSV+2, IBSVA+2, IBSRTA+2~, IBSRTA1+2*, IBSRTA1+3*, IBSRTA1+5, IBSRTA1+6, IBSRTA1+7, IBASE+4~, IBASE+6*
IBASE+7*, IBASE+8, IBASE+9
IBBK DTC+2~, DTC5+2~
IBC VSUBS+2~, HDR+2~, HDR+4*, HDR+18, HDR+26, HDR+34, BPAS+2~, BPAS+11*, BPAS+12, BPAS+13
BPAS+14, BPAS+15, BPAS+16, BPAS+17, BPAS+18, BPAS+19, BPAS+20, IBSRTCOM+9~, IBSRTCOM+22*, IBSRTCOM+23
, IBSRTCOM+25, IBSV+2, IBSVA+2, IBSRTA+2~, IBSRTA1+4*, IBSRTA1+5*, IBSRTA1+6, IBSRTA1+7, IBASE+4~
>> IBCNS INIT+4
IBCNT IBASE+4~, IBASE+6*, IBASE+8*, IBASE+9
IBCNTR BPAS+6~, BPAS+7*, BPAS+8, BPAS+9, BPAS+11
>> IBCPOL INIT+4
>> IBCST VSUBS+8*, VSUBS+65*, VSUBS+120, INIT+5*
IBCT IBSRTMV+2~, IBSRTMV+3*, IBSRTMV+12*, IBSRTA1+7*
IBD VSUBS+2~, HDR+2~, BPAS+2~, BPAS+20*, IBSRTCOM+9~, IBSRTCOM+22*, IBSRTCOM+23*, IBSRTCOM+24*, IBSRTCOM+25*, IBSRTCOM+26*
, IBSRTCOM+27, IBSRTCOM+28, IBSV+2, IBSVA+2, IBSRTA+2~, IBSRTA1+6*, IBSRTA1+7, IBASE+4~, IBASE+8*, IBASE+9
IBDFN BPAS+2~, BPAS+10*
IBDIS HDR~, HDR+7*, HDR+8
IBDOB VSUBS+2~, VSUBS+74*, VSUBS+76
IBDT DTC+2~*, DTC+4*, DTCO+2, DTC5+2~*, DTC5+4*, DTC5O+2
IBDTCK VSUBS+2~, DTC~, DTC+3, DTC+4, DTC5~, DTC5+3, DTC5+4
IBE VSUBS+2~, HDR+2~, HDR+22*, HDR+24, HDR+25, HDR+30*, HDR+32, HDR+33, BPAS+2~, IBSRTCOM+9~
IBSRTA+2~
IBEFFDT VSUBS+2~, VSUBS+79*, VSUBS+81, VSUBS+94, VSUBS+102
IBERR VSUBS+2~
IBEXPDT VSUBS+2~, VSUBS+82*, VSUBS+84, VSUBS+96, VSUBS+98
IBF VSUBS+2~, BVA+2~, BVA+8*, BVA+9, AC+2~, AC+8*, AC+9, IS+2~, IS+8*, IS+9
, IBSRTCOM+9~
IBF1 HDR+2~, HDR+6*, HDR+30, HDR+31, HDR+33
IBF2 HDR+2~, HDR+5*, HDR+22, HDR+23, HDR+25
IBFL1 VSUBS+33~, VSUBS+37*, VSUBS+43
IBFL2 VSUBS+33~, VSUBS+39*, VSUBS+40
IBG BPAS+6~, BPAS+7*, BPAS+8*, BPAS+9, BPAS+11, IBSRTMV+2~, IBSRTMV+7*, IBSRTMV+8*, IBSRTMV+10, IBSRTMV+11
IBSRTMV+12
IBH IBSRTMV+2~, IBSRTMV+9*, IBSRTMV+10*, IBSRTMV+11, IBSRTMV+12
>> IBHDT INIT+9*
IBI IBSRTCOM+9~, IBSRTCOM+17*, IBSRTCOM+19*, IBSRTCOM+20, IBSRTCOM+21, IBSRTCOM+22, IBSRTMV+12, IBSRTA1+7, IBASE+4~, IBASE+6*
IBASE+7, IBASE+8, IBASE+9
>> IBINACCT VSUBS+8*, VSUBS+106*, VSUBS+120, INIT+5*
>> IBINACT VSUBS+92*, VSUBS+94*, VSUBS+98*, VSUBS+102*, VSUBS+106
IBIND VSUBS+3~, VSUBS+64*, VSUBS+77, VSUBS+79, VSUBS+82, VSUBS+86
IBINS0 VSUBS+3~, VSUBS+54*
IBJ SORT+2~, SORT+16*, SORT+17, SORT+18, IBSRTCOM+9~, IBSRTCOM+22*, IBSRTCOM+25*, IBSRTCOM+26, IBSRTMV+2~, IBSRTMV+11*
IBSRTMV+12
IBK IBSRTCOM+9~, IBSRTCOM+24*, IBSRTCOM+25, IBSRTMV+2~, IBSRTMV+3*, IBSRTMV+5*, IBSRTMV+6, IBSRTMV+8, IBSRTMV+10, IBSRTMV+11
IBL HDR+2~, HDR+16*, HDR+23*, HDR+24, HDR+25*, HDR+26, HDR+31*, HDR+32, HDR+33*, HDR+34
IBLA HDR+12~*, HDR+16*
>> IBLCNT INIT+3*
IBLINE BVA+2~, BVA+6*, BPAS+11*, AC+2~, AC+6*, IS+2~, IS+6*
IBNAM VSUBS+3~, VSUBS+67*, VSUBS+68*, VSUBS+69, VSUBS+117, VSUBS+118
IBNM BPAS+2~, BPAS+10*
IBNODE BPAS+2~, BPAS+10*
>> IBOSRT INIT+6*, SORT+6*, SORT+10, SORTQ+2
IBPTDFN VSUBS+3~, VSUBS+60*, VSUBS+61*, VSUBS+62, VSUBS+63, VSUBS+64, VSUBS+66, VSUBS+68, VSUBS+71, VSUBS+74
VSUBS+88, VSUBS+117, VSUBS+118
IBPTHOLD VSUBS+3~, VSUBS+69*, VSUBS+73*, VSUBS+75*, VSUBS+76*, VSUBS+78*, VSUBS+80*, VSUBS+81*, VSUBS+83*, VSUBS+84*
VSUBS+87*, VSUBS+89*, VSUBS+92*, VSUBS+94, VSUBS+96, VSUBS+102, VSUBS+117, VSUBS+118
IBPTINS VSUBS+3~, VSUBS+61*, VSUBS+62*, VSUBS+63, VSUBS+64, VSUBS+88, VSUBS+117, VSUBS+118
IBQUIT SORT+2~, SORT+3*, SORT+13*, SORT+14*, SORT+17*, SORT+19*, SORTQ+2, IBSRTNM+4*, IBSRQU+6~
>> IBSACT INIT+6*, ACINI+2*, ININI+2*, ALLINI+2*, SORT+5*, SORTQ+5, SORTQ+6, SORTQ+7, IBSRTCOM+17, IBSRTCOM+19
IBSORTA INIT+6*, ACINI+2*, ININI+2*, ALLINI+2*, HDR+13, HDR+14, SORT+6, SORT+14*, SORT+15, SORT+16
SORT+20, SORTQ+2*, IBSRTNM+5, IBSRTCOM~, IBSRTCOM+10, IBSRTCOM+23, IBSRTCOM+24
>> IBSPACE INIT+10*, HDR+16, HDR+18, HDR+24, HDR+26, HDR+32, HDR+34
IBSRF SORT+2~, IBSRQU~, IBSRQU+7*, IBSRQU+9, IBSRQU+13
IBSRNM SORT+2~, IBSRQU~, IBSRQU+8, IBSRQU+11
IBSRR IBSRQU~, IBSRQU+8
>> IBTMP VSUBS+6*, VSUBS+7, VSUBS+25, VSUBS+53, VSUBS+58, VSUBS+117, VSUBS+118, VSUBS+120, INIT+5*, INIT+7
IBTMP1 BVA+2~, BVA+5*, BPAS+7, BPAS+8, BPAS+9, BPAS+11, AC+2~, AC+5*, IS+2~, IS+5*
IBVPCLBG EXIT+1!
IBVPCLEN EXIT+1!
IBWORK SORT+2~, SORT+20, IBSRTNM+5, IBSRQU+15*, IBSRQU+16*, IBSRTCOM~, IBSRTMV+3, IBSRTMV+4, IBSRTMV+5, IBSRTMV+7
IBSRTMV+8, IBSRTMV+9, IBSRTMV+10, IBSRTMV+13, IBSRTA+3, IBSRTA+5, IBSRTA1+2, IBSRTA1+3, IBSRTA1+4, IBSRTA1+5
>> LENEP VSUBS+8*, VSUBS+46*, VSUBS+50*, INIT+5*
>> LENPT VSUBS+8*, INIT+5*
NAME VSUBS+33~, VSUBS+41*, VSUBS+42*, VSUBS+43
NUM VSUBS+3~, VSUBS+33~, VSUBS+34*, VSUBS+35*, VSUBS+40
ST VSUBS+4~, VSUBS+14*, VSUBS+19
U VSUBS+18, VSUBS+22, VSUBS+92, VSUBS+94, VSUBS+96, VSUBS+102, VSUBS+120, HDR+5, HDR+6, HDR+10
, HDR+18, HDR+21, HDR+22, HDR+26, HDR+29, HDR+30, HDR+34, BPAS+14, BPAS+16, BPAS+17
BPAS+20, AC+9, IS+9, SORT+12, SORT+13, SORT+19, IBSRTNM+4, IBSRQU+14, IBSRTCOM+23, IBSRTCOM+25
>> VALM("TITLE" HDR+8*
>> VALMANS HELP+2
>> VALMAR BVA+7, BVA+10, BVA+11, BPAS+21, AC+7, AC+10, AC+11, IS+7, IS+10, IS+11
VALMBCK VP+3*, EXIT+1!, EXIT+3*, HELP+15*, INIT+19*, ACINI+6*, ININI+6*, ALLINI+6*, SORTQ+8*
>> VALMBG VP+3*, EXIT+3*, INIT+3*, INIT+19*, ACINI+6*, ININI+6*, ALLINI+6*, BVA+6*, AC+6*, IS+6*
SORTQ+8*
>> VALMCNT INIT+3*, BVA+6*, BVA+10*, BPAS+11*, BPAS+21, AC+6*, AC+10*, IS+6*, IS+10*
>> VALMHDR(1 HDR+19*
>> VALMHDR(2 HDR+27*
>> VALMHDR(3 HDR+35*
X VSUBS+4~, VSUBS+16*, VSUBS+17*, VSUBS+18*, VSUBS+19*, VSUBS+20*, VSUBS+21*, VSUBS+22*, VSUBS+25, VSUBS+66*
VSUBS+67, HELP+2*, HELP+4~, HELP+14!, BPAS+2~, BPAS+8*, BPAS+11*, BPAS+12*, BPAS+13*, BPAS+14*
BPAS+15*, BPAS+16*, BPAS+17*, BPAS+18*, BPAS+19*, BPAS+20*, BPAS+21, SORT+2~, IBSRTNM+2~, IBSRQU+6~
X0 VSUBS+4~, VSUBS+11*, VSUBS+15, VSUBS+16
X11 VSUBS+4~, VSUBS+12*, VSUBS+13, VSUBS+14, VSUBS+17, VSUBS+18
XX VSUBS+4~, VSUBS+15*, VSUBS+16, VSUBS+33~, VSUBS+36*, VSUBS+37, VSUBS+40*, VSUBS+43*, VSUBS+44*, VSUBS+47*
VSUBS+51*, VSUBS+53, VSUBS+71*, VSUBS+72*, VSUBS+73, VSUBS+74*, VSUBS+75, VSUBS+76*, VSUBS+77*, VSUBS+78
VSUBS+79*, VSUBS+80, VSUBS+81*, VSUBS+82*, VSUBS+83, VSUBS+84*, VSUBS+86*, VSUBS+87, VSUBS+88*, VSUBS+89
Y VSUBS+4~, HELP+4~, HELP+14!, SORT+2~, SORT+12*, SORT+13, SORT+14, SORT+18*, SORT+19, IBSRTNM+2~
IBSRTNM+3*, IBSRTNM+4, IBSRQU+6~, IBSRQU+13*, IBSRQU+14*, IBSRQU+16, IBSRQU+17
Z VSUBS+4~, VSUBS+13*, VSUBS+20
ZZ VSUBS+33~, VSUBS+38*, VSUBS+39, VSUBS+45*, VSUBS+46, VSUBS+47, VSUBS+48*, VSUBS+49*, VSUBS+50, VSUBS+51
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 |  Local Variables  | All