Manuals / IBM / Kitchen Appliance / Frozen Dessert Maker

IBM AS/400 Passing Prototyped Parameters, Part, Source for procedure PRTADDR, DIM2 CTDATA

Models: AS/400

1 489

Download 489 pages 47.95 Kb

Page 168

DIM(2)

ILE RPG for AS/400 Programmer's Guide

Passing Prototyped Parameters

*=================================================================*

*PRTADDR - Print an address

*Calls FmtAddr to format the address *=================================================================*

FQSYSPRT		O	F	80	PRINTER
	*-----------------------------------------------------------------					*
	* Prototype for FmtAddr
	*-----------------------------------------------------------------					*
DFmtAddr				PR
D	addr				70
D	strno				5	0
D	st				20
D	cty				15	OPTIONS(*NOPASS)
D	prov				15	OPTIONS(*NOPASS)
DAddress				S	70
	*-----------------------------------------------------------------					*

*Stage1: Original address data structure.

*Only street and number are variable information.

	*-----------------------------------------------------------------			*
D Stage1		DS
D	Street#1	5P 0 DIM(2)		CTDATA
D	StreetNam1	20	DIM(2)	ALT(Street#1)
	*-----------------------------------------------------------------			*

*Stage2: Revised address data structure as city information

*now variable.

	*-----------------------------------------------------------------		*
D Stage2		DS
D	Street#2	5P 0 DIM(2) CTDATA
D	Addr2	35	DIM(2) ALT(Street#2)
D	StreetNam2	20	OVERLAY(Addr2:1)
D	City2	15	OVERLAY(Addr2:21)
	*-----------------------------------------------------------------		*

*Stage3: Revised address data structure as provincial

*information now variable.

	*-----------------------------------------------------------------				*
D Stage3		DS
D	Street#3		5P 0	DIM(2) CTDATA
D	Addr3		50	DIM(2) ALT(Street#3)
D	StreetNam3		20	OVERLAY(Addr3:1)
D	City3		15	OVERLAY(Addr3:21)
D	Province3		15	OVERLAY(Addr3:36)
	*-----------------------------------------------------------------				*
	* 'Program 1'- Use of FMTADDR before			city parameter was added.
	*-----------------------------------------------------------------				*
C		DO	2	X	5 0
C		CALLP	FMTADDR	(Address:Street#1(X):StreetNam1(X))
C		EXCEPT
C		ENDDO

Figure	70 (Part 1	of 2).	Source for procedure PRTADDR

144

Image 168

IBM AS/400 manual Passing Prototyped Parameters, Part, Source for procedure PRTADDR, DIM2 CTDATA, Fmtaddr

Contents

ILE RPG for AS/400 Programmers Guide AS/400eVersion Page ILE RPG for AS/400 Programmers Guide AS/400eVersion Third Edition1999 commentsContents RPG Introductionwith a Service Program ChapterCreating vi ILE DebuggingHandling Working with Files and Devices Chapter 14. Defining FilesFiles FilesAppendixes Appendix B. Using the RPG III to RPGChapter 19. Example of an RPG forIndex COPYNotices countrysuch provisions are inconsistentTrademarks and Service Programming Interface InformationNotices xiv ILE RPG for AS/400 Programmers Guide About This Guide GuideWho Should Use This How to Send Your Comments Prerequisite and Related InformationWhat s New ThisRelease? NODEBUGIO EVALNumbers EVALRElement About This Guidexixxx ILE RPG for AS/400 Programmers Guide Elementto this Guide Changesxxii ILE RPG for AS/400 Programmers Guide ILE RPG Introduction 2 ILE RPG for AS/400 Programmers Guide RPG IV Specifications Chapter 1. OverviewRPG IV Overview sectionCycle Programming RPG IV OverviewFigure 1. RPG Program Logic Cycle Subprocedure logic IndicatorsRPG IV Overview The firstOperation Codes ProgramExample of an ILE RPG Example of an ILE RPG ProgramProgram Control SpecificationsFile Description Specifications Output Specifications Example of an ILE RPG ProgramNAME RATEA Subprocedure Example of an ILE RPG ProgramREGISTER Chapter 1. Overview of the RPG IV Programming9 LanguageExample of an ILE RPG Program The Entire Source ProgramThis program creates a printed output of employees pay for the weekExample of an ILE RPG Program Figure 4 Part 2 of 3. A Sample Payroll Calculation ProgramChapter 1. Overview of the RPG IV Programming11Language Using Interacting with the SystemOS/400 System UsingTools Application DevelopmentAS/400 Tools for AS/400IBM VisualAge RPG and Cooperative Development Environment for AS/400 AS/400 ToolsAS/400 Tools ¹ Program verification- performs, at the workstation, the full range oAS/400 Tools 16 ILE RPG for AS/400 Programmers GuideChapter 2. RPG Programming in ILE Program CreationRPG Programming in ILE RPG Programming in ILE or CRTSRVPGMFigure 5. Program Creation in ILE Program Management Program Callin ILE Source Debugging Bindable APIsRPG Programming in ILE shownMultithreaded Applications RPG Programming in ILEsuppo THREAD*SEREALIZERPG Programming in ILE 22 ILE RPG for AS/400 Programmers GuideChapter 3. Program Creation Strategies Strategy 1 OPM-Compatible ApplicationMethod OPM-Compatible ApplicationExample of OPM-Compatible Program Effect of ILEOPM-Compatible Application Using ILE Program Using CRTBNDRPGRelated Information CRTBNDRPGExample of ILE Program UsingILE Program Using CRTBNDRPG Figure 7. ILE Program Using CRTBNDRPGILE Application Using CRTRPGMOD CRTRPGMODStrategy 3 ILE Application Related InformationScenario ILE Application Using CRTRPGMODMethod Single-Language ILE ApplicationMixed-Language ILE Application Scenario ILE Application Using CRTRPGMODFigure 8. Single-Language Application Using CRTRPGMOD and CRTPGM Advanced Application Scenario ILE Application Using CRTRPGMODMixed-Language Application A Strategy to Avoid A Strategy to AvoidService Related Informationthe default activation group and any named activation A Strategy to AvoidWhen splitChapter 4. Creating an Application Using Multiple Procedures Multiple Procedures ModulePrototyped Calls Multiple Procedures ModuleMODULE Multiple Procedures Module Prototype for procedure FmtCust Note the PR on definitionspecification. It has two output parameters 13. Prototype for FmtCust ProcedureExample of Module with MultipleExample of Module with Multiple Procedures Procedures NumToCin Fmt Example of Module with Multiple Procedures moduleThe Entire ARRSRPT Program Example of Module with Multiple ProceduresARRSRPT *PGM ARRSRPT *MODULE Main Procedure InArrears FmtCust Figure 22 PartExample of Module with Multiple Procedures Figure 22 PartILE RPG Complete Source for ARRSRPT Module 42 ILE RPG for AS/400 Programmers GuideExample of Module with Multiple Procedures Chapter 4. Creating an Application Using Multiple43 ProceduresSUBDUR DaysLate*DOutput for ARRSRPT ARRSRPTCoding Considerations General ConsiderationsCoding Considerations Main Procedure Considerations Subprocedure ConsiderationsProgram Creation Coding ConsiderationsMain Procedures SubproceduresFor Further Information Prototyped Call For Further InformationApplication Creating50 ILE RPG for AS/400 Programmers Guide Statements FileChapter 5. Entering SourceUsing the Source Entry Utility Using SEUUsing SEU Using SEU Procedure EMPTYPE returns a string representing the employeetype indicated by the parameter CODE 28. Source for EMPRPT memberUsing SQL Statements Using SQL StatementsUsing SQL Statements for AS/400 SQL Programming manual and theDB2 UDB for AS/400 SQLReference for more Refer toADTS thefor AS/400 Source EntryCommand Using the CRTBNDRPG CommandUsing the CRTBNDRPG CRTBNDRPGUsing the CRTBNDRPG Command ListingOptions CreationCreating a Program for Source Debugging Using the CRTBNDRPG CommandConsiderations Binding Creating a Program with StaticUsing the CRTBNDRPG Command Command Using¹ WRKOUTQ queue-name Creating an OPM-CompatibleUsing the CRTBNDRPG Command PartA Sample Payroll Calculation Program Figure 32 Part 2 of 2. A Sample Payroll Calculation ProgramUsing a Compiler Listing Using a Compiler ListingListing Obtaining a CompilerCustomizing a Compiler Listing Customizing a Page Headinga Compiler Listing UsingCustomizing the Spacing Indenting Structured OperationsUsing a Compiler Listing The /SPACEErrors ListingCompilation UsingUsing In-Line Diagnostic Messages Using aCompiler Listing Correcting Run-time Errors Using Additional-Diagnostic MessagesBrowsing a Compiler Listing Using SEU Using a Compiler ListingUsing a Compiler Listing for MaintenanceCoordinating Listing Options with Debug View Options Using a Compiler ListingArea DataAccessing the RETURNCODE Data Area Chapter 6. Creating a Program with the CRTBNDRPG Command71Accessing the RETURNCODE Data Area 72 ILE RPG for AS/400 Programmers GuideCommands 7. Creatinga Module Object ChapterCommand Using the CRTRPGMODCreating a Module Object Creating a NOMAIN Module Creating a Module ObjectCreating a Module Object COPY TRANSPFigure 36 Part 1 of 3. Source for TRANSSVC member Creating a Module Object PartSource for TRANSSVC member PartCreating a Module for Creating a Module ObjectDebugging Creating a Module Object Source for TRANSRPT moduleOFLIND*INOF Related CL Commands Additional ExamplesModules Behavior of Bound ILEBinding Modules into a ProgramBinding Modules into a Program Using into aCRTPGM Binding Modules into a Program GroupValue Binding Modules into a Program Concepts forCRTRPGMOD MODULEMYLIB/TRANSRPT CRTRPGMOD MODULEMYLIB/TRANSSVCUsing a Binder Listing Using a Binder ListingRelated CL Commands Additional ExamplesChanging a Module or Program Changing a Module orBASIC FULLUsing the UPDPGM Command LevelChanging the Optimization Changing a Module or ProgramRemoving Observability SizeReducing an Objects Changing a Module or ProgramChanging a Changing a Module or Program 90 ILE RPG for AS/400 Programmers GuideChapter 8. Creating a Service Program Service Program OverviewService Program Overview Strategies for Creating Service Programs Creating a Service Program Using CRTSRVPGMCreating a Service Program Changing A Service Program Related CL commandsa Service Program Using CRTSRVPGM Sample Service Program Sample Service ProgramSample Service Program Figure 42 Part 1 of 2. Source for Service Program CvtToHexChapter 8. Creating a Service Program95 Sample Service Program Source for Service Program CvtToHex42 Part 96 ILE RPG for AS/400 Programmers GuideCreating the Service Program Sample Service Program43. Source for /COPY Member with Prototype for CvtToHex Figure 44. Source for Binder Language for CvtToHexBinding to a Program Sample Service ProgramMODUL 98 ILE RPG for AS/400 Programmers GuideSample Service Program Program to test Service Program CVTTOHEXUpdating the Service Sample Binder Listingadd a to anSample Service Program Chapter 8. Creating a Service Program101Basic Binder listing for CVTHEXPGM Sample Service Program 102 ILE RPG for AS/400 Programmers GuideRunning a Program Using the CL CALL Command Chapter 9. Running a ProgramPassing Parameters using the CALLRunning a Program Using the CL CALL Command Running a Program Using the CL CALL Command PartILE RPG Program that Requires Parameters at Run Time PartApplication Running a Program From a Menu-Driven ApplicationRunning a Program From a Figure 50. Data Description Specification of an Application Menu Running a Program From a Menu-Driven ApplicationA* CMDPROMPT Figure 51. Source for Menu ProgramCommand Replying to Run-Time Inquiry MessagesReplying to Run-Time Inquiry Ending an ILE Program GroupsManaging Activation Managing Activation Groups Specifying an ActivationGroup Default CompatibilityRunning in the OPM Reclaim Resources Command Deleting an ActivationGroup Managing Activation GroupsManaging the Default Heap Using RPG Operations Managing Dynamically-AllocatedStorage Managing Dynamically-Allocated Storage Name?ENDDO Managing Dynamically-Allocated Storage Chapter 9. Running a Program115next@ Managing Dynamically-Allocated Storage 116 ILE RPG for AS/400 Programmers Guidename@ Managing Dynamically-Allocated Storage 52 Part4 of 5. Memory Management - Build a Linked List of Names Chapter 9. Running a Program117Heap Storage Problems Managing Dynamically-Allocated Storageof 5. Memory Management - Build a Linked List of Names Managing Your Own Heap Managing Dynamically-Allocated StorageBindable APIs Managing Dynamically-Allocated Storage SeeAPI theReference54. /COPY file DYNARRI containing prototypes for DYNARRAY module Managing Dynamically-Allocated Storage Partof 2. Global variables and local prototypes for DYNARRAY Chapter 9. Running a Program121Figure 56 on page 123 shows the subprocedures in DYNARRAY Managing Dynamically-Allocated StorageFigure 55 Part 2 ofDYNARRAY Subprocedures DYNARRAY SubproceduresManaging Dynamically-Allocated Storage PartDYNARRAY Subprocedures Managing Dynamically-Allocated StoragePart 3 of 124 ILE RPG for AS/400 Programmers GuideDYNARRAY Subprocedures DYNARRAY SubproceduresManaging Dynamically-Allocated Storage PartThe logic of the subprocedures is as follows Managing Dynamically-Allocated StorageChapter 10. Calling Programs and Procedures Program/Procedure Call OverviewProgram/Procedure Call Overview Calling Procedures Calling ProgramsProgram/Procedure Call Overview callsThe Call Stack Program/Procedure Call OverviewThe call stack stackRecursive Calls Program/Procedure Call Overview59. Three Modules, each with subprocedures Parameter-Passing Considerations Program/Procedure Call Overview60. Recursive Call Stack To Be Avoided Program/Procedure Call Overview 132 ILE RPG for AS/400 Programmers GuideUsing the CALLP Operation Using a PrototypedCall Using a Prototyped Call Calling within an ExpressionExamples of Free-Form Call Passing Prototyped ParametersParameter Passing Styles Passing by ReferencePassing by Value Passing Prototyped Parameters2 * MinLengthFirst + LengthLast + 1 %sizeName Passing Prototyped Parameters PassingUsing Operational Descriptors Passing Prototyped ParametersPrototype for ILE CEE API CEETSTA with CONST Parameter Omitting Parameters Passing Prototyped ParametersLen returns a 10-digit integer value. The parameter is a character string passed by read-only referencePassing *OMIT Leaving Out ParametersPassing Prototyped Parameters 67. Prototype for System API QCMDEXC with Optional ParameterChecking for the Number Passing Prototyped ParametersPassed Source for procedure FMTADDR Passing Prototyped Parameters3. Concatenate the complete address 4. Return 68 PartFigure 68 Part 2 of 2. Source for procedure FMTADDR 69. Source for /COPY member with Prototype for Procedure FMTADDRPassing Prototyped Parameters Source for procedure PRTADDR Passing Prototyped Parameters70 Part DIM2Passing Less Data Than Required ParametersOrder of Evaluation Interlanguage CallsPassing Prototyped Parameters effectInterlanguage Calling ConsiderationsCall Operations UsingUsing V4R4M0Using the Fixed-Form Call Operations CALLB onlyPassing Parameters Using PARM Examples of CALL and CALLBOperations PLISTUsing the PLIST Operation the Fixed-Form Call OperationsReturning from a Main Procedure ProcedureNormal End Returning from a CalledReturning from a Called Program or Procedure Abnormal EndReturning from a Subprocedure Returning from a Called Program or Procedurewithout Using Bindable APIs Returning using ILE BindableAPIs Examples of Using Bindable APIs Calling a Graphics RoutineCalling a Graphics Routine Calling Special Routines Multithreading ConsiderationsMultithreading Considerations How to AcrossShare Data to Avoid Deadlock Multithreading ConsiderationsModules Considerations Deadlock ExampleDebugging and Exception Handling ¹ Debug an Integrated Language Environment application by using theThis section describes how to Language Environment source debugger162 ILE RPG for AS/400 Programmers Guide Chapter 11. Debugging Programs The ILE Source DebuggerThe ILE Source Debugger Debug Commands The ILE Source DebuggerATTR EQUATE3. EnterPF1 Help The ILE Source DebuggerTBREAK THREADPreparing a Program for Debugging Preparing a Program forCreating a Root Source View for DebuggingCRTRPGMOD or a Listing View Creating a COPY SourcePreparing a Program for Debugging Creatinga Statement ViewProgram for Debugging CreatingStarting the ILE Source Starting the ILE Source DebuggerSetting Debug Options STRDBG ExampleStarting the ILE Source Debugger Display Module Source display for program DEBUGEXOPM source debug support field, and Service Example of Removing ILE Programs from a Debug SessionExample of Adding a Adding/Removing Programs from a Debug SessionViewing the Program Source Viewing the Program SourceViewing a Different Viewing the Program SourceModule Changing the View of a Module79. Source View of ILE C procedure cproc Viewing the Program SourceSetting and Removing Breakpoints Setting and Removing BreakpointsSetting and Removing BreakpointsSetting and Removing Breakpoints UnconditionalSetting an BreakpointSetting and Removing Unconditional Thread Breakpoints Setting and Removing BreakpointsFigure 81. Setting an Unconditional Job Breakpoint Setting and Removing BreakpointsExample of Setting a Conditional Job Breakpoint Using F13 Setting and Removing BreakpointsLine Command National Language Sort Sequence NLSSSetting and Removing Breakpoints Setting and Removing Breakpoints 184 ILE RPG for AS/400 Programmers GuideSetting and Removing Job SettingUsing StatementSetting and Removing Breakpoints Setting a Breakpoint Using Statement ViewFigure 84. Sample Section of the Listing with OPTION*NOSRCSTMT Figure 85. Sample Section of the Compiler Listing with OPTION*SRCSTMTSetting and Removing Conditional Thread Breakpoints Using the Work with Module Breakpoints DisplaySetting and Removing Breakpoints Debug Commands Setting and Removing Watch ConditionsRemoving All Job and ConditionsCharacteristics of Watches Setting and Removing Watch ConditionsDisplay SourceSetting Watch Conditions CommandSetting and Removing Watch Conditions Example of a Work with Watch DisplaySetting and Removing Watch Conditions Figure 89. Example of a Display Watch WindowChapter 11. Debugging Programs191 Displaying Active Watches Setting and Removing Watch ConditionsRemoving Watch Conditions Example of Setting a Watch Condition Example of Setting a Watch ConditionObject Stepping Through the Program ObjectStepping Over Call Statements STEP number-of-statements OVERStepping Into Call Statements Stepping Through the Program ObjectStepping Through the Program Object Stepping Through the Program Object ENTRYPLIST Displaying Data and Expressions Figure 95. Stepping into Subprocedure SwitchStepping Through the Program Object Displaying a Field using the EVAL debug command Stepping Through the Program Objectˆ LASTNAME = Jones Unexpected Results when Evaluating Variables Stepping Through the Program ObjectScalar FieldsDisplaying the Contents of an Array Displaying the Contents of a TableStepping Through the Program Object variablefield-name isDisplaying Data Structures Stepping Through the Program ObjectDisplaying Indicators Using EVAL with Data StructuresStepping Through the Program Object Displaying Fields as Hexadecimal Values in Character FormatStepping Through the Program Object DisplayingData Displaying Variable-Length Fieldsby Pointers Displaying Null-Capable FieldsFigure 102. Examples of %SUBSTR using DBGEX Stepping Through the Program ObjectChapter 11. Debugging Programs207 Fields ValueChanging the Value of Fields or Command Equating a Name with a Field, Expression, or CommandDisplaying Attributes of a Field Equating a Name withILE RPG Sample Source for Debug ExamplesExamples Sample Source for Debug Examples Figure 105 Part 1 of 4. Source for Module DBGEXPARM1 is used when calling RPGPROG program Sample Source for Debug ExamplesPointers Date, Time, TimestampSample Source for Debug Examples Figure 105 PartSource for Module DBGEX 214 ILE RPG for AS/400 Programmers GuideSample Source for Debug Examples 105 Part 4 ofSource for Module DBGEX. DBGEX is the main module of the programFigure 107. Source for C Procedure cproc. cproc is called by DBGEX Sample Source for Debug Exampleschar *cprocunsigned int size, char *inzval char *ptrChapter 12. Handling Exceptions Exception Handling OverviewException Handling Overview Exception Handling Overview Eachboundary is controlreached boundary. A 218 ILE RPG for AS/400 Programmers GuideException Handling Overview Call Stack and Exception Message PercolationILE RPG Exception Handling Exception Handling OverviewMain Exception Handling HandlingINFSR Exception Handling Overview HandlingUsing Exception Handlers Using Exception HandlersException Handler Priority Nested ExceptionsUsing Exception Handlers For othertypes of messagesExample of Unhandled Function Check Using Exception HandlersNote The Using RPG-Specific Handlers Optimization Considerationskeyword, ILE Specifying Error Indicators or the E ExtenderUsing an Error Subroutine blankUsing a File Error INFSR Subroutine BEGSRTRNSUPDT This program is a simple inventory update program Access the product master file using the transaction product If the record is found, update the quantity in the master fileIf unexpected error occurs, cause inquiry message to be issued numberUsing a Program Error Subroutine specExample of *PSSR Subroutine in Main Procedure ‘*DETC’Chapter 12. Handling Exceptions233 113. Example of Subprocedure *PSSR Subroutine with GOTO 234 ILE RPG for AS/400 Programmers GuideAvoiding MOVE Specifying a Return Point Using a Condition Handler ILE Condition HandlersILE Condition Handlers RPGHDLR RPG exception handling procedure ILE Condition Handlers Action codes areSHOWERR Condition CEEHDLRShow exception handling using a user-defined ILE Condition HandlersRegister the handler and generate errors ILE Condition HandlersUsing CancelHandlers APIsDefine the prototype for the cancel handler. This procedure is a local procedureProcedure SubProc. Call Enabler. Since this call will fail define a local *PSSR subroutine to handle the errorProcedure Enabler. This procedure enables a cancel handler Enabling and Coding a Cancel Handler for a SubprocedureFigure 118 Part 3 ofProblems when ILE CL Monitors for Notify and Status Messages 119. Output from CANHDLR programHandler definitions If this is CPF4906, handle the notify msg, otherwise percolate120. ILE Condition Handler that Ignores CPF4906 121. How to Ignore Status and Notify Messages Chapter 12. Handling Exceptions249250 ILE RPG for AS/400 Programmers Guide Using the DUMP Operation Code Using the DUMP Operation CodeChapter 13. Obtaining a Dump Obtaining an ILE RPG Formatted Dumpa Formatted Dumpof a Program Status InformationDump Feedback Areasof a Example of a Formatted Dump Figure 123. Feedback Areas section of Formatted DumpData Information of aDump Example of a Formatted Dump Figure 125 Part 1 of 2. Data section of Formatted Dump256 ILE RPG for AS/400 Programmers Guide Example of a Formatted Dump Example of a Formatted Dump Working with Files and Devices 260 ILE RPG for AS/400 Programmers Guide Chapter 14. Defining Files Associating Files with Input/Output DevicesAssociating Files with Input/Output Devices Device Associating Files with Input/Output DevicesNaming Files Types of File DescriptionsTypes of File Descriptions Using Files with Program-DescribedFiles Example of Some Typical Relationships betweenDefining Externally Described Files Defining Externally DescribedFiles Renaming Record-Format Names Ignoring Record FormatsRenaming Field Names Defining Externally Described FilesUsing Input Specifications Modify anDescription Defining Externally Described FilesFiles Defining Externally DescribedUsing Output Specifications Filesediting DDS Referin the Level Checking Defining Externally Described FilesOSLSREC Defining Program-Described Files Data Management Operations and ILE RPG I/O OperationsRPG I/O Operations DataData Management Operations and ILE RPG I/O Operations OperationOperation 272 ILE RPG for AS/400 Programmers GuideFile ConsiderationsOverriding and Redirecting File Input and Output Chapter 15. GeneralInput and OutputInput OutputFile Locking File LockingRecord Locking Record LockingPath Sharing an Open DataSpooling SpoolingOutput Spooling SRTSEQ/ALTSEQSRTSEQ/ALTSEQ in an FileSRTSEQ/ALTSEQ 280 ILE RPG for AS/400 Programmers GuideChapter 16. Accessing FilesDatabase Files Physical Files and Logical FilesUsing Externally Described Disk Files Record Format SpecificationsAccess Path Using Externally Described Disk FilesUsing Externally Described Disk Files Example of the Data Description Specifications for a Database FileThe sample DDS are for the customer master logical file CUSMSTL. The fUsing Externally Described Disk Files 140. Example of a field Reference File284 ILE RPG for AS/400 Programmers Guide Valid Keys for a Record FileDisk Arguments a PartialReferring to Using Externally Described Disk FilesRecord Blocking and Unblocking ¹ AUsing Externally Described Disk Files Using Program-Described Disk Files Using Program-Described Disk FilesIndexed File ArgumentsChapter 16. Accessing Database 289Files FilesHandling Sequential File Record Address FileUsing Program-Described Disk Files D K1Methods for Processing Disk Files Limits RecordsRelative Record Numbers Methods for Processing Disk FilesConsecutive Processing Methods for Processing Disk Filessubsequent textDATA DESCRIPTION SPECIFICATIONS DDSFigure 144 on page 294 and Sequential-by-Key ProcessingExamples of Sequential-by-Key Processing DiskMethods for Processing Disk Files Figure 144. DDS for database file EMPMST physical file145. DDS for database file TRWEEK physical file 146. DDS for database file EMPL1 logical fileChapter 16. Accessing Database 295Files Methods for Processing Disk FilesSequential-by-Key Processing, Example Sequential-by-Key Using READ Methods for Processing Disk Files296 ILE RPG for AS/400 Programmers Guide for Processing Disk Files ENUMMethods for Processing Disk Files 298 ILE RPG for AS/400 Programmers GuideRandom-by-Key Processing Example of Random-by-Key ProcessingMethods for Processing Disk Files Sequential-within-Limits Processing Methods for Processing Disk FilesExamples of Sequential-within-Limits Processing Disk Files2 Sequential-within-Limits Processing Methods for Processing Disk FilesDDS for record address file LIMITS physical file Relative-Record-Number Processing Methods for Processing Disk FilesValid File Operations Valid File OperationsChapter 16. Accessing Database 305Files Valid File Operationsan A,P,G,D,T,Z Valid File Operations A record-addressUsing Commitment Control Using Commitment ControlCommitment Control Locks Using Commitment Controlsee theBackup and Recovery manual Abridged forUsing the SpecifyingFiles Example of Using Commitment Control 1.CRTJRNRCV JRNRCV RECEIVER2.CRTJRN JRNJOURNAL JRNRCVRECEIVER 3.STRJRNPF FILEMASTER TRANS JRNJOURNALControl LCKLVL*ALL2CALL. REVISE 3ENDCMTCTLCycle DDM FilesDDM Files Commitment Control inUsing Pre-V3R1 DDMDDM Files 314 ILE RPG for AS/400 Programmers GuideAccessing ExternallyDevices TypesAccessing Printer Devices Accessing Printer DevicesSpecifying PRINTER Files Handling Page OverflowAccessing Printer Devices OverflowAccessing Printer Devices Example of Printing Headings on Every Page Example of Printing a Field on Every PageAccessing Printer Devices Chapter 17. Accessing Externally Attached319DevicesUsing the Fetch-Overflow Accessing Printer DevicesPrinting a Field on Every Page Accessing Printer Devices Figure 159. Overflow Printing Setting of the Overflow IndicatorFetch Overflow Example of Specifying Fetch OverflowAccessing Printer Devices Use of Fetch OverflowChanging Forms Control FileInformation in Accessing Printer Devices FormsLayout of OPM PRTCTL Data Structure Accessing Tape Devices Accessing Tape DevicesAccessing Display Devices Using Sequential FilesUsing Sequential Files FileUsing SPECIAL Files Using SPECIAL FilesFile Using SPECIAL Files ErrorStatus DescriptionExample of Using a Special File SPECIAL FilesUsing SpecificationsUsing SPECIAL Files User-written program USERIOPLISTSPCL Chapter 18. Using WORKSTN Files Using Externally Described WORKSTN FilesUsing Externally Described WORKSTN Files FunctionUsing Externally Described WORKSTN Files ¹ OutputUsing Externally Described WORKSTN Files Chapter 18. Using WORKSTN Files333R RESPONSE Specifying Function Key Indicators on Display Device Files DeviceUsing Externally Described WORKSTN Files Using Subfiles Processing an Externally Described WORKSTN FileUsing Externally Described WORKSTN Files Chapter 18. Using WORKSTN Files335Using Externally Described WORKSTN Files fieldSubfile Display Use of Subfiles Using Externally Described WORKSTN FilesData Description Specifications for a Subfile Record Format Using Program-Described WORKSTN Files Using Program-Described WORKSTN Fileswith Using Program-Described WORKSTN FilesUsing a Program-Described Output SpecificationsInput Specifications Calculation SpecificationsName withoutValid WORKSTN File Operations Input FileOutput File Combined FileEXFMT Operation READ OperationWRITE Operation Multiple-Device FilesMultiple-Device Files Multiple-Device Files 344 ILE RPG for AS/400 Programmers GuideChapter 19. Example of an Interactive Application Database Physical FileDatabase Physical File Inquiry DDS for aDisplay Device Main Menu InquiryCUSMAIN RPG Source Main Menu InquiryIn addition to describing the constants, fields, line numbers, and hoMain Menu Inquiry Source for module CUSMAIN348 ILE RPG for AS/400 Programmers Guide File Maintenance File MaintenanceCUSMSTL1 DDS for a LogicalDisplay File MaintenanceFile DeviceFile Maintenance Figure 174 Part 2 of 2. DDS for display device file MNTMENUChapter 19. Example of an Interactive 351Application CUSMNT RPG Source File MaintenanceDSPATRPR File Maintenance Chapter 19. Example of an Interactive 353ApplicationADD NEW CUSTOMER TO FILE File Maintenance SET MAINTENANCE MODE354 ILE RPG for AS/400 Programmers Guide File Maintenance F6 UpdateCustomer File Maintenance Display Mode prompt screen F3 End JobFile Maintenance Customer File Maintenance Display Mode screenCustomer File Maintenance Add Mode prompt screen 356 ILE RPG for AS/400 Programmers GuideFile Maintenance YORKTOWNChapter 19. Example of an Interactive 357Application Search by Search by Zip CodeFile SZIPMENU DDS DisplayFile DeviceSearch by Zip Code 14DSPATRHIPROMPT SCHZIP RPG Source Search by Zip CodeChapter 19. Example of an Interactive 361Application Search by Zip Code 362 ILE RPG for AS/400 Programmers GuideThe subfile is written to the screen as shown in Figure 186 on pageSearch and Inquiry by Name Search and Inquiry by NameFile CUSMSTL3 DDSDevice FileSearch and Inquiry by Name SNAMMENU DDS for a DisplaySCHNAM RPG Source Search and Inquiry by NameSearch and Inquiry by Name Chapter 19. Example of an Interactive 367Application¹ To Search and Inquiry by NameSUBROUTINE The user requestsmore information bySearch and Inquiry by Name 192. Customer Search and Inquiry by Name detailed information screen370 ILE RPG for AS/400 Programmers Guide Appendixes  Copyright IBM Corp. 1994372 ILE RPG for AS/400 Programmers Guide RPG/400 and ILEAS/400 AppendixRunning Differences Between OPM RPG/400 and ILE RPGDebugging and Exception RPG/400 ILE RPG Differences Between OPM RPG/400DBCS Data in Character Fields ILE RPGDBCS ILE RPG 378 ILE RPG for AS/400 Programmers GuideDifferences Between OPM RPG/400 Appendix B. Using Conversion OverviewConversion Conversion OverviewFile Considerations File Record LengthConversion Overview The Log File Conversion Aid Tool RequirementsFile OverviewWont Do Converting Your SourceConverting Your Source What the ConversionThe CVTRPGSRC Command Converting Your Sourcemember namesConverting Your Source FROMFILEsource-file-name LIBLConverting Your Source TOFILEQRPGLESRC NONEConverting Your Source Defaults Converting a Member UsingSource Converting All Members in a File a FilePerforming a Trial Conversion Converting Your SourceObtaining Conversion Reports Converting Auto ReportSource Members Converting Your SourceInserting Specification Templates a DataExample of Source Conversion Example of Source ConversionExample of Source ConversionTo convert this source, enter The converted source is shown in Figure 195 on pageExample of Source Conversion Figure 195. Converted RPG IV Source for TEST1ARR1 Analyzing Your Conversion Analyzing Your ConversionUsing the Conversion ReportAnalyzing Your Conversion Your Sample Source Section of Conversion ReportSample Message Summary of Conversion Report Using the Log File Analyzing Your ConversionCPYF FROMFILEQRPGLE/QARNCVTLG TOFILEMYLIB/QRNCVTLG CRTFILE*YES Appendix B. Using the RPG III to RPG IV397 Conversion Aid Analyzing Your Conversion200. DDS for model log file QARNCVTLG in library QRPGLE Resolving Conversion Problems Compilation Errors in Existing RPG III CodeUnsupported RPG III Features Resolving Conversion ProblemsConversion RPG III Source for TEST2RPG III Source for COPYDS1 Context-Sensitive Problems Resolving Conversion ProblemsUse of Externally StructuresResolving Conversion Problems Merging an Array with an Externally Described DS Subfield InitializingResolving Conversion Problems 207. RPG III source using external data structure with arrayRun-time Differences Resolving Conversion Problems210. RPG III source with renamed and initialized external subfield RPG IV source with two definitions for renamed subfieldResolving Conversion Problems 404 ILE RPG for AS/400 Programmers GuideAppendix C. The Create Commands Using CL CommandsHow to Interpret Syntax Diagrams Reading Syntax DiagramsCRTBNDRPG Command CRTBNDRPG CommandCRTBNDRPG Command Appendix C. The Create Commands4073library-name/32 3description32Description of the CRTBNDRPG Command CRTBNDRPG CommandOPTION Details CRTBNDRPG Command LIBLCURLIB SRCMBRCRTBNDRPG Command 410 ILE RPG for AS/400 Programmers GuideStatementNumber = sourceID * 1000000 + sourceSEUsequencenumber DEBUGIOCommand EVENTFDBGVIEW STMTCRTBNDRPG Command character-valueEXPDDS, and CRTBNDRPG Command sort-table-nameLANGIDUNQ LANGIDSHRCRTBNDRPG Command REPLACECRTBNDRPG Command 416 ILE RPG for AS/400 Programmers GuideLIBCRTAUT target-release V2R3M5Command binding-directory-nameUSRCTL CRTBNDRPG Command ENTRYEXITCRTRPGMOD Command CRTRPGMOD CommandCRTRPGMOD Command Appendix C. The Create Commands421Description of the CRTRPGMOD command CRTRPGMOD Commandof CRTRPGMOD 422 ILE RPG for AS/400 Programmers GuideAppendix D. Compiler Listings Compiler ListingsCompiler Listing PrologueReading a Compiler ListingsCompiler Listings 2/ Module or Program3/ Source member 4/ SourceSection Compiler ListingsSample Section of the Listing with OPTION*NOSRCSTMT Listings Appendix D. Compiler Listings427Compiler Listings Figure 217 Part 1 of 3. Sample Source Part of the Listing428 ILE RPG for AS/400 Programmers Guide Compiler Listings Figure 217 Part 2 of 3. Sample Source Part of the ListingAppendix D. Compiler Listings429 Compiler Listings 1a/ *NOSRCSTMT Source HeadingLine Number Ruler LineDiagnostic AdditionalSpecifications ListingsOutput Buffer Positions COPY Member TableSample Additional Diagnostic Messages with OPTION*NOSRCSTMT Sample Additional Diagnostic Messages with OPTION*SRCSTMTCompile-Time Data Compiler Listings1/ Total Number of Characters Altered 2/ Character to be AlteredKey Field Information Cross-Reference TableCompiler Listings Figure 223. Sample Key Field InformationExternal References List Compiler ListingsFigure 224. Sample Cross-Reference Table with OPTION*NOSRCSTMT Message Summary Final SummaryCompiler Listings Figure 225. Sample External ReferencesCode Generation and Binding Errors Compiler ListingsFigure 227. Sample Final Summary Compiler Listings 438 ILE RPG for AS/400 Programmers GuideBibliography ADTS/400Programming DevelopmentGDDM FORTRAN/400Bibliography AS/400442 ILE RPG for AS/400 Programmers Guide Special continuedSee Add Page CALL CL commands control-record format, subfile DBCS continued debugging continued NLSS 364access NOOPTsummary Page Page alsoDISK See long alsoPARM methodscontinued creationcontinuedcallcontinued alsoILE programcontinued debuggingcontinuedWORKSTN Page WORKSTN file definition 331 examples 345 externally described ÉÂÔÙ Part Number 99H3778 Program Number 5769-RG1 Printed in U.S.A99H3778 SC09-2507-02