IBM 5280 Manuals

• 4

  Before Using This Guide
• 4

  Objectives of the Guide
  • 5

    Writing a Work Station Application
  • 5

    Data Communications
  • 5

    Diskette I/O
  • 5

    Printer and Other I/O
  • 6

    Compiling a COBOL Program On the Host System
  • 6

    Executing a COBOL Program On an IBM 5280 System
  • 6

    Debugging COBOL Programs
• 4

  Organization of the Guide
• 4

  Scope of the Guide
• 4

  To the COBOL Programmer
• 6

  Related Publications
  • 6

    References for Coding and Debugging COBOL Programs
  • 6

    Coding Aids for Transaction I/O
  • 7

    References for Executing a COBOL Program
  • 7

    General References for IBM 5280 System Information
  • 7

    Compilation Under Os/Vsl
  • 7

    Compilation Under OS/VS2
  • 7

    Compilation Under DOS/VSE
  • 8

    Table of Contents

14

Chapter 1 Transaction I/O - Introduction

• 15

  Steps in Writing an Interactive Program
• 16

  Figure 1.1. Steps in Preparing and Compiling Display Screen Formats
• 18

  Command and Function Key Codes
• 18

  Figure 1.2 the Data Entry Keyboard
• 18

  The Keyboard
• 19

  Figure 1.3. COBOL Command Keys and Codes for Data Entry Keyboards
• 19

  Figure 1.4. COBOL Command Keys and Codes for Typewriter Keyboards
• 20

  Function Keys
  • 20

    Attention
  • 21

    Auto Dup/Skip
  • 21

    Auto Enter
  • 21

    Character Advance
  • 21

    Character Backspace
  • 22

    Character Delete
  • 22

    Character Insert
  • 22

    Cursor Left
  • 22

    Cursor Right
  • 23

    Duplicate
  • 23

    End-Of-Job
  • 23

    Enter/Record Advance
  • 23

    Field Advance
  • 23

    Field Backspace
  • 24

    Field Exit
  • 24

    Field Exit Minus
  • 25

    Hexadecimal
  • 25

    Record Advance
  • 25

    Record Backspace
  • 25

    Reset
  • 25

    Skip
  • 26

    System Request

• 14

  Uses of Data Definition Statements
• 14

  The Copy Library and Data Definition Statements
• 15

  Copying Members
• 15

  General Rules for Data Definition Statements
• 15

  The COBOL Program and Data Definition Statements

28

Chapter 2. Transaction I/O - Screen Definition

• 28

  Example of Coding Data Definition Statements
• 28

  Figure 2.1. Sample Form Used By Data Entry Operator
• 31

  Figure 2.3 Data Definition Statements Coding Example
• 31

  Figure 2.4 Data Definition Statements As Compiled By the COBOL Compiler
• 33

  Figure 2.5. Data Definition Statements Coding Example
• 36

  Coding Conventions
  • 36

    Primary, Continuation, and Secondary Lines
  • 36

    Continuation Characters
  • 36

    Keywords
  • 37

    Constants
  • 37

    Comment Statements
• 38

  Record Description Statements
  • 38

    Form Type Field (Column 6)
  • 38

    Name Type Field (Column 17)
  • 38

    Record Name Field (Columns 19 Through 26)
  • 38

    Usage Field (Column 38)
  • 39

    Editing Field (Columns 45 Through 80)
  • 39

    Check(DD)
  • 40

    Dspatr(Attributes)
• 42

  Field Description Statements
  • 42

    Sequence Number Field (Columns 1 Through 5)
  • 42

    Form Type Field (Column 6)
  • 42

    Indicator Field (Columns 9 and 10)
  • 42

    Field Name Field (Columns 19 Through 24)
  • 43

    Length Field (Columns 30 Through 34)
  • 43

    Data Type Field (Column 35)
  • 45

    Decimal Positions Field (Column 37)
  • 47

    Location Field (Columns 39 Through 44)
  • 48

    Editing Field (Columns 45 Through 80)
  • 48

    CHECK (Parameters)
  • 49

    DSPATR (Attributes)
  • 50

    Figure 2.6. Attributes That Can Be Specified with the DSPATR Keyword
  • 51

    Pmt(Message)
  • 51

    Shift(Codes)
  • 52

    Keyword Conflicts and Compatibilities

54

Chapter 3. Transaction I/O - Writing the COBOL Program

• 54

  Summary of COBOL Transaction I/O Statements
  • 54

    FILE-CONTROL Paragraph
  • 55

    Open
  • 55

    Write
  • 56

    Read
  • 57

    Sequence of Transaction I/O Statements
  • 57

    Clearing the Screen with WRITE
  • 57

    Close
