1332 lines
55 KiB
COBOL
1332 lines
55 KiB
COBOL
******************************************************************
|
||
* Help Text for PANELS demonstration program.
|
||
*
|
||
* Copyright (c) Micro Focus 1987.
|
||
*
|
||
******************************************************************
|
||
|
||
******************************************************************
|
||
* Help-Output = Number of help screen to be output.
|
||
******************************************************************
|
||
|
||
01 Help-Output PIC 9(2) COMP.
|
||
|
||
******************************************************************
|
||
* Help Text.
|
||
******************************************************************
|
||
|
||
01 Help-Text.
|
||
|
||
78 A-Help-Start VALUE NEXT - 1.
|
||
|
||
|
||
78 A-Help-General VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp1-00.
|
||
03 DEMOHLP1-00-0101 PIC X(0080) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 DEMOHLP1-00-0201 PIC X(0080) VALUE "³This program allows y
|
||
- "ou to experiment with the facilities provided by PANELS. ³".
|
||
03 DEMOHLP1-00-0301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-0380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-0401 PIC X(0080) VALUE "³Use the and keys
|
||
- "to move along the menu bar. Press the or ÄÙ keys to ³".
|
||
03 DEMOHLP1-00-0501 PIC X(0080) VALUE "³select the highlighte
|
||
- "d item. Alternatively, you can press the relevant ³".
|
||
03 DEMOHLP1-00-0601 PIC X(0044) VALUE "³function key to selec
|
||
- "t the required option.".
|
||
03 FILLER PIC X(0035).
|
||
03 DEMOHLP1-00-0680 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-0701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-0780 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-0801 PIC X(0080) VALUE "³Two panels have been
|
||
- "created already for you. The ID of each panel is shown ³".
|
||
03 DEMOHLP1-00-0901 PIC X(0080) VALUE "³in the text contained
|
||
- " in the panel. This number should be entered in the ³".
|
||
03 DEMOHLP1-00-1001 PIC X(0080) VALUE "³panel ID field in the
|
||
- " parameter block if you wish to operate on one of these ³".
|
||
03 DEMOHLP1-00-1101 PIC X(0008) VALUE "³panels.".
|
||
03 FILLER PIC X(0071).
|
||
03 DEMOHLP1-00-1180 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1201 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1280 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1401 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1480 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1580 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1680 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1780 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1801 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1880 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-1901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-1980 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-2001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-2080 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-2101 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-2180 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-2201 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP1-00-2280 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-2301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0013).
|
||
03 DEMOHLP1-00-2315 PIC X(0053) VALUE "Press Escape to leave
|
||
- "or any other key for more help.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHLP1-00-2380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP1-00-2401 PIC X(0080) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
|
||
78 A-Help-General-2 VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp2-00.
|
||
03 DEMOHLP2-00-0101 PIC X(0080) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 DEMOHLP2-00-0201 PIC X(0008) VALUE "³F1=Help".
|
||
03 FILLER PIC X(0021).
|
||
03 DEMOHLP2-00-0230 PIC X(0020) VALUE "Display this screen.".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHLP2-00-0280 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-0301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-0380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-0401 PIC X(0080) VALUE "³F2=Alter Parameter Bl
|
||
- "ock The parameter block to PANELS is displayed. Use ³".
|
||
03 DEMOHLP2-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-0530 PIC X(0051) VALUE "the and keys to mo
|
||
- "ve up and down the parameter³".
|
||
03 DEMOHLP2-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-0630 PIC X(0051) VALUE "block. Any of the para
|
||
- "meters can be altered when ³".
|
||
03 DEMOHLP2-00-0701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-0730 PIC X(0051) VALUE "the cursor is in the a
|
||
- "ppropriate field. Press the ³".
|
||
03 DEMOHLP2-00-0801 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-0830 PIC X(0051) VALUE "Esc key or move the cu
|
||
- "rsor out of the parameter ³".
|
||
03 DEMOHLP2-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-0930 PIC X(0033) VALUE "block to return to the
|
||
- " main menu.".
|
||
03 FILLER PIC X(0017).
|
||
03 DEMOHLP2-00-0980 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-1080 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1101 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-1130 PIC X(0051) VALUE "A field surrounded by
|
||
- "X"" "" indicates that a ³".
|
||
03 DEMOHLP2-00-1201 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-1230 PIC X(0051) VALUE "hexadecimal value is e
|
||
- "xpected. A field surrounded ³".
|
||
03 DEMOHLP2-00-1301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-1330 PIC X(0035) VALUE "by "" "" indicates a c
|
||
- "haracter field.".
|
||
03 FILLER PIC X(0015).
|
||
03 DEMOHLP2-00-1380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1401 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-1480 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1501 PIC X(0011) VALUE "³F3=Execute".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHLP2-00-1530 PIC X(0051) VALUE "Execute the PANELS fun
|
||
- "ction set up in the ³".
|
||
03 DEMOHLP2-00-1601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-1630 PIC X(0016) VALUE "parameter block.".
|
||
03 FILLER PIC X(0034).
|
||
03 DEMOHLP2-00-1680 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-1780 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-1801 PIC X(0013) VALUE "³F4=Edit Text".
|
||
03 FILLER PIC X(0016).
|
||
03 DEMOHLP2-00-1830 PIC X(0051) VALUE "Edit the text in the b
|
||
- "uffer to be passed to ³".
|
||
03 DEMOHLP2-00-1901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP2-00-1930 PIC X(0037) VALUE "PANELS on a write or s
|
||
- "croll function.".
|
||
03 FILLER PIC X(0013).
|
||
03 DEMOHLP2-00-1980 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-2001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-2080 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-2101 PIC X(0009) VALUE "³Esc=Exit".
|
||
03 FILLER PIC X(0020).
|
||
03 DEMOHLP2-00-2130 PIC X(0019) VALUE "Leave this program.".
|
||
03 FILLER PIC X(0031).
|
||
03 DEMOHLP2-00-2180 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-2201 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0078).
|
||
03 DEMOHLP2-00-2280 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-2301 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0023).
|
||
03 DEMOHLP2-00-2325 PIC X(0026) VALUE "Press Escape to leave
|
||
- "help".
|
||
03 FILLER PIC X(0029).
|
||
03 DEMOHLP2-00-2380 PIC X(0001) VALUE "³".
|
||
03 DEMOHLP2-00-2401 PIC X(0080) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
|
||
78 A-Help-Function VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp3-00.
|
||
03 DEMOHLP3-00-0101 PIC X(0039) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0201 PIC X(0039) VALUE "³This is the number of
|
||
- " the PANELS ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0301 PIC X(0039) VALUE "³function to be execut
|
||
- "ed. The values ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0401 PIC X(0017) VALUE "³are as follows :".
|
||
03 FILLER PIC X(0021).
|
||
03 DEMOHLP3-00-0439 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0037).
|
||
03 DEMOHLP3-00-0539 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0601 PIC X(0039) VALUE "³ 0 : Get screen info
|
||
- "rmation. ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0701 PIC X(0027) VALUE "³ 1 : Set screen back
|
||
- "drop.".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHLP3-00-0739 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0801 PIC X(0021) VALUE "³ 2 : Redraw screen."
|
||
.
|
||
03 FILLER PIC X(0017).
|
||
03 DEMOHLP3-00-0839 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-0901 PIC X(0020) VALUE "³ 3 : Create panel.".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHLP3-00-0939 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1001 PIC X(0019) VALUE "³ 4 : Shift panel.".
|
||
03 FILLER PIC X(0019).
|
||
03 DEMOHLP3-00-1039 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1101 PIC X(0039) VALUE "³ 5 : Get panel infor
|
||
- "mation. ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1201 PIC X(0020) VALUE "³ 6 : Delete panel.".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHLP3-00-1239 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1301 PIC X(0020) VALUE "³ 7 : Enable panel.".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHLP3-00-1339 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1401 PIC X(0021) VALUE "³ 8 : Disable panel."
|
||
.
|
||
03 FILLER PIC X(0017).
|
||
03 DEMOHLP3-00-1439 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1501 PIC X(0019) VALUE "³ 9 : Flush panel.".
|
||
03 FILLER PIC X(0019).
|
||
03 DEMOHLP3-00-1539 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1601 PIC X(0020) VALUE "³ 10 : Scroll panel.".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHLP3-00-1639 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1701 PIC X(0022) VALUE "³ 11 : Write to panel.
|
||
- "".
|
||
03 FILLER PIC X(0016).
|
||
03 DEMOHLP3-00-1739 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1801 PIC X(0018) VALUE "³ 12 : Read panel.".
|
||
03 FILLER PIC X(0020).
|
||
03 DEMOHLP3-00-1839 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-1901 PIC X(0039) VALUE "³ 13 : Get panel at po
|
||
- "sition. ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-2001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0037).
|
||
03 DEMOHLP3-00-2039 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-2101 PIC X(0039) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0041).
|
||
03 DEMOHLP3-00-2201 PIC X(0039) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0041).
|
||
|
||
78 A-Help-Status VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp4-00.
|
||
03 DEMOHLP4-00-0101 PIC X(0044) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0201 PIC X(0044) VALUE "³This is the status by
|
||
- "te returned by ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0301 PIC X(0044) VALUE "³PANELS. The values re
|
||
- "turned are as ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0401 PIC X(0010) VALUE "³follows :".
|
||
03 FILLER PIC X(0033).
|
||
03 DEMOHLP4-00-0444 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHLP4-00-0544 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0601 PIC X(0044) VALUE "³ 0 : The function wa
|
||
- "s successful. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0701 PIC X(0044) VALUE "³ 1 : The panel indic
|
||
- "ated has not yet ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0801 PIC X(0020) VALUE "³ been created.".
|
||
03 FILLER PIC X(0023).
|
||
03 DEMOHLP4-00-0844 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-0901 PIC X(0044) VALUE "³ 2 : An invalid pane
|
||
- "l ID was specified. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1001 PIC X(0044) VALUE "³ 3 : An invalid para
|
||
- "meter was specified. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1101 PIC X(0044) VALUE "³ 4 : An invalid func
|
||
- "tion number was ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1201 PIC X(0017) VALUE "³ requested.".
|
||
03 FILLER PIC X(0026).
|
||
03 DEMOHLP4-00-1244 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1301 PIC X(0044) VALUE "³ 5 : The user is try
|
||
- "ing to exceed the ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1401 PIC X(0032) VALUE "³ maximum number
|
||
- "of panels.".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHLP4-00-1444 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1501 PIC X(0044) VALUE "³ 6 : The user is att
|
||
- "empting to create ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1601 PIC X(0033) VALUE "³ a panel that is
|
||
- " too large.".
|
||
03 FILLER PIC X(0010).
|
||
03 DEMOHLP4-00-1644 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1701 PIC X(0032) VALUE "³ 7 : Invalid scroll
|
||
- "direction.".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHLP4-00-1744 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1801 PIC X(0044) VALUE "³ 8 : Invalid scroll
|
||
- "count specified. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-1901 PIC X(0044) VALUE "³ 9 : PANELS cannot b
|
||
- "e initialised. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-2001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHLP4-00-2044 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-2101 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0015).
|
||
03 DEMOHLP4-00-2144 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHLP4-00-2201 PIC X(0044) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0036).
|
||
|
||
78 A-Help-Panel-ID VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp5-00.
|
||
03 DEMOHLP5-00-0101 PIC X(0041) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0201 PIC X(0041) VALUE "³Panel ID is returned
|
||
- "by PANELS when a ³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0301 PIC X(0041) VALUE "³panel is created. It
|
||
- "is used to specify³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0401 PIC X(0041) VALUE "³the panel to be used
|
||
- "on subsequent ³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0501 PIC X(0012) VALUE "³operations.".
|
||
03 FILLER PIC X(0028).
|
||
03 DEMOHLP5-00-0541 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0641 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0701 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHLP5-00-0741 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0039).
|
||
03 DEMOHLP5-00-0801 PIC X(0041) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0039).
|
||
|
||
78 A-Help-Panel-Width VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp6-00.
|
||
03 DEMOHLP6-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0201 PIC X(0034) VALUE "³Panel width is used t
|
||
- "o specify ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0301 PIC X(0034) VALUE "³the width of the pane
|
||
- "l to be ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0401 PIC X(0009) VALUE "³created.".
|
||
03 FILLER PIC X(0024).
|
||
03 DEMOHLP6-00-0434 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHLP6-00-0534 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0601 PIC X(0034) VALUE "³This cannot be change
|
||
- "d once ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0701 PIC X(0034) VALUE "³the panel has been cr
|
||
- "eated. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0801 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHLP6-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-0901 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP6-00-1001 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Panel-Height VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp7-00.
|
||
03 DEMOHLP7-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0201 PIC X(0034) VALUE "³Panel height is used
|
||
- "to specify ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0301 PIC X(0034) VALUE "³the height of the pan
|
||
- "el to be ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0401 PIC X(0009) VALUE "³created.".
|
||
03 FILLER PIC X(0024).
|
||
03 DEMOHLP7-00-0434 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHLP7-00-0534 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0601 PIC X(0034) VALUE "³This cannot be change
|
||
- "d once ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0701 PIC X(0034) VALUE "³the panel has been cr
|
||
- "eated. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0801 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHLP7-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-0901 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHLP7-00-1001 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Visible-Width VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp8-00.
|
||
03 DEMOHLP8-00-0101 PIC X(0035) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0201 PIC X(0035) VALUE "³The visible width spe
|
||
- "cifies the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0301 PIC X(0035) VALUE "³width of the window o
|
||
- "nto the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0401 PIC X(0035) VALUE "³panel that is visible
|
||
- " on the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0501 PIC X(0008) VALUE "³screen.".
|
||
03 FILLER PIC X(0026).
|
||
03 DEMOHLP8-00-0535 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0033).
|
||
03 DEMOHLP8-00-0635 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0701 PIC X(0035) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP8-00-0801 PIC X(0035) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0045).
|
||
|
||
78 A-Help-Visible-Height VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp9-00.
|
||
03 DEMOHLP9-00-0101 PIC X(0035) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0201 PIC X(0035) VALUE "³The visible height sp
|
||
- "ecifies the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0301 PIC X(0035) VALUE "³height of the window
|
||
- "onto the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0401 PIC X(0035) VALUE "³panel that is visible
|
||
- " on the ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0501 PIC X(0008) VALUE "³screen.".
|
||
03 FILLER PIC X(0026).
|
||
03 DEMOHLP9-00-0535 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0033).
|
||
03 DEMOHLP9-00-0635 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0701 PIC X(0035) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHLP9-00-0801 PIC X(0035) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0045).
|
||
|
||
78 A-Help-First-Vis-Col VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp10-00.
|
||
03 DEMOHL10-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0201 PIC X(0034) VALUE "³The first visible col
|
||
- "umn is used³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0301 PIC X(0034) VALUE "³to specify the first
|
||
- "column in ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0401 PIC X(0034) VALUE "³the panel that is vis
|
||
- "ible in the³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0501 PIC X(0022) VALUE "³window on the screen.
|
||
- "".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHL10-00-0534 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL10-00-0634 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0701 PIC X(0034) VALUE "³Column 0 is the left-
|
||
- "hand edge ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0801 PIC X(0014) VALUE "³of the panel.".
|
||
03 FILLER PIC X(0019).
|
||
03 DEMOHL10-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL10-00-0934 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-1001 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL10-00-1101 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-First-Vis-Row VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp11-00.
|
||
03 DEMOHL11-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0201 PIC X(0034) VALUE "³The first visible row
|
||
- " is used ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0301 PIC X(0034) VALUE "³to specify the first
|
||
- "row in ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0401 PIC X(0034) VALUE "³the panel that is vis
|
||
- "ible in the³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0501 PIC X(0022) VALUE "³window on the screen.
|
||
- "".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHL11-00-0534 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL11-00-0634 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0701 PIC X(0034) VALUE "³Row 0 is the top line
|
||
- " of the ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0801 PIC X(0007) VALUE "³panel.".
|
||
03 FILLER PIC X(0026).
|
||
03 DEMOHL11-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL11-00-0934 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-1001 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL11-00-1101 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Start-Column VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp12-00.
|
||
03 DEMOHL12-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0201 PIC X(0034) VALUE "³The panel start colum
|
||
- "n is used ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0301 PIC X(0034) VALUE "³to specify the first
|
||
- "column on ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0401 PIC X(0034) VALUE "³the screen occupied b
|
||
- "y the ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0501 PIC X(0034) VALUE "³window belonging to t
|
||
- "he panel. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL12-00-0634 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0701 PIC X(0034) VALUE "³Column 0 is the left-
|
||
- "hand edge ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0801 PIC X(0015) VALUE "³of the screen.".
|
||
03 FILLER PIC X(0018).
|
||
03 DEMOHL12-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL12-00-0934 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-1001 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL12-00-1101 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Start-Row VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp13-00.
|
||
03 DEMOHL13-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0201 PIC X(0034) VALUE "³The panel start row i
|
||
- "s used to ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0301 PIC X(0034) VALUE "³specify the first row
|
||
- " on the ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0401 PIC X(0034) VALUE "³screen occupied by th
|
||
- "e window ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0501 PIC X(0034) VALUE "³belonging to the pane
|
||
- "l. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL13-00-0634 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0701 PIC X(0034) VALUE "³Row 0 is the top line
|
||
- " of the ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0801 PIC X(0008) VALUE "³screen.".
|
||
03 FILLER PIC X(0025).
|
||
03 DEMOHL13-00-0834 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL13-00-0934 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-1001 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL13-00-1101 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Buffer-Offset VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp14-00.
|
||
03 DEMOHL14-00-0101 PIC X(0038) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0201 PIC X(0038) VALUE "³The buffer offset is
|
||
- "used to specify³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0301 PIC X(0038) VALUE "³the starting offset i
|
||
- "nto the buffers³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0401 PIC X(0038) VALUE "³supplied to panels on
|
||
- " a read, write ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0501 PIC X(0020) VALUE "³or scroll function.".
|
||
03 FILLER PIC X(0017).
|
||
03 DEMOHL14-00-0538 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL14-00-0638 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0701 PIC X(0038) VALUE "³The first byte in eac
|
||
- "h buffer is ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0801 PIC X(0012) VALUE "³position 1.".
|
||
03 FILLER PIC X(0025).
|
||
03 DEMOHL14-00-0838 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL14-00-0938 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-1001 PIC X(0038) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL14-00-1101 PIC X(0038) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0042).
|
||
|
||
78 A-Help-Vert-Stride VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp15-00.
|
||
03 DEMOHL15-00-0101 PIC X(0038) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0201 PIC X(0038) VALUE "³The vertical stride i
|
||
- "s the number of³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0301 PIC X(0038) VALUE "³bytes between the sta
|
||
- "rt of one row ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0401 PIC X(0038) VALUE "³in the buffers suppli
|
||
- "ed to panels ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0501 PIC X(0038) VALUE "³and the start of the
|
||
- "next row ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL15-00-0638 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0701 PIC X(0038) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL15-00-0801 PIC X(0038) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0042).
|
||
|
||
78 A-Help-Update-Count VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp16-00.
|
||
03 DEMOHL16-00-0101 PIC X(0035) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0201 PIC X(0035) VALUE "³The update count is t
|
||
- "he number ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0301 PIC X(0035) VALUE "³of characters in the
|
||
- "rectangle ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0401 PIC X(0035) VALUE "³specified by the upda
|
||
- "te group to ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0501 PIC X(0035) VALUE "³be actually read or w
|
||
- "riiten. ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0033).
|
||
03 DEMOHL16-00-0635 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0701 PIC X(0035) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0045).
|
||
03 DEMOHL16-00-0801 PIC X(0035) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0045).
|
||
|
||
78 A-Help-Update-Offset VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp17-00.
|
||
03 DEMOHL17-00-0101 PIC X(0037) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0201 PIC X(0037) VALUE "³The rectangle offset
|
||
- "is the offset ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0301 PIC X(0037) VALUE "³from the start of the
|
||
- " rectangle ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0401 PIC X(0037) VALUE "³specified by the upda
|
||
- "te group to ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0501 PIC X(0037) VALUE "³the first character p
|
||
- "osition to ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0601 PIC X(0020) VALUE "³be read or written.".
|
||
03 FILLER PIC X(0016).
|
||
03 DEMOHL17-00-0637 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0035).
|
||
03 DEMOHL17-00-0737 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0801 PIC X(0037) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL17-00-0901 PIC X(0037) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0043).
|
||
|
||
78 A-Help-Update-Col VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp18-00.
|
||
03 DEMOHL18-00-0101 PIC X(0038) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0201 PIC X(0038) VALUE "³The update start colu
|
||
- "mn specifies ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0301 PIC X(0038) VALUE "³the first column of t
|
||
- "he rectangle ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0401 PIC X(0038) VALUE "³to be scrolled, writt
|
||
- "en to or read. ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0501 PIC X(0038) VALUE "³This is relative to t
|
||
- "he left-hand ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0601 PIC X(0038) VALUE "³edge of the panel (st
|
||
- "arting from 0).³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL18-00-0738 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0801 PIC X(0038) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL18-00-0901 PIC X(0038) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0042).
|
||
|
||
78 A-Help-Update-Row VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp19-00.
|
||
03 DEMOHL19-00-0101 PIC X(0037) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0201 PIC X(0037) VALUE "³The update start row
|
||
- "specifies ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0301 PIC X(0037) VALUE "³the first row of the
|
||
- "rectangle ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0401 PIC X(0037) VALUE "³to be scrolled, writt
|
||
- "en to or read.³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0501 PIC X(0037) VALUE "³This is relative to t
|
||
- "he top line ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0601 PIC X(0037) VALUE "³of the panel (startin
|
||
- "g from 0). ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0701 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0035).
|
||
03 DEMOHL19-00-0737 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0801 PIC X(0037) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0043).
|
||
03 DEMOHL19-00-0901 PIC X(0037) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0043).
|
||
|
||
78 A-Help-Update-Width VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp20-00 .
|
||
03 DEMOHL20-00-0101 PIC X(0033) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0201 PIC X(0033) VALUE "³The update width spec
|
||
- "ifies the ³".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0301 PIC X(0033) VALUE "³width of the rectangl
|
||
- "e to be ³".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0401 PIC X(0033) VALUE "³scrolled, written to
|
||
- "or read. ³".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0031).
|
||
03 DEMOHL20-00-0533 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0601 PIC X(0033) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0047).
|
||
03 DEMOHL20-00-0701 PIC X(0033) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0047).
|
||
|
||
78 A-Help-Update-Height VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohl21-00 .
|
||
03 DEMOHL21-00-0101 PIC X(0034) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0201 PIC X(0034) VALUE "³The update height spe
|
||
- "cifies the ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0301 PIC X(0034) VALUE "³height of the rectang
|
||
- "le to be ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0401 PIC X(0034) VALUE "³scrolled, written to
|
||
- "or read. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL21-00-0534 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0601 PIC X(0034) VALUE "³Press Escape to leave
|
||
- " help. ³".
|
||
03 FILLER PIC X(0046).
|
||
03 DEMOHL21-00-0701 PIC X(0034) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0046).
|
||
|
||
78 A-Help-Fill-Char VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp22-00.
|
||
03 DEMOHL22-00-0101 PIC X(0040) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0201 PIC X(0040) VALUE "³The fill character is
|
||
- " the character to³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0301 PIC X(0040) VALUE "³be used to fill the a
|
||
- "rea of the panel ³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0401 PIC X(0040) VALUE "³specified by the upda
|
||
- "te group. ³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0038).
|
||
03 DEMOHL22-00-0540 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0601 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHL22-00-0640 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL22-00-0701 PIC X(0040) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0040).
|
||
|
||
78 A-Help-Fill-Attr VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp23-00.
|
||
03 DEMOHL23-00-0101 PIC X(0040) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0201 PIC X(0040) VALUE "³The fill attribute is
|
||
- " the attribute to³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0301 PIC X(0040) VALUE "³be used to fill the a
|
||
- "rea of the panel ³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0401 PIC X(0040) VALUE "³specified by the upda
|
||
- "te group. ³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0038).
|
||
03 DEMOHL23-00-0540 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0601 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHL23-00-0640 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL23-00-0701 PIC X(0040) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0040).
|
||
|
||
78 A-Help-Update-Mask VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp24-00.
|
||
03 DEMOHL24-00-0101 PIC X(0066) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0201 PIC X(0054) VALUE "³The update mask speci
|
||
- "fies where the information to be".
|
||
03 FILLER PIC X(0011).
|
||
03 DEMOHL24-00-0266 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0301 PIC X(0055) VALUE "³read or wrriten is to
|
||
- " come from and whether or not the".
|
||
03 FILLER PIC X(0010).
|
||
03 DEMOHL24-00-0366 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0401 PIC X(0066) VALUE "³screen is to be updat
|
||
- "ed. The bits in this byte are used ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0501 PIC X(0050) VALUE "³as follows (bit 0 is
|
||
- "the least significant bit) :".
|
||
03 FILLER PIC X(0015).
|
||
03 DEMOHL24-00-0566 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0601 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0064).
|
||
03 DEMOHL24-00-0666 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0701 PIC X(0014) VALUE "³Bit Function".
|
||
03 FILLER PIC X(0051).
|
||
03 DEMOHL24-00-0766 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0801 PIC X(0014) VALUE "³--- --------".
|
||
03 FILLER PIC X(0051).
|
||
03 DEMOHL24-00-0866 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-0901 PIC X(0053) VALUE "³ 5 The attributes o
|
||
- "n the screen are to be updated.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHL24-00-0966 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1001 PIC X(0053) VALUE "³ 4 The characters o
|
||
- "n the screen are to be updated.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHL24-00-1066 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1101 PIC X(0066) VALUE "³ 3 The attributes i
|
||
- "n the region specified by the update ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1201 PIC X(0053) VALUE "³ group is to be u
|
||
- "pdated from the fill attribute.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHL24-00-1266 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1301 PIC X(0066) VALUE "³ 2 The characters i
|
||
- "n the region specified by the update ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1401 PIC X(0053) VALUE "³ group is to be u
|
||
- "pdated from the fill character.".
|
||
03 FILLER PIC X(0012).
|
||
03 DEMOHL24-00-1466 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1501 PIC X(0066) VALUE "³ 1 The attributes i
|
||
- "n the region specified by the update ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1601 PIC X(0066) VALUE "³ group is to be u
|
||
- "pdated from the supplied attribute buffer. ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1701 PIC X(0012) VALUE "³ buffer".
|
||
03 FILLER PIC X(0053).
|
||
03 DEMOHL24-00-1766 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1801 PIC X(0066) VALUE "³ 0 The characters i
|
||
- "n the region specified by the update ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-1901 PIC X(0066) VALUE "³ group is to be u
|
||
- "pdated from the supplied character buffer. ³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-2001 PIC X(0012) VALUE "³ buffer".
|
||
03 FILLER PIC X(0053).
|
||
03 DEMOHL24-00-2066 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-2101 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0064).
|
||
03 DEMOHL24-00-2166 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-2201 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0037).
|
||
03 DEMOHL24-00-2266 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0014).
|
||
03 DEMOHL24-00-2301 PIC X(0066) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0014).
|
||
|
||
78 A-Help-Direction VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp25-00.
|
||
03 DEMOHL25-00-0101 PIC X(0050) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0201 PIC X(0050) VALUE "³The scroll direction
|
||
- "specifies the direction in ³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0301 PIC X(0050) VALUE "³which the region spec
|
||
- "ified in the update group ³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0401 PIC X(0050) VALUE "³is to be scrolled. Th
|
||
- "e possible values are : ³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0048).
|
||
03 DEMOHL25-00-0550 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0601 PIC X(0017) VALUE "³ 0 : Scroll up.".
|
||
03 FILLER PIC X(0032).
|
||
03 DEMOHL25-00-0650 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0701 PIC X(0019) VALUE "³ 1 : Scroll down.".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0750 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0801 PIC X(0019) VALUE "³ 2 : Scroll left.".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0850 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-0901 PIC X(0020) VALUE "³ 3 : Scroll right.".
|
||
03 FILLER PIC X(0029).
|
||
03 DEMOHL25-00-0950 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-1001 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0048).
|
||
03 DEMOHL25-00-1050 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-1101 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0021).
|
||
03 DEMOHL25-00-1150 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0030).
|
||
03 DEMOHL25-00-1201 PIC X(0050) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0030).
|
||
|
||
78 A-Help-Scroll-Count VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohlp26-00.
|
||
03 DEMOHL26-00-0101 PIC X(0044) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL26-00-0201 PIC X(0044) VALUE "³The scroll count spec
|
||
- "ifies the number of ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL26-00-0301 PIC X(0044) VALUE "³of lines or columns t
|
||
- "o be scrolled. ³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL26-00-0401 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0042).
|
||
03 DEMOHL26-00-0444 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL26-00-0501 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0015).
|
||
03 DEMOHL26-00-0544 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0036).
|
||
03 DEMOHL26-00-0601 PIC X(0044) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0036).
|
||
|
||
78 A-Help-Edit-Text VALUE NEXT - A-Help-Start.
|
||
|
||
02 Demohl27-00.
|
||
03 DEMOHL27-00-0101 PIC X(0080) VALUE "ÃÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ".
|
||
03 DEMOHL27-00-0201 PIC X(0080) VALUE "³This screen allows yo
|
||
- "u to edit the text in the buffer that is passed ³ ".
|
||
03 DEMOHL27-00-0301 PIC X(0080) VALUE "³PANELS during a write
|
||
- " or scroll function. It also allows you to view ³ ".
|
||
03 DEMOHL27-00-0401 PIC X(0032) VALUE "³the results of a read
|
||
- " function.".
|
||
03 FILLER PIC X(0040).
|
||
03 DEMOHL27-00-0473 PIC X(0008) VALUE "³ ".
|
||
03 DEMOHL27-00-0501 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0071).
|
||
03 DEMOHL27-00-0573 PIC X(0008) VALUE "³ ".
|
||
03 DEMOHL27-00-0601 PIC X(0080) VALUE "³Simply make the modif
|
||
- "ications you require to the buffer and press ÄÙ ³ ".
|
||
03 DEMOHL27-00-0701 PIC X(0080) VALUE "³or press Escape to le
|
||
- "ave this screen without altering the text in the ³ ".
|
||
03 DEMOHL27-00-0801 PIC X(0008) VALUE "³buffer.".
|
||
03 FILLER PIC X(0064).
|
||
03 DEMOHL27-00-0873 PIC X(0008) VALUE "³ ".
|
||
03 DEMOHL27-00-0901 PIC X(0001) VALUE "³".
|
||
03 FILLER PIC X(0071).
|
||
03 DEMOHL27-00-0973 PIC X(0008) VALUE "³ ".
|
||
03 DEMOHL27-00-1001 PIC X(0028) VALUE "³Press Escape to leave
|
||
- " help.".
|
||
03 FILLER PIC X(0044).
|
||
03 DEMOHL27-00-1073 PIC X(0008) VALUE "³ ".
|
||
03 DEMOHL27-00-1101 PIC X(0073) VALUE "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
- "ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ".
|
||
03 FILLER PIC X(0007).
|
||
|
||
/*****************************************************************
|
||
* Help Control Table.
|
||
*
|
||
* There is an entry in this table for each help screen,
|
||
* consisting of the following :
|
||
*
|
||
* Help-Width : The width of the help text.
|
||
* Help-Height : The height of the help text.
|
||
* Help-Next : The index in the table of the next help screen
|
||
* in the sequence, 0 if there are no more.
|
||
* Help-Start : Pointer into Help-Text of the first character
|
||
* of the text for this help screen.
|
||
*
|
||
******************************************************************
|
||
|
||
01 Help-Control-Table.
|
||
03 FILLER PIC 9(2) COMP VALUE 80.
|
||
03 FILLER PIC 9(2) COMP VALUE 24.
|
||
03 FILLER PIC 9(2) COMP VALUE 2.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-General.
|
||
03 FILLER PIC 9(2) COMP VALUE 80.
|
||
03 FILLER PIC 9(2) COMP VALUE 24.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-General-2.
|
||
03 FILLER PIC 9(2) COMP VALUE 39.
|
||
03 FILLER PIC 9(2) COMP VALUE 22.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Function.
|
||
03 FILLER PIC 9(2) COMP VALUE 44.
|
||
03 FILLER PIC 9(2) COMP VALUE 22.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Status.
|
||
03 FILLER PIC 9(2) COMP VALUE 41.
|
||
03 FILLER PIC 9(2) COMP VALUE 8.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Panel-ID.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 10.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Panel-Width.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 10.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Panel-Height.
|
||
03 FILLER PIC 9(2) COMP VALUE 35.
|
||
03 FILLER PIC 9(2) COMP VALUE 8.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Visible-Width.
|
||
03 FILLER PIC 9(2) COMP VALUE 35.
|
||
03 FILLER PIC 9(2) COMP VALUE 8.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Visible-Height.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-First-Vis-Col.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-First-Vis-Row.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Start-Column.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Start-Row.
|
||
03 FILLER PIC 9(2) COMP VALUE 38.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Buffer-Offset.
|
||
03 FILLER PIC 9(2) COMP VALUE 38.
|
||
03 FILLER PIC 9(2) COMP VALUE 8.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Vert-Stride.
|
||
03 FILLER PIC 9(2) COMP VALUE 35.
|
||
03 FILLER PIC 9(2) COMP VALUE 8.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Count.
|
||
03 FILLER PIC 9(2) COMP VALUE 37.
|
||
03 FILLER PIC 9(2) COMP VALUE 9.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Offset.
|
||
03 FILLER PIC 9(2) COMP VALUE 38.
|
||
03 FILLER PIC 9(2) COMP VALUE 9.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Col.
|
||
03 FILLER PIC 9(2) COMP VALUE 37.
|
||
03 FILLER PIC 9(2) COMP VALUE 9.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Row.
|
||
03 FILLER PIC 9(2) COMP VALUE 33.
|
||
03 FILLER PIC 9(2) COMP VALUE 7.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Width.
|
||
03 FILLER PIC 9(2) COMP VALUE 34.
|
||
03 FILLER PIC 9(2) COMP VALUE 7.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Height.
|
||
03 FILLER PIC 9(2) COMP VALUE 40.
|
||
03 FILLER PIC 9(2) COMP VALUE 7.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Fill-Char.
|
||
03 FILLER PIC 9(2) COMP VALUE 40.
|
||
03 FILLER PIC 9(2) COMP VALUE 7.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Fill-Attr.
|
||
03 FILLER PIC 9(2) COMP VALUE 66.
|
||
03 FILLER PIC 9(2) COMP VALUE 23.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Update-Mask.
|
||
03 FILLER PIC 9(2) COMP VALUE 50.
|
||
03 FILLER PIC 9(2) COMP VALUE 12.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Direction.
|
||
03 FILLER PIC 9(2) COMP VALUE 44.
|
||
03 FILLER PIC 9(2) COMP VALUE 6.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Scroll-Count.
|
||
03 FILLER PIC 9(2) COMP VALUE 73.
|
||
03 FILLER PIC 9(2) COMP VALUE 11.
|
||
03 FILLER PIC 9(2) COMP VALUE 0.
|
||
03 FILLER PIC 9(4) COMP VALUE A-Help-Edit-Text.
|
||
01 FILLER REDEFINES Help-Control-Table.
|
||
03 FILLER OCCURS 27.
|
||
05 Help-Width PIC 9(2) COMP.
|
||
05 Help-Height PIC 9(2) COMP.
|
||
05 Help-Next PIC 9(2) COMP.
|
||
05 Help-Start PIC 9(4) COMP.
|
||
|