****************************************************************** * 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 "쿟his 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 "쿢se the  and  keys - "to move along the menu bar. Press the  or 켸 keys to �". 03 DEMOHLP1-00-0501 PIC X(0080) VALUE "퀂elect the highlighte - "d item. Alternatively, you can press the relevant �". 03 DEMOHLP1-00-0601 PIC X(0044) VALUE "쿯unction 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 "쿟wo panels have been - "created already for you. The ID of each panel is shown �". 03 DEMOHLP1-00-0901 PIC X(0080) VALUE "쿶n the text contained - " in the panel. This number should be entered in the �". 03 DEMOHLP1-00-1001 PIC X(0080) VALUE "쿾anel ID field in the - " parameter block if you wish to operate on one of these �". 03 DEMOHLP1-00-1101 PIC X(0008) VALUE "쿾anels.". 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 "쿑1=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 "쿑2=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 "쿑3=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 "쿑4=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 "쿐sc=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 "쿟his is the number of - " the PANELS �". 03 FILLER PIC X(0041). 03 DEMOHLP3-00-0301 PIC X(0039) VALUE "쿯unction to be execut - "ed. The values �". 03 FILLER PIC X(0041). 03 DEMOHLP3-00-0401 PIC X(0017) VALUE "쿪re 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 "쿛ress 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 "쿟his is the status by - "te returned by �". 03 FILLER PIC X(0036). 03 DEMOHLP4-00-0301 PIC X(0044) VALUE "쿛ANELS. The values re - "turned are as �". 03 FILLER PIC X(0036). 03 DEMOHLP4-00-0401 PIC X(0010) VALUE "쿯ollows :". 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 "쿛ress 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 "쿛anel ID is returned - "by PANELS when a �". 03 FILLER PIC X(0039). 03 DEMOHLP5-00-0301 PIC X(0041) VALUE "쿾anel is created. It - "is used to specify�". 03 FILLER PIC X(0039). 03 DEMOHLP5-00-0401 PIC X(0041) VALUE "퀃he panel to be used - "on subsequent �". 03 FILLER PIC X(0039). 03 DEMOHLP5-00-0501 PIC X(0012) VALUE "쿽perations.". 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 "쿛ress 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 "쿛anel width is used t - "o specify �". 03 FILLER PIC X(0046). 03 DEMOHLP6-00-0301 PIC X(0034) VALUE "퀃he width of the pane - "l to be �". 03 FILLER PIC X(0046). 03 DEMOHLP6-00-0401 PIC X(0009) VALUE "쿬reated.". 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 "쿟his cannot be change - "d once �". 03 FILLER PIC X(0046). 03 DEMOHLP6-00-0701 PIC X(0034) VALUE "퀃he 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 "쿛ress 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 "쿛anel height is used - "to specify �". 03 FILLER PIC X(0046). 03 DEMOHLP7-00-0301 PIC X(0034) VALUE "퀃he height of the pan - "el to be �". 03 FILLER PIC X(0046). 03 DEMOHLP7-00-0401 PIC X(0009) VALUE "쿬reated.". 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 "쿟his cannot be change - "d once �". 03 FILLER PIC X(0046). 03 DEMOHLP7-00-0701 PIC X(0034) VALUE "퀃he 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 "쿛ress 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 "쿟he visible width spe - "cifies the �". 03 FILLER PIC X(0045). 03 DEMOHLP8-00-0301 PIC X(0035) VALUE "퀇idth of the window o - "nto the �". 03 FILLER PIC X(0045). 03 DEMOHLP8-00-0401 PIC X(0035) VALUE "쿾anel that is visible - " on the �". 03 FILLER PIC X(0045). 03 DEMOHLP8-00-0501 PIC X(0008) VALUE "퀂creen.". 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 "쿛ress 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 "쿟he visible height sp - "ecifies the �". 03 FILLER PIC X(0045). 03 DEMOHLP9-00-0301 PIC X(0035) VALUE "쿴eight of the window - "onto the �". 03 FILLER PIC X(0045). 03 DEMOHLP9-00-0401 PIC X(0035) VALUE "쿾anel that is visible - " on the �". 03 FILLER PIC X(0045). 03 DEMOHLP9-00-0501 PIC X(0008) VALUE "퀂creen.". 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 "쿛ress 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 "쿟he first visible col - "umn is used�". 03 FILLER PIC X(0046). 03 DEMOHL10-00-0301 PIC X(0034) VALUE "퀃o specify the first - "column in �". 03 FILLER PIC X(0046). 03 DEMOHL10-00-0401 PIC X(0034) VALUE "퀃he panel that is vis - "ible in the�". 03 FILLER PIC X(0046). 03 DEMOHL10-00-0501 PIC X(0022) VALUE "퀇indow 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 "쿎olumn 0 is the left- - "hand edge �". 03 FILLER PIC X(0046). 03 DEMOHL10-00-0801 PIC X(0014) VALUE "쿽f 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 "쿛ress 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 "쿟he first visible row - " is used �". 03 FILLER PIC X(0046). 03 DEMOHL11-00-0301 PIC X(0034) VALUE "퀃o specify the first - "row in �". 03 FILLER PIC X(0046). 03 DEMOHL11-00-0401 PIC X(0034) VALUE "퀃he panel that is vis - "ible in the�". 03 FILLER PIC X(0046). 03 DEMOHL11-00-0501 PIC X(0022) VALUE "퀇indow 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 "쿝ow 0 is the top line - " of the �". 03 FILLER PIC X(0046). 03 DEMOHL11-00-0801 PIC X(0007) VALUE "쿾anel.". 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 "쿛ress 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 "쿟he panel start colum - "n is used �". 03 FILLER PIC X(0046). 03 DEMOHL12-00-0301 PIC X(0034) VALUE "퀃o specify the first - "column on �". 03 FILLER PIC X(0046). 03 DEMOHL12-00-0401 PIC X(0034) VALUE "퀃he screen occupied b - "y the �". 03 FILLER PIC X(0046). 03 DEMOHL12-00-0501 PIC X(0034) VALUE "퀇indow 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 "쿎olumn 0 is the left- - "hand edge �". 03 FILLER PIC X(0046). 03 DEMOHL12-00-0801 PIC X(0015) VALUE "쿽f 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 "쿛ress 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 "쿟he panel start row i - "s used to �". 03 FILLER PIC X(0046). 03 DEMOHL13-00-0301 PIC X(0034) VALUE "퀂pecify the first row - " on the �". 03 FILLER PIC X(0046). 03 DEMOHL13-00-0401 PIC X(0034) VALUE "퀂creen occupied by th - "e window �". 03 FILLER PIC X(0046). 03 DEMOHL13-00-0501 PIC X(0034) VALUE "쿫elonging 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 "쿝ow 0 is the top line - " of the �". 03 FILLER PIC X(0046). 03 DEMOHL13-00-0801 PIC X(0008) VALUE "퀂creen.". 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 "쿛ress 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 "쿟he buffer offset is - "used to specify�". 03 FILLER PIC X(0042). 03 DEMOHL14-00-0301 PIC X(0038) VALUE "퀃he starting offset i - "nto the buffers�". 03 FILLER PIC X(0042). 03 DEMOHL14-00-0401 PIC X(0038) VALUE "퀂upplied to panels on - " a read, write �". 03 FILLER PIC X(0042). 03 DEMOHL14-00-0501 PIC X(0020) VALUE "쿽r 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 "쿟he first byte in eac - "h buffer is �". 03 FILLER PIC X(0042). 03 DEMOHL14-00-0801 PIC X(0012) VALUE "쿾osition 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 "쿛ress 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 "쿟he vertical stride i - "s the number of�". 03 FILLER PIC X(0042). 03 DEMOHL15-00-0301 PIC X(0038) VALUE "쿫ytes between the sta - "rt of one row �". 03 FILLER PIC X(0042). 03 DEMOHL15-00-0401 PIC X(0038) VALUE "쿶n the buffers suppli - "ed to panels �". 03 FILLER PIC X(0042). 03 DEMOHL15-00-0501 PIC X(0038) VALUE "쿪nd 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 "쿛ress 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 "쿟he update count is t - "he number �". 03 FILLER PIC X(0045). 03 DEMOHL16-00-0301 PIC X(0035) VALUE "쿽f characters in the - "rectangle �". 03 FILLER PIC X(0045). 03 DEMOHL16-00-0401 PIC X(0035) VALUE "퀂pecified by the upda - "te group to �". 03 FILLER PIC X(0045). 03 DEMOHL16-00-0501 PIC X(0035) VALUE "쿫e 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 "쿛ress 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 "쿟he rectangle offset - "is the offset �". 03 FILLER PIC X(0043). 03 DEMOHL17-00-0301 PIC X(0037) VALUE "쿯rom the start of the - " rectangle �". 03 FILLER PIC X(0043). 03 DEMOHL17-00-0401 PIC X(0037) VALUE "퀂pecified by the upda - "te group to �". 03 FILLER PIC X(0043). 03 DEMOHL17-00-0501 PIC X(0037) VALUE "퀃he first character p - "osition to �". 03 FILLER PIC X(0043). 03 DEMOHL17-00-0601 PIC X(0020) VALUE "쿫e 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 "쿛ress 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 "쿟he update start colu - "mn specifies �". 03 FILLER PIC X(0042). 03 DEMOHL18-00-0301 PIC X(0038) VALUE "퀃he first column of t - "he rectangle �". 03 FILLER PIC X(0042). 03 DEMOHL18-00-0401 PIC X(0038) VALUE "퀃o be scrolled, writt - "en to or read. �". 03 FILLER PIC X(0042). 03 DEMOHL18-00-0501 PIC X(0038) VALUE "쿟his is relative to t - "he left-hand �". 03 FILLER PIC X(0042). 03 DEMOHL18-00-0601 PIC X(0038) VALUE "쿮dge 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 "쿛ress 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 "쿟he update start row - "specifies �". 03 FILLER PIC X(0043). 03 DEMOHL19-00-0301 PIC X(0037) VALUE "퀃he first row of the - "rectangle �". 03 FILLER PIC X(0043). 03 DEMOHL19-00-0401 PIC X(0037) VALUE "퀃o be scrolled, writt - "en to or read.�". 03 FILLER PIC X(0043). 03 DEMOHL19-00-0501 PIC X(0037) VALUE "쿟his is relative to t - "he top line �". 03 FILLER PIC X(0043). 03 DEMOHL19-00-0601 PIC X(0037) VALUE "쿽f 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 "쿛ress 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 "쿟he update width spec - "ifies the �". 03 FILLER PIC X(0047). 03 DEMOHL20-00-0301 PIC X(0033) VALUE "퀇idth of the rectangl - "e to be �". 03 FILLER PIC X(0047). 03 DEMOHL20-00-0401 PIC X(0033) VALUE "퀂crolled, 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 "쿛ress 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 "쿟he update height spe - "cifies the �". 03 FILLER PIC X(0046). 03 DEMOHL21-00-0301 PIC X(0034) VALUE "쿴eight of the rectang - "le to be �". 03 FILLER PIC X(0046). 03 DEMOHL21-00-0401 PIC X(0034) VALUE "퀂crolled, 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 "쿛ress 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 "쿟he fill character is - " the character to�". 03 FILLER PIC X(0040). 03 DEMOHL22-00-0301 PIC X(0040) VALUE "쿫e used to fill the a - "rea of the panel �". 03 FILLER PIC X(0040). 03 DEMOHL22-00-0401 PIC X(0040) VALUE "퀂pecified 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 "쿛ress 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 "쿟he fill attribute is - " the attribute to�". 03 FILLER PIC X(0040). 03 DEMOHL23-00-0301 PIC X(0040) VALUE "쿫e used to fill the a - "rea of the panel �". 03 FILLER PIC X(0040). 03 DEMOHL23-00-0401 PIC X(0040) VALUE "퀂pecified 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 "쿛ress 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 "쿟he 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 "퀁ead 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 "퀂creen 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 "쿪s 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 "쿍it 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 "쿛ress 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 "쿟he scroll direction - "specifies the direction in �". 03 FILLER PIC X(0030). 03 DEMOHL25-00-0301 PIC X(0050) VALUE "퀇hich the region spec - "ified in the update group �". 03 FILLER PIC X(0030). 03 DEMOHL25-00-0401 PIC X(0050) VALUE "쿶s 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 "쿛ress 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 "쿟he scroll count spec - "ifies the number of �". 03 FILLER PIC X(0036). 03 DEMOHL26-00-0301 PIC X(0044) VALUE "쿽f 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 "쿛ress 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 "쿟his screen allows yo - "u to edit the text in the buffer that is passed � ". 03 DEMOHL27-00-0301 PIC X(0080) VALUE "쿛ANELS during a write - " or scroll function. It also allows you to view � ". 03 DEMOHL27-00-0401 PIC X(0032) VALUE "퀃he 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 "쿞imply make the modif - "ications you require to the buffer and press 켸 � ". 03 DEMOHL27-00-0701 PIC X(0080) VALUE "쿽r press Escape to le - "ave this screen without altering the text in the � ". 03 DEMOHL27-00-0801 PIC X(0008) VALUE "쿫uffer.". 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 "쿛ress 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.