• 57

  I/O Error Processing
  • 57

    Status Key
  • 58

    Coding the Status Key
  • 58

    Exception/Error Procedures
  • 58

    Example Using Status Key and ERROR Procedures
• 58

  Return Information
  • 59

    Attribute Data
  • 59

    Figure 3.1. Explanation of Values Returned in the ATTRIBUTE-DATA Area
  • 60

    Work Station Control Area
• 60

  Transaction I/O Examples
  • 60

    Example: Interactive Entry and Processing
  • 61

    Figure 3.2. Example of Transaction I/O Statements
  • 66

    INDICATOR Example
  • 67

    Figure 3.3. Example of Indicators and Conditional Bypass

70

Chapter 4. Data Communications Programming with COBOL

• 70

  Uses of Data Communications Programs
• 70

  Eligible Systems
• 70

  COBOL Programs and the Communications Access Method
• 71

  COBOL Program Responsibilities
• 71

  System Requirements for Communication Programs
• 71

  Before Running a Data Communication Program
• 71

  Writing COBOL Communication Statements
  • 72

    Communication Routine Parameters
  • 72

    Communication Program Example - Explanation
  • 72

    Open Routine
  • 72

    Figure 4.1. the COBOL Library Routines That Perform Data Communications
  • 73

    Close Routine
  • 73

    Figure 4.2. Return Codes From the COBOL Communication Library Routines
  • 74

    Read Routine
  • 74

    Figure 4.3. Options Available with the Close Routine
  • 75

    Write Routine
• 75

  Communication Program Example - Listing
• 76

  Figure 4.4. Coding Example: Data Communications

80

Chapter 5. Diskette Input/Output

• 80

  Input-Output Summary
• 80

  File Organization and Access Method
  • 81

    Sequential Organization
  • 82

    Relative Organization
  • 82

    Indexed Organization
• 82

  Record Formatting
• 83

  FILE-CONTROL Paragraph
• 84

  FD Entry - VALUE of OWNER-ID Clause
• 84

  Sharing Files
  • 84

    Unshared Files
  • 84

    Shared Files
  • 85

    When Files Can Be Shared
  • 85

    No Sharing with OUTPUT and EXTEND Modes
• 85

  I/O Error Processing
  • 85

    Figure 5.1. Valid Combinations of SHARE/SHARER and OPEN Modes
  • 86

    EXCEPTION/ERROR Procedures
  • 86

    Status Key
  • 87

    Figure 5.2. COBOL Statements for Status Key and EXCEPTION/ERROR Routine
  • 87

    The INVALID KEY Clause
  • 88

    Error Handling Considerations
  • 88

    Theat END Clause
  • 89

    Figure 5.3. COBOL Statement Execution with at END and INVALID KEY
  • 89

    Permanent I/O Errors
• 90

  Processing Files with Sequential File Organization
  • 90

    ASCII File Processing
  • 90

    Creating a Sequential File
  • 90

    Reading From a Sequential File
  • 90

    Figure 5.4. Statements Used with Sequential File Organizations
  • 91

    Updating a Sequential File
  • 91

    Multivolume Record Processing
  • 92

    Example
  • 92

    Figure 5.5. Example of Processing Files with a Sequential Organization
• 94

  Processing Files with a Relative Organization
  • 94

    Creating a Relative File
  • 94

    Figure 5.6. Statements Used with Relative File Organizations
  • 95

    Contents of Relative Key
  • 95

    Example - Creating a Relative File
  • 96

    Figure 5.7. Creating a Relative File
  • 97

    Reading From a Relative File
  • 97

    Updating a Relative File
  • 97

    Example - Reading and Updating a Relative File
  • 98

    Figure 5.8. Example of Processing Files with a Relative Organization
• 100

  Processing Files with an Indexed Organization
  • 100

    Two Types of Indexed Files
  • 100

    Figure 5.9. Statements Used with Indexed File Organizations
  • 101

    FILE-CONTROL Paragraph for Indexed Organization
  • 102

    Rules and Considerations for Index Data Sets
  • 103

    Adding Records to Indexed Files
  • 104

    Creating an Indexed File
  • 104

    Example
  • 105

    Figure 5.10. Creating an Indexed File - Without Index Data Set
  • 106

    Figure 5.11. Creating an Indexed File - with Index Data Set
  • 107

    Reading an Indexed File
  • 107

    Updating an Indexed File
  • 107

    Figure 5.12. Updating an Indexed File

110

Chapter 6. Other I/O

• 110

  Printer I/O
  • 110

    Example of Printer I/O Statements
• 111

  DISPLAY and ACCEPT
  • 111

    Figure 6.1. Example of COBOL Statements Used for Printer I/O
  • 112

    Example of DISPLAY
  • 112

    Figure 6.2. Example of Statements Used for DISPLAY
• 113

  SEQUENTIAL Work Station I/O
  • 114

    Work Station I/O with Sequential I/O - Example
  • 114

    Figure 6.3. Example of Statements Used for Sequential I/O to a Work Station
• 115

  STOP Statement

116

Chapter 7. Compiler Job Procedures and Options

• 116

  Inter-Program Communications and Multiple-Compilations
• 116

  A Note On Compiler Options
  • 118

    Figure 7.1 Job Control Procedure for the 5280 COBOL OS/VS Compiler
  • 119

    Figure 7.2. Required Parameter for Allocating COBOL Data Sets
  • 119

    Figure 7.3 Example of Using a COBOL Compile Procedure
  • 120

    Figure 7.4. Sample Job Control Statements for a DOS/VSE Compilation
  • 121

    Compiler Storage Requirements
• 122

  Multiple Compilations - the *PROCESS Statement
  • 122

    When Using Subprogram Linkage
  • 122

    With Segmented Programs
  • 122

    Maximum Number of Programs
  • 122

    Format and Rules - *PROCESS
• 124

  Host Compiler Options
  • 124

    Defaults and Overrides
  • 125

    DECK or NODECK - D or NOD
  • 125

    Figure 7.5 List of Options Available at Compilation
  • 126

    FIPS or NOFIPS
  • 126

    FLAG or NOFLAG
  • 127

    GONUMBER or NOGONUMBER - GN or NOGN
  • 127

    LINECOUNT (N) - Lc(N)
  • 127

    LIST or NOLIST
  • 127

    MAP or NOMAP
  • 128

    NUMBER or NONUMBER - NUM or NONUM
  • 128

    OBJECT or NOOBJECT - OBJ or NOOBJ
  • 128

    Figure 7.6. Sample Listing with MAP Option
  • 129

    OFFSET or NOOFFSET- OFF or NOOF
  • 129

    OPTIONS or NOOPTIONS - OPTN or NOOPTN
  • 129

    PRINT or NOPRINT
  • 129

    PROMPT or NOPROMPT
  • 130

    QUOTE or APOST
  • 130

    Runmsg(N)
  • 130

    Sequenceornosequence--Seqornoseq
  • 131

    SOURCE or NOSOURCE - S or NOS
  • 132

    STMT or NOSTMT
  • 132

    XREF or NOXREF - X or NOX
  • 133

    Figure 7.10. Sample Listing with XREF Specified

134

Chapter 8. Guide for COBOL Program Execution

• 134

  Manuals and Documentation Needed By the Operator
• 134

  Transferring the Load Module From the Host to IBM 5280
  • 135

    Figure 8.1. Possible Methods of Host-5280 Data Exchange
  • 136

    Remote Job Entry Subsystems
• 136

  Storage Required for Object Programs
  • 136

    Storage Required On Diskette
  • 136

    Main Storage Required for Execution
  • 137

    If a Program Is Too Large
• 137

  Allocating Data Sets for Object Programs
  • 137

    When Programs Are Segmented
• 137

  Allocating Data Sets for Program Files
  • 137

    Initializing Diskettes
  • 138

    Allocating Data Sets
  • 138

    Specifying a Multivolume Indicator
  • 138

    Determining Exchange Type
  • 139

    Record Size
  • 139

    Number of Records for Indexed Files
  • 139

    Delete Character
• 140

  Improving Performance
  • 140

    System Considerations
  • 140

    Improved Performance with Sequential Access Method
  • 140

    Improved Performance When Creating Indexed Files
  • 140

    Improved Performance with SIZE Clause
• 140

  Loading the COBOL Program and Responding to Prompts
  • 141

    Prompts for Loading a COBOL Program
  • 141

    Prompts for Run-Time Options
  • 142

    Prompts for Diskette Files
  • 144

    Prompts for Printer Files
• 145

  The Status Line and Error Messages
  • 145

    Figure 8.2. Layout of 5280 Screen Information
  • 146

    COBOL Execution Errors
  • 146

    Device Errors

148

Chapter 9. Debugging

• 148

  Types of Messages
• 149

  Acting Upon Compiler Messages
• 149

  Compiler Abends
  • 150

    Abnormal Termination and SYSDOVL
