- 3151. TechTalk: Using Data Queues for Automatic Screen Painting
- (RPG)
- ... to the data queue technique. 6 contains the RPG code that sends the data to the data queue. In our circumstance, we work with RF. Each truck we dispatch to has its own frequency, and each dispatcher watches ...
- Created on 30 June 1995
- 3152. TechTalk: Side by Side Display Technique
- (RPG)
- Recently, I had to write a program that displayed two identical files residing in two different libraries. I wanted to display the data side by side, but presenting two subfiles horizontally wasn't user-friendly ...
- Created on 30 June 1995
- 3153. TechTalk: Local vs. Remote Workstation Performance
- (System Administration)
- Q: We're currently running local and remote workstations in the same AS/400 subsystem. We seem to be getting uneven local and remote communications performance with this configuration. Any suggestions? ...
- Created on 30 June 1995
- 3154. TechTalk: Forcing an Interactive Job to Batch
- (System Administration)
- ... commands prevents commands from running interactively. For example, if you have programmers who constantly compile RPG programs interactively with the Create RPG Program (CRTRPGPGM) command, you can change ...
- Created on 30 June 1995
- 3155. TechTalk: Combining Spool Files in S36EE
- (System Administration)
- ... want all the batches in one spool entry instead of in separate ones that waste paper. The catch is that these are S36EE programs. I've read in the knowledge base that one can write a dummy RPG/400 program ...
- Created on 30 June 1995
- 3156. Software Announcements: Evolutionary Growth
- (Analysis of News Events)
- ... on compiles. For example, you cannot compile an ILE RPG program to V2R3M0 because no ILE RPG support is available in that release. In a move that surprised many industry analysts, this year's announcement ...
- Created on 30 June 1995
- 3157. Beware of the Outlaw Logical File
- (General)
- ... the EXIST subroutine in the RPG program will check to ensure the library does, in fact, exist. The EXIST subroutine uses the QUSR-OBJD API and monitors for an error message. If the library does not ...
- Created on 30 June 1995
- 3158. TechTalk: Finding a Record's Relative Record Numbe
- (General)
- I sometimes find that DFU is helpful when working with test data. If the file I want to modify is indexed and I know the key value, it is easy to retrieve the record for updating. With nonindexed files, ...
- Created on 30 June 1995
- 3159. Don't Lose Your Record Pointe
- (RPG)
- ... It works by defining the file twice in the program. For instance, if the file that you want to process is called FILE1 and the HLL is RPG, do the following. On a command line or using a CL program, ...
- Created on 31 May 1995
- 3160. Forcing Records to Disk, Part III
- (RPG)
- ... to disk, use the RPG force-end-of-data (FEOD) operation as illustrated in 1. illustrated in Figure 1. The FEOD operation allows you to force to disk all changes your program makes to a file. Normally, ...
- Created on 31 May 1995
- 3161. Modulus 10 Calculation/Validation Program
- (CL)
- ... value of M10. However, there are no programs in OS/400 that will generate an M10 check digit for a number. I wrote an RPG program (M10001RG) to calculate the check digit of a number or, alternatively, ...
- Created on 31 May 1995
- 3162. How to Create an Exit Program
- (General)
- ... Information display), and describes the fields passed to your exit program in the second parameter. The manual also contains model exit programs in RPG and CL for several types of exit points. You can ...
- Created on 31 May 1995
- 3163. Activation Group Concepts
- (General)
- ... resource isolation and performance considerations. An activation group is similar to an extended program model (EPM) environment. Since only EPM C/400 and PASCAL/400 used EPM, RPG and COBOL users will ...
- Created on 31 May 1995
- 3164. Defining Data with SQL
- (SQL)
- ... views consist of rows divided into columns. Don't let these terms throw you. When you create a table, for example, you'll really be creating a physical file, which you can process with RPG programs, ...
- Created on 31 May 1995
- 3165. The Display Access Path Utility
- (RPG)
- ... and 4 contains the code for the CPP, RPG program ACC001RG. Let's take a closer look at the RPG program in 4 since that's where all of the processing takes place. Figure 2 contains the code for the DSPACCPTH ...
- Created on 30 April 1995
- 3166. The Control Break Saga Continues
- (RPG)
- Control breaks are easily handled in RPG by using the logic cycle built into the compiler. Since the early days of the S/38, however, the trend among RPG programmers has been to bypass the cycle, writing ...
- Created on 30 April 1995
- 3167. Subfile Synchronization
- (RPG)
- ... the beginning again. The SCREEN field is also reset to 0. 4 contains DDS and RPG code segments for this technique. Figure 4 contains DDS and RPG code segments for this technique. - Michael Veit Subfile ...
- Created on 30 April 1995
- 3168. Display File Field Changed?
- (RPG)
- From: Doug Close To: Sharon Cannon I want my program to check a display file for changes to any fields. I don't want to compare the new field values to the old. Can I can do this by checking a flag for ...
- Created on 30 April 1995
- 3169. DUP Key Processing
- (RPG)
- Q: How can I allow field duplication for input-capable fields? I want a data entry operator to have the option of duplicating information keyed from the previous input operation. A: Use the duplication ...
- Created on 30 April 1995
- 3170. The Print Last Use (PRTLSTUSE) Command
- (CL)
- ... ADDDAT Add date Source Members INFO: PRTLSTUSE (QATTINFO) CDO: TAAOBJE (QATTCMD) CLP: TAAOBJEC (QATTCL) RPG: TAAOBJER (QATTRPG) Robin Klima is a senior technical editor for Midrange Computing. This ...
- Created on 30 April 1995
- 3171. The AS/400 Report Download Utility
- (CL)
- ... client/server application. The components are simple and common: a VB program, an RPG program, CL programs, physical files, and an Intersystem Communication Function (ICF) file. The link from the PC Support ...
- Created on 30 April 1995
- 3172. The Nature of Objects
- (General)
- ... language (FORTRAN), Report Program Generator (RPG), and the Beginner's All-purpose Symbolic Instruction Code (BASIC). In the years that followed, programmers added fourth-generation languages (4GLs), CASE ...
- Created on 30 April 1995
- 3173. Distributed Data Management: From There to Here
- (IT Infrastructure - Other)
- ... RPG program) or it can be a CL command (e.g., CPYF). The remote database file is located on the target system. The source and target systems are connected with APPC/APPN. In an APPN network of machines, ...
- Created on 30 April 1995
- 3174. Dynamic Sequencing with OPNQRYF
- (Business Intelligence)
- ... a new data path for a report program, you will be happy to know there is a better method. This article will show you how to use the Open Query File (OPNQRYF) command within an RPG program to create temporary ...
- Created on 31 March 1995
- 3175. Duplicate Record WRITE, Part II
- (RPG)
- Regarding "Duplicate Record WRITE Performance" (TechTalk, MC, January 1995): while using a CHAIN before a WRITE can outperform a conditioned WRITE operation when writing duplicate records to a unique file, ...
- Created on 31 March 1995
- 3176. DDS Windows Tip
- (RPG)
- In "Disappearing DDS Window Screens" (TechTalk, MC, February 1995), a Gotcha described calling an external RPG program that displays a window over a previously displayed screen format, erasing the original ...
- Created on 31 March 1995
- 3177. The Distributed Program APIs
- (APIs)
- ... be easy to grasp. However, if most of your experience is as an RPG programmer, you might find it difficult, at first, to understand how the APIs are used. With an RPG program, you customarily include a ...
- Created on 31 March 1995
- 3178. A Passage to Client/Server
- (Analysis of News Events)
- ... RPG code in a variety of event- driven and object-oriented development tools. As these objectives illustrate, integration is the key to IBM's client/server strategy. IBM has pledged to carry virtually ...
- Created on 31 March 1995
- 3179. The ILE Source Debugger
- (RPG)
- ... or debug commands. The source-level debug functions of the system debugger are only available to ILE programs. However, you can perform source-level debugging for Original Program Model (OPM) RPG, COBOL, ...
- Created on 28 February 1995
- 3180. Variable Control Breaks
- (RPG)
- ... need to analyze. We could write an RPG program that reads RETURNS and breaks on certain fields, but that would not be flexible. To get variable control breaks, we must define a dummy physical file, RTN001PF, ...
- Created on 28 February 1995
- 3181. Finding the Relative Record Number
- (RPG)
- There is an RPG extension to the File Description Specification called RECNO that will return the relative record number to the program. But as ridiculous as it might sound, this keyword is only valid ...
- Created on 28 February 1995
- 3182. Performance
- (RPG)
- In "Duplicate Record WRITE Performance," in TechTalk (MC, January 1995), Blair Hamren explains how to gain performance improvement and a smaller joblog by using a CHAIN to check for duplicate records before ...
- Created on 28 February 1995
- 3183. Edit Code for Negative Signs
- (RPG)
- From: Bruce Ballehr To: All I'm trying to define a field so it can be either positive or negative. If negative, the sign would be on the right of the number. This is an input/output field. I define the ...
- Created on 28 February 1995
- 3184. Client Access Data Queue APIs
- (APIs)
- ... components: a client program written in Visual Basic, a client data queue, a server program written in RPG, and a server data queue. These components are illustrated in the diagram in the At a Glance box ...
- Created on 28 February 1995
- 3185. IMHO: MC's Technical Editors Debate Current Issue
- (Commentary)
- ... worked: you coded RPG applications on a green screen tube. Wow, now that's visual programming. Five years ago, the closest thing we had to client/server programming was...your job. The CW held that you ...
- Created on 28 February 1995
- 3186. Telephone Call Accounting with Your AS/400
- (General)
- ... record type. If the record was read successfully, it's written to the detail file (see Figure 3). The RPG program (see 4) illustrates an example of passive communications. Passive communications either ...
- Created on 28 February 1995
- 3187. Query Management Forms
- (SQL)
- ... line. QM Source Record Types A QM form, like an RPG program, is made up of several record types. Each record type controls specific information for the report. The basic QM record types are listed here ...
- Created on 28 February 1995
- 3188. SQL Advice
- (SQL)
- Here are some gotchas that SQL/400 users might find useful. The first will bite RPG programmers who believe that SQL cursors will remain open when returning to a prior program without setting on LR. Files ...
- Created on 28 February 1995
- 3189. Be Careful Using the FREE Op Code
- (RPG)
- ... A programmer used the FREE op code to close down an RPG program, removing the program from memory but not closing the open data paths (ODPs) for the files. The program with the FREE op code was called ...
- Created on 31 January 1995
- 3190. Changing Field Attributes
- (RPG)
- Normally, if you change a display file field from input/output to output only, your input buffer will change and you will need to recompile your program. A quick way to change fields to disallow input ...
- Created on 31 January 1995
- 3191. Disappearing DDS Window Screens
- (RPG)
- ... window. If you call an external RPG program that displays a window over a previously displayed screen format, the screen displayed by the preceding program blank out before the window is displayed. This ...
- Created on 31 January 1995
- 3192. Multiformat Files
- (RPG)
- From: Ricky Thompson To: All Has anyone out there converted S/36 multiformat files to native AS/400 externally described files? We have our order entry file in two different formats. The first line, line ...
- Created on 31 January 1995
- 3193. ILE CL
- (CL)
- ... beginning to emerge, such as the long-awaited ILE RPG/400 and the soon-to-be-released ILE COBOL/400. But, without much fanfare, IBM has also rolled out another ILE language-ILE CL. ILE CL is a significant ...
- Created on 31 January 1995
- 3194. The Display Audit Log (DSPAUDLOG) Command
- (IBM i (OS/400, i5/OS))
- ... entries in the current journal receiver. Source Members INFO: DSPAUDLOG (QATTINFO) CDO: TAASECM (QATTCMD) CPP: TAASECMC (QATTCL) CLP: TAASECMC2 (QATTCL) RPG: TAASECMR (QATTRPG) Jim Hoopes is a senior ...
- Created on 31 January 1995
- 3195. I/O Speed Demons
- (System Administration)
- ... operation instead of a disk operation. Replace the random reads (RPG CHAIN) with array lookups. Read the entire department master file into an array at program initialization. Then, instead of chaining ...
- Created on 31 January 1995
- 3196. Multidimensional Array Conversions
- (General)
- RPG lacks one feature that other languages have had for a long time- multidimensional arrays. If you need them, you can use single-dimensional arrays instead. The trick is to convert the multidimensional ...
- Created on 31 January 1995
- 3197. The Check Power Off Schedule (CHKPWRSCD) Utility
- (IT Infrastructure - Other)
- ... + PROMPT('Return Code:') PARM KWD(HOURS) TYPE(*DEC) LEN(2 0) + PROMPT('Number of hours to + Check for:') The Check Power Off Schedule (CHKPWRSCD) Utility Figure 2 RPG Command Processing Program PWR001RG ...
- Created on 31 January 1995
- 3198. AS/400 Basics: PDM's User-defined Option
- (IBM i (OS/400, i5/OS))
- ... an RPG program in batch and produces an indented listing. These are just a few user-defined options that I find useful; I'm sure you can come up with many more on your own. Customized Time-savers ...
- Created on 31 December 1994
- 3199. Duplicate Record WRITE Performance
- (RPG)
- Recently, I had to use an RPG program to write records from one file to another. The file I was writing to didn't allow duplicate records, but the file I was reading from did. I wrote my program, coding ...
- Created on 31 December 1994
- 3200. Matching Field Names
- (RPG)
- Wouldn't life be easier if the field names on the display file matched the field names in the physical file? To display the values in the database using RPG, the program would simply CHAIN to the file before ...
- Created on 31 December 1994