Pathway/iTS SCREEN COBOL Reference Manual

1 Compaq NonStop . Pathway/iTS SCREEN . COBOL Reference Manual Abstract This Manual describes the SCREEN COBOL programming language, which Compaq NonStop Pathway/iTS application programmers use to write programs that communicate with operator terminals or intelligent devices and send data to users. Product Version Pathway/iTS Part Number Published 426750-001 October 2000. Document History Part Number Product Version Published 127341 pathway /TS D42 August 1996. 136664 pathway /TS D42+ October 1997. 139453 pathway /TS D42+ January 1998. 426750-001 Pathway/iTS October 2000. Ordering Information For Manual ordering information: domestic customers, call 1-800-243-6886; international customers, contact your local sales representative. Document Disclaimer Information contained in a Manual is subject to change without notice. Please check with your authorized representative to make sure you have the most recent information. Export Statement Export of the information contained in this Manual may require authorization from the Department of Commerce.

2 Examples Examples and sample programs are for illustration only and may not be suited for your particular purpose. The inclusion of examples and sample programs in the documentation does not warrant, guarantee, or make any representations regarding the use or the results of the use of any examples or sample programs in any documentation. You should verify the applicability of any example or sample program before placing the software into productive use. Government Customers FOR GOVERNMENT CUSTOMERS REGARDING THIS DOCUMENTATION AND THE ASSOCIATED. SOFTWARE: These notices shall be marked on any reproduction of this data, in whole or in part. NOTICE: Notwithstanding any other lease or license that may pertain to, or accompany the delivery of, this computer software, the rights of the Government regarding its use, reproduction and disclosure are as set forth in Section of the FARS Computer Software Restricted Rights clause. RESTRICTED RIGHTS NOTICE: Use, duplication, or disclosure by the Government is subject to the restrictions as set forth in subparagraph (c)(1)(ii) of the Rights in Technical Data and Computer Software clause at DFARS RESTRICTED RIGHTS LEGEND: Use, duplication or disclosure by the Government is subject to restrictions as set forth in paragraph (b)(3)(B) of the rights in Technical Data and Computer Software clause in DAR (a).

3 This computer software is submitted with restricted rights. Use, duplication or disclosure is subject to the restrictions as set forth in NASA FAR SUP 18-52 227-79 (April 1985) Commercial Computer Software Restricted Rights (April 1985). If the contract contains the Clause at 18-52 227-74 Rights in Data General then the Alternate III clause applies. Government Users Restricted Rights Use, duplication or disclosure restricted by GSA ADP Schedule Contract. Unpublished All rights reserved under the Copyright Laws of the United States. Compaq NonStop Pathway/iTS . SCREEN COBOL Reference Manual Index Examples Figures Tables What's New in This Manual ix Manual Information ix New and Changed Information ix About This Manual xi Who Should Read This Manual xi Related Documentation xi Your Comments Invited xii Notation Conventions xiii 1. Introduction to SCREEN COBOL . pathway Environment Overview 1-2. pathway System Components 1-2. Communication Between Processes 1-7.

4 Developing Programs With System Tools 1-8. Generating Object Files With the Compiler 1-8. Managing Object Files With SCUP 1-10. Designing Program Logic 1-11. Organizing SCREEN COBOL Program Groups 1-11. General Rules for Program Design 1-12. 2. SCREEN COBOL Source Program Program Operating Modes 2-1. Block Mode Program 2-2. Conversational Mode Program 2-2. Intelligent Mode Program 2-2. Program Organization 2-3. Compaq Computer Corporation 426750-001. i Contents 2. SCREEN COBOL Source Program (continued). 2. SCREEN COBOL Source Program (continued). Language Elements 2-3. SCREEN COBOL Character Set 2-4. Editing Characters 2-5. Punctuation Characters 2-5. Separators 2-6. SCREEN COBOL Words 2-6. Literals 2-7. Mixed Data Items 2-10. Reference Format 2-10. Tandem Standard Reference Format 2-11. ANSI Standard Reference Format 2-11. Comment Lines 2-12. Continuation Lines 2-13. Compiler Command Lines 2-13. Arithmetic Operations 2-13. Arithmetic Expressions 2-13.

5 Arithmetic Operators 2-14. Evaluation of Expressions 2-15. Conditional Expressions 2-18. Simple Conditions 2-18. Complex Conditions 2-21. Condition Evaluation Rules 2-23. Tables 2-24. Data Reference 2-25. Qualification 2-25. Subscripting 2-26. Using Identifiers 2-28. Using Condition-Names 2-28. Data Representation 2-29. Standard Alignment 2-29. Optional Alignment 2-29. Compaq NonStop Pathway/iTS SCREEN COBOL Reference Manual 426750-001. ii Contents 3. Identification Division 3. Identification Division PROGRAM-ID Paragraph 3-1. DATE-COMPILED Paragraph 3-2. 4. Environment Division Configuration Section 4-1. SOURCE-COMPUTER Paragraph 4-2. OBJECT-COMPUTER Paragraph 4-2. SPECIAL-NAMES Paragraph 4-6. Input-Output Section 4-10. 5. Data Division Data Division Sections 5-2. Working-Storage Section 5-2. Linkage Section 5-3. SCREEN Section 5-4. Message Section 5-4. Data Structure 5-4. Level Numbers 01-49 5-5. Level Numbers 66, 77, and 88 5-5. Data Description Entry 5-6.