• 150

  Messages at Execution
  • 150

    Possible Causes of Execution Errors
• 151

  Debugging Language
  • 151

    Debugging Lines
  • 151

    Declarative Procedures - USE for DEBUGGING
  • 151

    Example - COBOL Debugging Language
  • 152

    Figure 9.1. Coding Example with COBOL Debugging Language

154

Chapter 10. Job-To-Job Facility

• 154

  COBOL Statements Required
• 155

  When Using the Job-To-Job Facility

156

Appendix A. Direct Communications Support A-I

• 156

  Before Running a Data Communication Program A-I
• 156

  Functions Supported A-I
• 157

  TINIT Routine
• 158

  TTERM Routine
• 158

  TOPEN Routine
• 158

  TCLOZ Routine
• 159

  TREAD Routine
• 159

  TWRT Routine
• 160

  TCTL Routine

162

Appendix B. Status Key Return Codes

172

Appendix D. Compiler Return Codes D-I

174

Appendix E. Storage Estimates for Osjvs E-I

178

Appendix F. Storage Estimates for Dosjvse F-I

• 178

  Index X-I

• 28

  With Covers

• 66

  Condition Code Tabh!For Power-On Checkout and IPL Failures
• 71

  Diagnostic Diskette 1
• 72

  Diagnostic Diskette 2
• 72

  Diagnostic Diskette 3

• 80

  Keyboard Scan Code Test (SCANTEST)
• 80

  Display Exerciser Test (CRTTEST)
• 80

  Elapsed Time Counter Test (TMRTEST1)
• 80

  Elapsed Time Counter Test (TMRTEST2)
• 80

  Printer Test (TPRNT)
• 81

  Start-Stop Printer Attachment External Cable Wrap Test (XWRAP)
• 82

  Twinaxial Printer Interface Test (F'rtrpoll)
• 83

  BSC Online Test Program (SYSBOL T)

• 85

  SO LC Error Codes
• 85

  Modem Control Error Codes

• 87

  Ibm 5282

• 88

  Ibm 5285
• 89

  Ibm 5286
• 90

  Ibm 5288
• 91

  Diskette Drives

• 92

  3270 Emulation
• 92

  Magnetic Stripe Reader Feature
• 92

  Elapsed Time Counter Feature
• 92

  Feature Main MPU

• 94

  Start-Stop Printer Adapter
• 95

  Twinaxial Printer Attachment
• 95

  Port Control Logic
• 95

  Receive Data Multiplexor
• 95

  Serdes
• 95

  Control Logic

• 96

  Transmit Commands
• 96

  Receive Commands

• 97

  Bi-Phase Encoding
• 98

  Transmission Sequence

• 103

  Timing and Control Logic

• 105

  Receive Commands
• 105

  Special Control Commands
• 105

  Start-Stop Printer Interface Commands

• 107

  Start-Stop Encoding
• 108

  Status Byte

• 103

  Keyboards
• 104

  Displays
• 106

  Diskettes
• 107

  Diskette Drives

• 121

  Diskette 1 Drive System Checkout Procedure
• 124

  Diskette 20 Drive System Checkout Procedure
• 132

  Printer Test Pattern

• 155

  Ddsacommunications Line
• 155

  Local DDSA Communications Line
• 156

  1200 Bps Integrated Nonswitched (38LS) Communications Line
• 156

  1200 Bps Integrated Switched Communications Line
• 157

  1200 Bps Integrated Nonswitched/Switched Communications Line

• 5

  Table of Contents

7

Safety Notices

13

PCI Adapter Placement for the 8202-E4B, 8202-E4C, 8202-E4D, 8205-E6B, 8205-E6C, or 8205-E6D

• 13

  Supported PCI Adapters for the 8202-E4B, 8202-E4C, 8202-E4D, 8205-E6B, 8205-E6C, or 8205-E6D
• 32

  PCI Adapter Placement Rules and Slot Priorities for the 8202-E4B, 8202-E4C, 8202-E4D, 8205-E6B, 8205-E6C, or 8205-E6D
• 62

  I/O Expansion Units
  • 62

    PCI Slot Priorities for the 5796 Expansion Unit
  • 63

    PCI Slot Priorities for the 5802 and 5877 Expansion Units
• 64

  Determining the Best Place to Install Your Adapter
  • 64

    Finding the Current System Configuration in IBM I

67

Notices

• 68

  Trademarks
• 68

  Electronic Emission Notices
  • 68

    Class a Notices
  • 72

    Class B Notices
• 75

  Terms and Conditions