- 3151. Sound Off for Soundex
- (General)
- ... this article follows the last method, stripping all redundant sounds after compression. The RPG Code 2 contains the ILE RPG program SDX001RG, which executes my Soundex algorithm. SDX001RG accepts a ...
- Created on 31 August 1995
- 3152. Subfile Scroll Bars
- (General)
- ... that displays a list of state codes. The display file (SCR002DF) can be found in 2, and the RPG program (SCR002RG) can be found in 3. This example was run on a PC using IBM's PC400 emulation connectivity ...
- Created on 31 August 1995
- 3153. TechTalk: CODE/400
- (General)
- ... if you want to edit an RPG/400 program, look in the file RPG400.LXL that is loaded before the source member. In this file, you'll find information such as which macro is assigned to which key. To make ...
- Created on 31 August 1995
- 3154. Advanced Join Techniques Using OPNQRYF
- (Business Intelligence)
- ... SHPQTY, and the calculated field, VARQTY. RPG program SHP001RG is coded to read SHP001PF, but the OVRDBF to the primary join file (ORDD) makes it read the data extracted by OPNQRYF instead. The JFLD (Join ...
- Created on 31 July 1995
- 3155. TechTalk: Workstation Data Management Tips
- (RPG)
- ... line turnaround. ? If you're outputting only to a display station, be sure to use the Defer Write-DFRWRT(*YES)-keyword. An RPG WRITE operation forces a line turnaround unless DFRWRT is also issued. -Thomas ...
- Created on 31 July 1995
- 3156. TechTalk: Subfile Paging
- (RPG)
- ... file: *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 A N99 ROLLUP(66) A 99 SFLEND(*MORE) RPG program: *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 C READ QDBXREF 99 ...
- Created on 31 July 1995
- 3157. TechTalk: CL Subfiles
- (CL)
- Try this method to simulate a load-all display subfile with file positioning in CL.3-6 show the code for a Territory Inquiry program as an example of how this can be accomplished. 7 shows the results. ...
- Created on 31 July 1995
- 3158. ODBC Performance Basics
- (APIs)
- ... hear things like that, I flash back to the time when I thought the only way to display multiple rows of data was to use an array. Just as with RPG programming, you're going to need a new set of knowledge ...
- Created on 31 July 1995
- 3159. Fax for the AS/400
- (General)
- ... an AS/400 text editor, an API for sending faxes from RPG programs, a spool file interface, comprehensive fax queueing facilities, and more. Quadrant Software P.O. Box 200 Mansfield, MA 02048 800-258-3399; ...
- Created on 31 July 1995
- 3160. Journaling: A Powerful Debugging Tool
- (IT Infrastructure - Other)
- ... outfile. You could then code an RPG program to process the outfile, and narrow down your search from there. When displaying a journal to an outfile, DSPJRN will put the first 100 bytes of each record ...
- Created on 31 July 1995
- 3161. AS/400 Messaging Concepts and Implementation
- (IT Infrastructure - Other)
- ... (DSPMSGD) or Work with Message Description (WRKMSGD) commands. 3 illustrates the WRKMSGD display for the RPG message file (QRPGMSG), which contains messages that appear at the end of an RPG compile ...
- Created on 31 July 1995
- 3162. Using OPNQRYF to Join Files
- (Business Intelligence)
- ... as RPG or COBOL and is coded to read PERWRK and write to a printer. The data, however, is not in PERWRK, but in PEREMP and DEPEND. That's why the override is there. The override to the primary join file, ...
- Created on 30 June 1995
- 3163. 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
- 3164. 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
- 3165. 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
- 3166. 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
- 3167. 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
- 3168. 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
- 3169. 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
- 3170. 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
- 3171. 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
- 3172. 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
- 3173. 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
- 3174. 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
- 3175. 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
- 3176. 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
- 3177. 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
- 3178. 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
- 3179. 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
- 3180. 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
- 3181. 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
- 3182. 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
- 3183. 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
- 3184. 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
- 3185. 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
- 3186. 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
- 3187. 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
- 3188. 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
- 3189. 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
- 3190. 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
- 3191. 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
- 3192. 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
- 3193. 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
- 3194. 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
- 3195. 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
- 3196. 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
- 3197. 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
- 3198. 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
- 3199. 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
- 3200. 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