* PGMS.FMT - Format for adding a search program record. @ 1,10 SAY TMARK + " " + CNAME @ 3,10 SAY MTITLE @ 5,10 SAY "File selected is " + FDESC @ 6,10 SAY "Program is " + TITLE @ 8,10 SAY "The following information must be entered correctly in order for the" @ 9,10 SAY "display program to work. Remember that you may modify this information" @ 10,10 SAY "if you find the program does not work right when you test it." @ 12,10 SAY "What is the name of the key field which the user will enter in order" @ 13,10 SAY "to select records? " GET KEYNAME @ 14,10 SAY "What is the length of this field? " GET LENGTH PICTURE "99" @ 16,10 SAY "An index file must be created for the above key field before the pro-" @ 17,10 SAY "gram will work. Enter the number of the index (1-7) here. " @ 17,68 SAY " " GET NDXNUMB PICTURE "9" @ 18,10 SAY "A format file may be specified in order to format the screen (Blank" @ 19,10 SAY "means no format file is to be used). " GET FORMAT PICTURE "!!!!!!!!" @ 20,10 SAY "Enter an A in order to allow adding of records. " GET PARM PICTURE "!" @ 21,10 SAY "***CTRL KEYS*************************************" @ 22,10 SAY "D - NEXT CHR ** X - NEXT FLD ** G - DELETE CHAR" @ 23,10 SAY "S - PREV CHR ** E - PREV FLD ** V - INSERT ON/OFF"