6 SCREEN Description Entry 5-22. Base SCREEN 5-24. SCREEN Overlay Area 5-24. Overlay SCREEN 5-25. SCREEN Group 5-26. SCREEN Field 5-27. Input-Control Character Clauses 5-29. Field-Characteristic Clauses 5-33. Message Description Entry 5-60. FILLER Restrictions 5-61. FILLER Usage 5-61. PICTURE and TO/FROM/USING Restrictions 5-62. USER CONVERSION and PRESENT IF Restrictions 5-63. Compaq NonStop Pathway/iTS SCREEN COBOL Reference Manual 426750-001. iii Contents 5. Data Division (continued). 5. Data Division (continued). Message Description Entry (continued). Message Description Entry Usage 5-63. Clauses in Message Description Entry 5-64. Special Registers 5-93. 6. Procedure Division Division Structure 6-1. Declarative Procedures 6-2. Sections 6-2. Paragraphs 6-3. Sentences and Statements 6-3. Procedures 6-4. Procedure Division Statements 6-4. 7. Compilation Running the SCREEN COBOL Compiler 7-1. Using Compiler-Generated Files 7-3. Using PARAM SAMECPU 7-3.

7 Using PARAM SWAPVOL 7-4. Using Compiler Commands 7-5. Specifying Compiler Commands 7-5. When Compiler Commands Take Effect 7-5. Compiler Command Summary 7-6. Compiler Command Descriptions 7-7. Compilation Statistics 7-17. Stopping the Compiler 7-18. Conserving Disk Space 7-18. SCREEN COBOL Limits 7-19. 8. pathway Application Example PATHMON and PATHCOM Process Creation 8-2. SCREEN COBOL Program for Block Mode 8-3. SCREEN COBOL Program for Conversational Mode 8-7. Server Program in COBOL 8-11. Compaq NonStop Pathway/iTS SCREEN COBOL Reference Manual 426750-001. iv Contents A. Advisory Messages A. Advisory Messages Messages and Descriptions A-1. Modifying or Replacing the Advisory Message Routine A-4. B. Diagnostic Screens C. SCREEN COBOL Compiler Diagnostic Messages D. Errors for Message Section Statements E. SCREEN COBOL Reserved Words F. Data Type Correspondence and Return Value Sizes Index Examples Example A-1. ADVISORY^MESSAGE Source Listing A-6.

8 Example B-1. DIAG^FORMAT Parameter for Diagnostic Message Generation B-3. Example B-2. DIAGNOSTIC^MESSAGE Source Listing B-4. Figures Figure 1-1. Operations Performed by SCREEN COBOL Programs 1-2. Figure 1-2. Multiple Terminal Control Through the TCP 1-5. Figure 1-3. Message Description Correspondence 1-6. Figure 1-4. Communication Between Processes in a PATHMON Environment 1-8. Figure 1-5. Generating SCREEN COBOL Object Files 1-9. Figure 1-6. Managing SCREEN COBOL Object Files With SCUP 1-10. Figure 1-7. Program Organizations 1-11. Figure 2-1. Tandem Standard Reference Format 2-11. Figure 2-2. ANSI Standard Reference Format 2-12. Compaq NonStop Pathway/iTS SCREEN COBOL Reference Manual 426750-001. v Contents Tables Tables Table 2-1. SCREEN COBOL Character Set 2-4. Table 2-2. Editing Characters 2-5. Table 2-3. Punctuation Characters 2-5. Table 2-4. Separators 2-6. Table 2-5. Figurative Constants 2-9. Table 2-6. Binary Arithmetic Operators 2-14. Table 2-7.

9 Unary Arithmetic Operators 2-14. Table 2-8. Digits Held for Intermediate Results 2-16. Table 2-9. Logical Operators 2-22. Table 2-10. Storage Occupied by COMPUTATIONAL Data Items 2-29. Table 4-1. System Names for Function Keys 4-7. Table 4-2. System Names for Display Attributes 4-8. Table 5-1. Data Description Entry PICTURE Character-String Symbols 5-11. Table 5-2. Storage Occupied by COMPUTATIONAL Data Items 5-19. Table 5-3. SCREEN Field Types and Allowable Field-Characteristic Clauses 5-28. Table 5-4. Effect of CONTROLLED Clause on SCREEN Field Display Attribute 5-38. Table 5-5. SCREEN Description Entry PICTURE Character-String Symbols 5-48. Table 5-6. RETURN and ENTER Bit Values on Execution of an ACCEPT. Statement 5-54. Table 5-7. Effect of Shadowed Fields with DISPLAY Operation and DYNAMIC Modifier 5-54. Table 5-8. Corresponding Shadow Item Values and Bit Values 5-55. Table 5-9. FIELD STATUS Clause Shadow Values 5-67. Table 5-10. Relationship Between Selected State and PRESENT IF 5-68.

10 Table 5-11. Relevant SEND MESSAGE Edit Advisory Error Numbers 5-69. Table 5-12. Message Description Entry PICTURE Character-String Symbols 5-78. Table 5-13. Association Clauses and Message-Field Types 5-91. Table 6-1. Categories of Statements 6-5. Table 6-2. BEGIN-TRANSACTION Statement Errors 6-19. Table 6-3. CALL Statement Errors 6-21. Table 6-4. MOVE Summary Table 6-51. Table 6-5. PRINT SCREEN Statement Errors 6-58. Compaq NonStop Pathway/iTS SCREEN COBOL Reference Manual 426750-001. vi Contents Tables (continued). Tables (continued). Table 6-6. TERMINATION-SUBSTATUS Values for SEND MESSAGE. Statement 6-88. Table 6-7. SCREEN Field Selection Criteria in TURN Operation 6-104. Table 7-1. Compiler Option Commands 7-6. Table 7-2. Compiler Cross- Reference Commands 7-7. Table 7-3. Compiler Toggle Commands 7-7. Table F-1. Integer Types, Part 1 F-1. Table F-2. Integer Types, Part 2 F-2. Table F-3. Floating, Fixed, and Complex Types F-3. Table F-4. Character Types F-4.