Routine: GMPLPRF1

Package	Total	Call Graph
Problem List	1	$$MSG^GMPLPREF
VA Fileman	1	^DIR

Package	Total	Caller Graph
Problem List	2	GMPLISRV GMPLPREF

Entry Points

Name	Comments	DBIA/ICR reference
SELECT()	; Select item(s) from list
ADD2
ADD1
SWITCH	; -- change preferred views (service <--> clinic)
REMOVE	; -- delete item(s) from view
DIFFRENT()	; -- Returns 1 if view has changed, else 0
SW1
ADD	; -- add item(s) to view
INCLCHLD(IFN)	; Returns 1 or 0, to include 'child' services in selection
SAVE	; -- save new view in File #200/Field #125
DELETE	; -- delete preferred view (no view)

External References

Name	Field # of Occurrence
^DIR	INCLCHLD+6, SELECT+8, SWITCH+10, DELETE+4
$$MSG^GMPLPREF	ADD2+9, REMOVE+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"You may not have more than 60 "_I_"s included in your view!" Line Location: ADD1+3
Function Call: WRITE	Prompt: "." Line Location: ADD2+2
Function Call: WRITE	Prompt: "." Line Location: ADD2+7
Function Call: WRITE	Prompt: "." Line Location: REMOVE+8
Function Call: WRITE	Prompt: "." Line Location: REMOVE+11
Function Call: WRITE	Prompt: !!,"Deleting preferred view of "_$S(GMPLMODE="S":"services",1:"clinics")_" ..." Line Location: DELETE+5
Function Call: WRITE	Prompt: " done." Line Location: DELETE+7
Routine Call	DIR Line Location: INCLCHLD+6 SELECT+8 SWITCH+10 DELETE+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(49 - [#49]	ADD2+5, ADD2+6, REMOVE+9, REMOVE+10, INCLCHLD+1
^VA(200 - [#200]	DIFFRENT+4, SAVE+1, SAVE+4*

Label References

Name	Line Occurrences
$$INCLCHLD	ADD2+6, REMOVE+10
$$SELECT	ADD1, REMOVE+2
@(	SW1+2
ADD1	ADD1+2
SAVE	DELETE+7
SW1	SWITCH+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNUM	ADD+1~, ADD2+7, ADD2+8, REMOVE+1~, REMOVE+11, REMOVE+12
DIR	INCLCHLD+1~, SELECT+1~, SWITCH+1~, DELETE+1~
DIR("?"	INCLCHLD+3, INCLCHLD+4, INCLCHLD+5, SELECT+7, SWITCH+4, SWITCH+5, SWITCH+6, DELETE+3
DIR("A"	INCLCHLD+2, SELECT+4, SELECT+5, SELECT+6, SWITCH+3, DELETE+2
DIR("B"	INCLCHLD+1, SELECT+6, SWITCH+3, DELETE+1
DIR(0	INCLCHLD+2, SELECT+3, SWITCH+3, DELETE+1
>> DTOUT	INCLCHLD+6, SELECT+8
DUZ	DIFFRENT+4, SAVE+1, SAVE+4
>> GMPLIST(	ADD2+3, ADD2+8, REMOVE+6, REMOVE+12
>> GMPLIST("B"	ADD2+7, REMOVE+11
>> GMPLIST("IDX"	ADD2+2, REMOVE+6
>> GMPLIST("VIEW"	ADD1+2, ADD1+4, ADD1+5, ADD2+4, ADD2+8, REMOVE+7, REMOVE+8!, REMOVE+12!, DIFFRENT+2, SAVE+2 , DELETE+6!*
>> GMPLIST(0	SELECT+2
>> GMPLMODE	ADD1+1, ADD2+5, REMOVE+4, REMOVE+9, SELECT+4, SELECT+7, DIFFRENT+3, SAVE+1, SWITCH+8, SWITCH+9 , SW1+1, SW1+2, DELETE+5, DELETE+6
GMPLNO	ADD+1~, ADD1+1, ADD1+2, ADD2, ADD2+1, REMOVE+1~, REMOVE+3, REMOVE+4, REMOVE+5
GMPLSEL	ADD+1~, ADD1, ADD1+1, ADD2+1, REMOVE+1~, REMOVE+2, REMOVE+3, REMOVE+5
>> GMPLVIEW	SWITCH+2, SW1+1*
>> GMPSAVED	SAVE+4*
I	ADD+1~, ADD1+1, ADD1+3, ADD1+4, ADD1+5, ADD2!, ADD2+1, REMOVE+1~, REMOVE+5, DIFFRENT+1~ , DIFFRENT+2, SAVE+1~, SAVE+2*
IFN	ADD+1~, ADD2+2, ADD2+4, ADD2+5, ADD2+6, REMOVE+1~, REMOVE+6, REMOVE+7, REMOVE+8, REMOVE+9 , REMOVE+10, INCLCHLD~, INCLCHLD+1
J	ADD+1~, ADD2+6, ADD2+7, ADD2+8, REMOVE+1~, REMOVE+10, REMOVE+11, REMOVE+12
MAX	SELECT+1~, SELECT+2*, SELECT+3, SELECT+5, SELECT+6
NAME	INCLCHLD+1~*, INCLCHLD+2
NUM	ADD+1~, ADD2+1, ADD2+2, ADD2+3, REMOVE+1~, REMOVE+5, REMOVE+6
TEMP	DIFFRENT+1~, DIFFRENT+2, DIFFRENT+3, DIFFRENT+4, SAVE+1~, SAVE+2, SAVE+3, SAVE+4
TMP	ADD2+3, ADD2+8, SAVE+1~*, SAVE+4
U	INCLCHLD+1, DIFFRENT+4, SAVE+1, SAVE+4
>> VALMBCK	ADD+1, ADD2+9, REMOVE+1, REMOVE+13, SWITCH+1, SW1+1, DELETE+1, DELETE+6
>> VALMCC	ADD+1, REMOVE+1, SWITCH+1, DELETE+1
VALMHDR	ADD2+9!, REMOVE+13!, SW1+2!
>> VALMSG	ADD2+9, REMOVE+13
X	INCLCHLD+1~, SELECT+1~, SELECT+8, SWITCH+1~, DELETE+1~
Y	INCLCHLD+1~, INCLCHLD+6, INCLCHLD+7, SELECT+1~, SELECT+8, SELECT+9, SWITCH+1~*, SW1, DELETE+1~, DELETE+4

Customize PDF page

Package: Problem List

Routine: GMPLPRF1

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: