Routine: NURSALE0

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE (,IX1)^DIK

Package

Total

Call Graph

VA Fileman

^DIC ^DIE (,IX1)^DIK

Package	Total	Caller Graph
Nursing Service	1	NURSALED

Package

Total

Caller Graph

Nursing Service

NURSALED

Name	Comments	DBIA/ICR reference
DELB	;
VERIFY	;
DELM	;
EDM	;
DMAS	;
ADD	;
ADDB	;
ASKB	;
ADDM	;
DIC

Name	Field # of Occurrence
^DIC	DIC
^DIE	EDM+3, DMAS+2
^DIK	DELM+2, DELB+2
IX1^DIK	ADD+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Would you like to (A)dd new AMIS bed sections" Line Location: ASKB+2
Function Call: WRITE	Prompt: ", (D)elete existing AMIS",!,"bed sections from the above listing, (E)dit the associated MAS ward",!,"relationship," Condition for execution: NURSOBED Line Location: ASKB+2
Function Call: WRITE	Prompt: "this prompt (A"_$S(NURSOBED:"/D/E",1:"")_"/B): "_$S(NURSOBED:"B",NURSNEW:"A",1:"B")_"// " Line Location: ASKB+3
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASKB+4
Function Call: WRITE	Prompt: !?4,$C(7),"ANSWER WITH A IF YOU WOULD LIKE TO ADD MORE AMIS BED SECTIONS FOR",!?18,"THIS UNIT" Line Location: ASKB+5
Function Call: WRITE	Prompt: !?13,"OR B IF YOU WOULD LIKE TO DO NOTHING AND BYPASS THIS PROMPT." Line Location: ASKB+7
Function Call: WRITE	Prompt: !?4,$C(7),"INVALID ENTRY, TYPE ? TO GET MORE HELP" Line Location: ASKB+8
Function Call: WRITE	Prompt: ! Line Location: ADDM+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: DELM+1
Function Call: WRITE	Prompt: !,"Select the number",$S(OMAS>1:"(s)",1:"")," of the entries you wish to delete (1",$S(OMAS>1:"-"_OMAS,1:""),"): " Line Location: DELM+1
Function Call: WRITE	Prompt: ! Line Location: EDM+4
Function Call: WRITE	Prompt: ! Line Location: ADDB+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: DELB+1
Function Call: WRITE	Prompt: !,"Select the number",$S(OBED>1:"(s)",1:"")," of the entries you wish to delete (1",$S(OBED>1:"-"_OBED,1:""),"): " Line Location: DELB+1
Function Call: WRITE	Prompt: !?5,$C(7),"ANSWER WITH A NUMBER"_$S(NURSW=1:" ",1:", OR RANGE OF NUMBERS, ")_" WITHIN THE RANGE (1"_$S(NURSW=1:"",1:"-"_NURSW)_")" Line Location: VERIFY+3
Routine Call	DIE Line Location: EDM+3 DMAS+2
Routine Call	DIC Line Location: DIC

FileNo	Call Tags
^NURSF(211.4 - [#211.4]	Classic Fileman Calls
^NURSF(213.3 - [#213.3]	Classic Fileman Calls
^DIC(42 - [#42]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^NURSF(211.4 - [#211.4]	EDM+2, ADD+1, ADD+2, ADD+3*, ADD+5, DMAS+2

Name	Line Occurrences
ADD	ADDM+2, ADDB+2
ADDB	ADDB+3
ADDM	ADDM+3
ASKB	ASKB+7, ASKB+8
DELB	DELB+1
DELM	DELM+1
DIC	ADDM+1, EDM+1, ADDB+1
DMAS	DELB+2
EDM	EDM+4
VERIFY	DELM+1, DELB+1

Name	Field # of Occurrence
^(0	ADD+1*

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	DELM+2, EDM+2, DELB+2, ADD+2, ADD+3, ADD+5, DMAS+2*
>> DA(1	ADDM+2, DELM+2, EDM+3, ADDB+2, DELB+2*, ADD+1, ADD+2, ADD+3, ADD+5, DMAS+2
DIC	ADDM+1, EDM+1, ADDB+1*, DIC!
DIC("A"	ADDM+1, EDM+1, ADDB+1*
DIC("S"	ADDM+1, EDM+1, ADDB+1*
DIC(0	ADDM+1, EDM+1, ADDB+1*
DIDEL	DMAS+2*, DMAS+3!
>> DIE	EDM+3, DMAS+2
DIK	DELM+2, DELB+2, ADD+4*!
>> DR	EDM+3, DMAS+2
DTIME	ASKB+4, DELM+1, DELB+1
DTOUT	DIC!
DUOUT	DIC!
>> NURSA	VERIFY+2*
>> NURSB	VERIFY+2, DMAS+1, DMAS+2
>> NURSC	VERIFY+2*
NURSD	DELM+2, DELB+2, VERIFY+1!, DMAS+1
NURSD(	DELM+2, DELB+2, VERIFY+2*
>> NURSMLT	ADDM+2, ADDB+2, ADD+1, ADD+2, ADD+3, ADD+5
>> NURSNEW	ASKB+3, ASKB+4
>> NURSOBED	ASKB+1, ASKB+2, ASKB+3, ASKB+4, ASKB+6
>> NURSSBF	ADD+1*
>> NURSW	DELM+1, DELB+1, VERIFY+2, VERIFY+3
>> NURSWARD	ADDM+2, DELM+2, EDM+2, EDM+3, ADDB+2, DELB+2
>> NURSX	ASKB+4, ASKB+5, DELM+1, EDM+3, DELB+1, DIC*
>> NURSY	DELM+1, DELB+1, VERIFY+1, VERIFY+2, VERIFY+3*
>> NURSZ	VERIFY+2*
>> NURSZ(0	VERIFY+2*
>> NURSZN	ADD+2*, ADD+3
>> OBED	DELB+1
>> OBED(	DELB+2, DMAS+1
>> OMAS	DELM+1
>> OMAS(	DELM+2
>> X	ASKB+4, ADDM+2, DELM+1, ADDB+2, DELB+1*, ADD+3, VERIFY+2
>> Y	ADDM+1, ADDM+2, EDM+1, EDM+2, EDM+3, ADDB+1, ADDB+2

Customize PDF page

Package: Nursing Service

Routine: NURSALE0

Information

Source Information

Call Graph

Call Graph Total: 3

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: