COBOL Manual for TNS/E Programs (H06.03+)

Contents
HP COBOL Manual for TNS/E Programs—520347-003
xxxviii
Examples (continued)
Examples (continued)
Example 23-5. Using Reference Parameters to Pass Integers to C Routine 23-23
Example 23-6. Using External Declarations to Pass Integers to C Routine 23-23
Example 23-7. Passing a String to a C Routine 23-23
Example 23-8. Passing Parameters to a pTAL Routine 23-26
Example 25-1. DEFINE Names 25-3
Example 25-2. ASSIGN Command 25-4
Example 26-1. COBOL File Names 26-4
Example 27-1. One File on One Tape 27-4
Example 27-2. Several Files on One Tape 27-5
Example 27-3. Multitape File 27-7
Example 27-4. Labeled Tape File 27-10
Example 27-5. Converting a COBOL95 Program to Use Labeled Tape Files 27-11
Example 27-6. Copying an EBCDIC File to a New ASCII File 27-13
Example 27-7. Copying an EBCDIC File to an Existing ASCII File 27-13
Example 27-8. Copying an EBCDIC File to an Existing ASCII File 27-13
Example 27-9. DEFINE for Unlabeled Tape File With Variable-Length
Records 27-18
Example 27-10. DEFINE for Unlabeled Tape File With Fixed-Length Records 27-18
Example 27-11. DEFINE for Labeled Tape File With Variable-Length Records and
Labels to Be Bypassed 27-23
Example 27-12. DEFINE for Labeled Tape File With Variable-Length Records and
Standard IBM Labels 27-23
Example 27-13. DEFINE for Labeled Tape File With Fixed-Length Records and
Standard ASCII Labels 27-24
Example 28-1. File Accessible Only to Owner and Only Locally 28-5
Example 28-2. File Accessible Only to Owner 28-5
Example 28-3.
File Readable and Executable to Owner’s User Group 28-5
Example 28-4.
File Readable to Any User 28-5
Example 28-5. Setting Default File Security to “UUUU” 28-5
Example 28-6. Setting Default File Security to “CUCU” 28-5
Example 28-7. Relative File Without Alternate Keys 28-17
Example 28-8. Indexed File Without Alternate Keys 28-18
Example 28-9. Creating a Queue File With a Timestamp and a User Key 28-19
Example 28-10. Key of Reference 28-21
Example 28-11. Generic Positioning 28-25
Example 28-12. Use of START With the POSITION Phrase 28-27
Example 28-13. Purging a File From an HP COBOL Program 28-42
Example 28-14. Dynamic File Assignment 28-46