| [613] | 1 | DENTDNQ2 ;WASH ISC/TJK,JA-SCREEN INPUT-QUESTIONMARKS (PART 2) ;8/28/92  12:26
 | 
|---|
 | 2 |  ;;1.2;DENTAL;***15**;Oct 08, 1992
 | 
|---|
 | 3 | FUNC X DJCP
 | 
|---|
 | 4 |  W DJHIN X XY W "COMMANDS",DJLIN,!
 | 
|---|
 | 5 |  W "^   -- Quit",?41,"@  -- Delete data"
 | 
|---|
 | 6 |  W !,"^nn -- Go to the 'nn' statement",?41,"CR -- Go to the next statement"
 | 
|---|
 | 7 |  W !,"^C  -- Command menu display",?41,"<  -- Go to previous statement"
 | 
|---|
 | 8 |  W !,"^R  -- Repaint Screen",?41,"?? -- For more information about field"
 | 
|---|
 | 9 |  W !,"    -- Space bar, recall previous answer",?41," ? -- Information about field"
 | 
|---|
 | 10 |  W !,"^D  -- Down page",?41,"^U -- Up page"
 | 
|---|
 | 11 |  W !,"Note: (C)omputed, (M)ultiple, (W)ord processing, (R)ead only"
 | 
|---|
 | 12 |  Q
 | 
|---|
 | 13 | FUNC2 X DJCP
 | 
|---|
 | 14 |  W DJHIN X XY W "COMMANDS",DJLIN,!
 | 
|---|
 | 15 |  W "^ -- Quit",?41,"^nn -- Go to the 'nn' statement"
 | 
|---|
 | 16 |  W !,"@ -- delete data",?41,"CR  -- Go to the next statement"
 | 
|---|
 | 17 |  W !,"  -- Space bar, recall previous record",?41,"<   -- Go to previous statement"
 | 
|---|
 | 18 |  W !,"? -- Help prompt",?41,"?? -- For more information about field"
 | 
|---|
 | 19 |  W !,"^C -- Command menu display"
 | 
|---|
 | 20 |  W !,"^L -- List current elements"
 | 
|---|
 | 21 |  W !,"Note: (C)omputed, (M)ultiple, (W)ord processing, (R)ead only"
 | 
|---|
 | 22 |  Q
 | 
|---|