Routine: GMPLBLDF

Information

GMPLBLDF ; SLC/MKB -- Build Problem Selection List from IB Enc Form ;5/12/94 10:26

Name	Comments	DBIA/ICR reference
EN	; Start here.
EN0
EN1	; Create list to copy problems into
EN2
EN3	; Here we go ...
EXIT	; Clean-up
NEWGRP(FORM,HDR,SEQ)	; Create new group entries in #125.1 and #125.11
NGQ

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,">>> The IB Encounter Form utility is not available.",! Line Location: EN+2
Function Call: WRITE	Prompt: !,"Searching for the problems ..." Line Location: EN0+1
Function Call: WRITE	Prompt: !!,"No problems found. Please select another form.",! Line Location: EN0+3
Function Call: WRITE	Prompt: !!,">>> Please create a new selection list in which to store these problems:" Line Location: EN1+5
Function Call: WRITE	Prompt: $C(7),!,"There is already a list by this name!",! Line Location: EN2+1
Function Call: WRITE	Prompt: !!,"ERROR -- Cannot create new list!",$C(7) Line Location: EN2+3
Function Call: WRITE	Prompt: !!,"Copying problems from "_$P(GMPLFORM,U,2)_" form into " Line Location: EN3+1
Function Call: WRITE	Prompt: $P(GMPLSLST,U,2)_" list ..." Line Location: EN3+3
Function Call: WRITE	Prompt: "." Line Location: EN3+11
Function Call: WRITE	Prompt: " <done>" Line Location: EN3+12