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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCNSM

Package: Integrated Billing

Routine: IBCNSM


Information

IBCNSM ;ALB/AAS - INSURANCE MANAGEMENT, LIST MANAGER INIT ROUTINE ; 30-NOV-2021

Source Information

Source file <IBCNSM.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
Integrated Billing 6 $$BUFFER^IBCNBU1  $$GRP^IBCNS  ALL^IBCNS1  $$PLCOV^IBCNSU3  POL^IBCNSU41  $$DAT1^IBOUTL  
VA FileMan 4 ^DIC  DT^DICRW  $$GET1^DIQ  ^DIR  
List Manager 3 EN^VALM  ($$SETFLD,FULL)^VALM1  CLEAN^VALM10  
Kernel 1 $$FMTE^XLFDT  
Registration 1 PID^VADPT  

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

Package Total Caller Graph
Integrated Billing 29 IBCNS EXIT  IBCNS INSURANCE MANAGEMENT  IBCNSA1  IBCNSD  IBCNSM CHANGE PATIENT  IBCNSM1  IBCNSM2  IBCNSM3  
IBCNSM31  IBCNSM4  IBCNSM5  IBCNSM6  IBCNSM9  IBCNSP3  IBCNSU2  IBCNSU21  
IBCNSV  IBNCPDPI  IBNCPIV  IBTRC  IBTRC1  IBTRC4  IBTRE  IBTRE1  
IBTRED2  IBTRR  IBTRR1  IBTRV  IBTRV1  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ;
ENQ
INIT ; -- set up inital variables
INITQ
PAT ; -- select patient you are working with
BLD ; -- build list of bills
BLDQ ;
SET(X) ; -- set arrays
HDR ; -- screen header for initial screen
FNL ; -- exit and clean up
YN(X,Y) ; -- convert 1 or 0 to yes/no/unknown
COB(X) ; -- convert COB value to "UNK", "P", "S" or "T"
CP ; -- change patient
CPQ
PCI
FASTEXIT ;just sets a flag signaling system should be exited

External References

Name Field # of Occurrence
^DIC PAT+2
DT^DICRW EN+1
$$GET1^DIQ BLD+36, BLD+37, BLD+38, BLD+64
^DIR INIT+5, FASTEXIT+3
$$BUFFER^IBCNBU1 HDR+5
$$GRP^IBCNS BLD+28
ALL^IBCNS1 BLD+8, BLD+9
$$PLCOV^IBCNSU3 BLD+20
POL^IBCNSU41 BLD+7
$$DAT1^IBOUTL BLD+29, BLD+30, BLD+43
PID^VADPT HDR+1
EN^VALM EN+3, INIT+8
$$SETFLD^VALM1 BLD+24, BLD+25, BLD+26, BLD+27, BLD+28, BLD+29, BLD+30, BLD+31, BLD+40, BLD+42
BLD+43, BLD+44, BLD+45, BLD+47
FULL^VALM1 CP+2, FASTEXIT+2
CLEAN^VALM10 FNL+3
$$FMTE^XLFDT BLD+55, BLD+60, BLD+66, HDR+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls,  GET1^DIQ
^IBE(355.1 - [#355.1] GET1^DIQ
^IBA(355.3 - [#355.3] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] BLD+25
^DPT - [#2] HDR+3
^IBA(354 - [#354] BLD+58
^IBA(355.3 - [#355.3] BLD+17
^IBE(355.1 - [#355.1] BLD+31
^TMP("IBNSM" INIT+2!, BLD+1!, BLD+52, BLD+53*, BLD+54*, BLD+55*, BLD+60*, BLD+66*, SET+1*, SET+2*
FNL+1!
^TMP("IBNSMDX" INIT+2!, BLD+1!, SET+3*, FNL+1!
^VA(200 - [#200] BLD+42

Label References

Name Line Occurrences
$$COB BLD+47
$$YN BLD+44, BLD+45
BLD INIT+7, CP+5
HDR CP+5
INITQ INIT+5
PAT CP+3
SET BLD+49

Naked Globals

Name Field # of Occurrence
^(0 BLD+25, HDR+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN ENQ!, INIT+7*, PAT+3*, BLD+7, BLD+8, BLD+9, BLD+58, BLD+64, SET+3, HDR+3
HDR+5, CP+3, CP+4*
>> DIC PAT+2*
>> DIC(0 PAT+2*
DIR INIT+5!, FASTEXIT+3!, FASTEXIT+5!
DIR("A" INIT+4*, FASTEXIT+3*
DIR("B" FASTEXIT+3*
DIR(0 INIT+4*, FASTEXIT+3*
>> DIRUT INIT+5, FASTEXIT+4
DPTNOFZY PAT+1~*
I BLD+2~
IB3551IEN BLD+35~, BLD+36*, BLD+37, BLD+38
IBCDFND BLD+2~, BLD+14*, BLD+16, BLD+25, BLD+26, BLD+27, BLD+28, BLD+29, BLD+30, BLD+36
BLD+47, SET+3
IBCDFND1 BLD+2~, BLD+15*, BLD+42, BLD+43
>> IBCNS INIT+8*
IBCNT BLD+2~, BLD+3*, BLD+22*, BLD+24, BLD+53*, BLD+59*, BLD+60, BLD+65*, BLD+66, SET+2
, SET+3
IBCPOLD BLD+2~, BLD+17*, BLD+31, BLD+44, BLD+45
IBDFN CP+3*, CP+4, CPQ!
IBDOD BLD+2~, BLD+64*, BLD+66
IBFASTXT FNL+2!, FASTEXIT+4*
>> IBFILE BLD+3*, SET+3
IBGRP BLD+2~, BLD+48!
IBHOLD BLD+2~, BLD+27*, BLD+48!
IBINS BLD+2~, BLD+6!*
IBINS( BLD+11, BLD+14, BLD+15
IBINS(0 BLD+11
>> IBN BLD+3*
>> IBNCPIVD BLD+8, BLD+9, BLD+20, BLD+55
IBPL BLD+2~, BLD+16*, BLD+17, BLD+20
>> IBTYP INIT+7*, INIT+8*
IBTYPA BLD+35~, BLD+38*, BLD+39
IBTYPN BLD+35~, BLD+37*, BLD+39
IBTYPO BLD+35~, BLD+39*, BLD+40
>> IBY INIT+6*, INIT+7, INIT+8
J BLD+2~
K BLD+2~, BLD+11*, BLD+14, BLD+15, SET+3
U INIT+1*, BLD+16, BLD+31, BLD+42
>> VA("BID" HDR+3
>> VALMBCK CP+7*, PCI*, FASTEXIT+1*
>> VALMBG INIT+1*, CP+7*
>> VALMCNT INIT+1*, BLD+3*, BLD+53*, SET+1*, SET+2, SET+3
VALMEVL EN+2!
>> VALMHDR(1 HDR+3*
>> VALMHDR(2 HDR+4*, HDR+5*
VALMQUIT INIT+5*, INIT+8*, PAT+2*, CP+1~, CP+4
X BLD+23*, BLD+24*, BLD+25*, BLD+26*, BLD+27*, BLD+28*, BLD+29*, BLD+30*, BLD+31*, BLD+40*
BLD+42*, BLD+43*, BLD+44*, BLD+45*, BLD+47*, BLD+49, BLD+58*, BLD+60, SET~, SET+1
, YN~, YN+1, COB~, COB+1
XQORS EN+2!
Y INIT+6, PAT+2, PAT+3, YN~, YN+1, FASTEXIT+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All