Routine: ABMDTINS

Package	Total	Call Graph
VA Fileman	6	^DIC FILE^DICN ^DIE ^DIK $$GET1^DIQ ^DIR
Third Party Billing	1	^ABMDTIN1

Package	Total	Caller Graph
Third Party Billing	1	ABMDBETA

Entry Points

External References

Name	Field # of Occurrence
^ABMDTIN1	CLINIC+15
^DIC	SEL, CLINIC+8
FILE^DICN	ADD+5
^DIE	EDIT+3, EDIT+5, ADDR+1, ADDR+3, ADDR+4, ADDR+6, ADDR+9, ADDR+13, ADDR+16, ADDR+18 , ADDR+23, ADDR+24, CLINIC+14, KEYWD+11
^DIK	KILL
$$GET1^DIQ	ADDR+9
^DIR	ABMDTINS+10, ABMDTINS+14, ADD+1, ADD+3, PAZ

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"WARNING: Before ADDING a new INSURER you should ensure that it" Line Location: ABMDTINS+8
Function Call: WRITE	Prompt: !?9,"does not already exist!" Line Location: ABMDTINS+9
Function Call: WRITE	Prompt: ! Line Location: ABMDTINS+12
Function Call: WRITE	Prompt: !! Line Location: SEL+0
Function Call: WRITE	Prompt: ! Line Location: ADD+1
Function Call: WRITE	Prompt: *7,!!,"The Insurer '",X,"' already exists!" Line Location: ADD+2
Function Call: WRITE	Prompt: !,*7 Line Location: ADD+3
Function Call: WRITE	Prompt: !,"OK, adding..." Line Location: ADD+4
Function Call: WRITE	Prompt: *7,!!,"ERROR: INSURER NOT CREATED",!! Line Location: ADD+6
Function Call: WRITE	Prompt: *7,!!,"Record in USE by another USER, try Later!" Line Location: EDIT+0
Function Call: WRITE	Prompt: ! Line Location: EDIT+3
Function Call: WRITE	Prompt: !!,"<--------------- MAILING ADDRESS --------------->" Line Location: ADDR+0
Function Call: WRITE	Prompt: !!,"<--------------- BILLING ADDRESS --------------->",!?6,"(if Different than Mailing Address)" Line Location: ADDR+2
Function Call: WRITE	Prompt: ! Line Location: ADDR+4
Function Call: WRITE	Prompt: ! Line Location: CLINIC+1
Function Call: WRITE	Prompt: ! Line Location: CLINIC+16
Function Call: WRITE	Prompt: !!,*7,"<Data Incomplete: Entry Deleted>" Line Location: KILL+0
Routine Call	DIE Line Location: EDIT+3 EDIT+5 ADDR+1 ADDR+3 ADDR+4 ADDR+6 ADDR+9 ADDR+13 ADDR+16 ADDR+18 ADDR+23 ADDR+24 CLINIC+14 KEYWD+11
Routine Call	DIC Line Location: SEL CLINIC+8
Routine Call	DIR Line Location: ABMDTINS+10 ABMDTINS+14 ADD+1 ADD+3 PAZ

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUTNINS - [#9999999.18]	Classic Fileman Calls, GET1^DIQ
^AUTTINTY - [#9999999.181]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMNINS(	ADDR+10, ADDR+20, ADDR+21!
^AICDKWLC - [#9001010]	SKEY
^AICDKWLC("B"	KEYWD+1
^AUTNINS - [#9999999.18]	EDIT, ADDR+5, ADDR+15, ADDR+20, CLINIC+7, XIT, KEYWD+1, KEYWD+2, KEYWD+10
^AUTNINS("B"	ADD+2

Label References

Name	Line Occurrences
ADD	ABMDTINS+11
ADDR	EDIT+2
EDIT	SEL+1
KEYWD	EDIT+4
KILL	EDIT+3, EDIT+5, ADDR+1, ADDR+3
PAZ	ADD+2, ADD+6, EDIT, KILL
SEL	SEL, ADD+3
SKEY	KEYWD+4, KEYWD+7, KEYWD+8, KEYWD+9
XIT	ABMDTINS+10, ABMDTINS+14, SEL, ADD+1, ADDR+4, ADDR+5, ADDR+13, ADDR+16, ADDR+18, ADDR+24 , CLINIC+2, CLINIC+15, CLINIC+17, KILL+1

Naked Globals

Name	Field # of Occurrence
^(	ADDR+10, SKEY
^(0	CLINIC+7*, KEYWD+2, SKEY
^(4	KEYWD+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	ABMDTINS+7!, ADD, ADDR+20, ADDR+21, ADDR+22, XIT+1!, KEYWD+3, KEYWD+4, KEYWD+5, KEYWD+6 , KEYWD+7, KEYWD+8, SKEY*, SKEY+1
ABM("CH"	KEYWD+6*, KEYWD+7, KEYWD+8
ABM("DFLT"	ADDR+10*, ADDR+13, ADDR+20
ABM("DFN"	SEL+1, ADD, ADD+7*, EDIT, EDIT+1, CLINIC+3, XIT
ABM("I"	KEYWD+1*, KEYWD+3
ABM("L"	KEYWD+1*, SKEY
ABM("LOCK"	ADD*
ABM("MODE"	SEL+1, ADD, ADDR+2*, KILL
ABM("O"	KEYWD+1, KEYWD+2, KEYWD+3*
ABM("OL"	KEYWD+5, KEYWD+6, KEYWD+8, KEYWD+9
ABM("R"	KEYWD+1, KEYWD+10, KEYWD+11, SKEY+1
ABM("X"	ADD+1, ADD+3, ADD+5, KEYWD+1, KEYWD+3, KEYWD+10*, KEYWD+11
DA	EDIT+1, ADDR+5, ADDR+9, ADDR+10, ADDR+15, ADDR+20, ADDR+21, ADDR+22, ADDR+23, CLINIC+11 , XIT+2!, KEYWD+1, KEYWD+2, KEYWD+10
DA(1	ADDR+22, ADDR+23, CLINIC+3, CLINIC+7
DD	ADD+5!
DIC	ABMDTINS+15!, SEL!, ADD+5, CLINIC+4*, CLINIC+9!, XIT+1!
DIC("A"	SEL, CLINIC+6
DIC("S"	ABMDTINS+15*
DIC(0	SEL, ADD+5, CLINIC+5*
DIE	EDIT+1, ADDR+14, ADDR+17, ADDR+22, ADDR+23, CLINIC+12, XIT+1!, KILL
>> DIK	KILL*
DIR	ABMDTINS+10!, ABMDTINS+12!, ABMDTINS+14!, ADD+1!, ADD+3!, PAZ!
DIR("?"	ABMDTINS+13*
DIR("A"	ABMDTINS+10, ABMDTINS+12, ADD+1, ADD+3
DIR("B"	ABMDTINS+10, ABMDTINS+12
DIR(0	ABMDTINS+10, ABMDTINS+12, ADD+1, ADD+3, PAZ*
>> DIROUT	ABMDTINS+14, CLINIC+15
>> DIRUT	ABMDTINS+10, ABMDTINS+14, ADD+1
DO	ADD+5!
DR	EDIT+3, EDIT+5, ADDR+1, ADDR+3, ADDR+4, ADDR+6, ADDR+9, ADDR+13, ADDR+15, ADDR+17! , ADDR+18, ADDR+22, ADDR+23!, ADDR+24, CLINIC+13, XIT+2!, KEYWD+11
>> DTOUT	SEL, ADD+3, CLINIC+2, CLINIC+10, CLINIC+15
>> DUOUT	SEL, ADD+3, CLINIC+2, CLINIC+10, CLINIC+15
DUZ(2	ADDR+10, ADDR+20, ADDR+21
U	ADDR+5, ADDR+15, ADDR+20, KEYWD+1, KEYWD+2, KEYWD+10, SKEY
X	SEL, ADD+1, ADD+2, ADD+5*, XIT+2!
Y	ABMDTINS+10, ABMDTINS+11, ABMDTINS+15, SEL, SEL+1, ADD+3, ADD+6, ADD+7, EDIT+3, EDIT+5 , ADDR+1, ADDR+3, ADDR+4, ADDR+5, ADDR+6, ADDR+13, ADDR+16, ADDR+18, ADDR+24, CLINIC+2 , CLINIC+10, CLINIC+11, XIT+2!

Customize PDF page

Package: Third Party Billing

Routine: ABMDTINS

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: