Routine: GMPLPREF

Information

GMPLPREF ; SLC/MKB -- Problem List User Preferences ;2/1/96 12:31

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for GMPL USER PREFS
INIT	; -- init variables and list array
GETSLIST	; -- init SERVICE list array
GETCLIST	; -- init CLINIC list array
ITEM(IFN,NAME,VIEW,CNT)	;Add item to list display
HDR	; -- header code
HELP	; -- help code
CLEAN	; -- exit code
MSG()	; -- msg line for more help

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Preferred View saved.",! Line Location: INIT+4
Function Call: WRITE	Prompt: !!,"Retrieving the list of clinical services ..." Line Location: GETSLIST+2
Function Call: WRITE	Prompt: !!,"Retrieving the list of clinics ..." Line Location: GETCLIST+2
Function Call: WRITE	Prompt: !!?4,"To create or change your preferred view, choose either Add or" Line Location: HELP+3
Function Call: WRITE	Prompt: !?4,"Remove; those "_X_" you add will be flagged above with a 'Y'." Line Location: HELP+4
Function Call: WRITE	Prompt: !?4,"Within the Problem List application, ONLY those problems associated" Line Location: HELP+5
Function Call: WRITE	Prompt: !?4,"with your selected "_X_" will initially be displayed, however" Line Location: HELP+6
Function Call: WRITE	Prompt: !?4,"the entire list is always available using its Select View option." Line Location: HELP+7
Function Call: WRITE	Prompt: !?4,"If you wish to create a view according to "_Y_" instead, or not" Line Location: HELP+8
Function Call: WRITE	Prompt: !?4,"to have a view at all, choose Select New View or Delete respectively." Line Location: HELP+9
Function Call: WRITE	Prompt: !!,"Press <return> to continue ... " Line Location: HELP+10
Function Call: WRITE	Prompt: !!,$C(7),">>> YOUR PREFERRED VIEW HAS CHANGED!!" Line Location: CLEAN+3