- 3351. TechTalk: Attn Doesn't Pay Attentio
- (RPG)
- Attn Doesn't Pay Attention My Attention key doesn't always work! I use my Attn key often. I usually have it set to call QUSCMDLN that way, when I press the Attn key, I get a pop-up window with a command ...
- Created on 31 January 1993
- 3352. TechTalk: Reading Multiple Subfile Records
- (RPG)
- ... One little-known fact about RPG is that it can process several READ op codes simultaneously. You can take advantage of this feature in your situation. Suppose you name your subfile control record SFLCTL. ...
- Created on 31 January 1993
- 3353. TechTalk: Required Field Exit
- (RPG)
- Required Field Exit From: James Harr To: All Does anyone know the replacement for the S/36 required field exit? I've tried 'CHECK(FE)' but it still allows the user to tab out of the field. Any help ...
- Created on 31 January 1993
- 3354. TechTalk: Read Physical File in CL
- (CL)
- ... sequentially in CL without using an RPG program. In addition, after I read it, how do I determine if a record contains "AB" in columns 75-76? A. First, you need to declare the file to the CL program, ...
- Created on 31 January 1993
- 3355. In My Opinion: Take advantage of the VASP
- (Commentary)
- ... for RPG and COBOL in the VASP, probably because some marketing executive decided that this omission might give us another reason to migrate to an AS/400. These failures pale, however, in comparison ...
- Created on 31 January 1993
- 3356. TechTalk: Bogus Retry Option
- (General)
- Bogus Retry Option I found a problem with RPG programs running under Version 2 of OS/400 which were compiled under Version 1. The problem occurs when one of these programs encounters a record lock ...
- Created on 31 January 1993
- 3357. TechTalk: Level Breaks on Partial Fields
- (RPG)
- From: Luis Munoz To: All I'm new to RPG and I am having a problem with level breaks. I need to create a report that breaks on a 12-byte character field but I only want to break on the first two positions ...
- Created on 31 December 1992
- 3358. TechTalk: CRT Files in S/36E
- (RPG)
- Back in the good old days when we were using a S/36, we had occasion to use some CRT files in our RPG II programs. Not often, but sometimes. At times, we would allow the program to put out a few lines ...
- Created on 31 December 1992
- 3359. List Orphaned Objects
- (System Administration)
- ... R A ODSRCM R List Orphaned Objects Figure 4 RPG program ORP001RG FORP001WFO E DISK A * C *ENTRY PLIST C PARM ODLBNM C PARM ODOBNM C PARM ODOBTP C PARM ODOBAT C PARM ODOBTX C PARM ODSRCF C PARM ODSRCL ...
- Created on 31 December 1992
- 3360. TechTalk: I Am 38, Going on 400
- (System Administration)
- ... years in RPG, and getting a little bored with this ancient piece of *$%. Answer: I found that the learning curve was minimal. The thing that takes getting used to is using WRK instead of DSP (in most ...
- Created on 31 December 1992
- 3361. TechTalk: Stay Put in Subfiles
- (RPG)
- ... DDS of the display file) and the INFDS (in your RPG program) to overcome this problem. In the display file, code the SFLRCDNBR keyword in a hidden field that has four digits and no decimal places. In the ...
- Created on 30 November 1992
- 3362. TechTalk: Insight into File I/O
- (CL)
- ... Refer to Figure 1 as I explain the difference between the two parameters. When data is read from a file, either two or three movements occur, depending upon the language used. RPG requires three movements; ...
- Created on 30 November 1992
- 3363. TechTalk: Not All MOVEs Are Valid
- (General)
- Q. I just can't figure this one out. I need to place a numeric field into a numeric array in an RPG/400 program, so that each digit of the original field goes into separate elements of the numeric array. ...
- Created on 30 November 1992
- 3364. TechTalk: File Design
- (General)
- ... the payroll G/L entries now reference more than one G/L master file. I don't know if there is a way to eliminate multiple RPG file specifications for the different G/L master files. I thought of two approaches. ...
- Created on 30 November 1992
- 3365. TechTalk: Recycling OPNQRYF
- (General)
- ... between the two calls. OPNQRYF ... CALL PGMA POSDBF OPNID(XYZ) POSITION(*START) CALL PGMB The other way is to have the second program reposition the file pointer, using a command such as RPG's SETLL or ...
- Created on 30 November 1992
- 3366. TechTalk: Controlling Display Attributes
- (RPG)
- Q. I would like to change the attributes of various fields on my screen through the RPG program. Is there a way to do this? All this time I was defining my fields in the display file with different indicators ...
- Created on 31 October 1992
- 3367. Binary Support in CL
- (CL)
- ... it's possible for an RPG/400 program to end up returning such a string to a CL program. The CL program can now determine the length of the string with the %BIN function so it can extract the valid portion ...
- Created on 31 October 1992
- 3368. TechTalk: Message Files in S/36E
- (System Administration)
- From: Willie Moore To: All I am starting to convert S/36E RPG/FMT programs to native. The S/36E procedures use a MSGF36 to display information to the user as shown in 2. I am starting to convert S/36E ...
- Created on 31 October 1992
- 3369. Multi-format and Join Logicals
- (General)
- ... a single other record, such as the salesperson for the customer or the customer type description. The access in the RPG code is by means of the CHAIN operation. In this case, there is a "one-to-one" correspondence ...
- Created on 31 October 1992
- 3370. TechTalk: The Covert Editor
- (General)
- ... file using SDA. The syntax checker showed no errors coming into SDA, so after making my enhancements I exited and created both the display file and the modified RPG program that uses the display. While ...
- Created on 31 October 1992
- 3371. AS/400 Subfile Programming Part IV: Fine-Tuning
- (RPG)
- ... these fields was found in the RPG Reference manual and the Data Management Guide. (There are a number of other tasty bits of information in the file information data structure.) Nothing in the HLL code ...
- Created on 30 September 1992
- 3372. TechTalk: Are You Cleaning More Than Your Windows
- (RPG)
- If, like me, you must design screens in the S/36E, you may run into trouble when windowing. Yesterday I was working on a program that sent and received a screen and called another program which, in turn, ...
- Created on 30 September 1992
- 3373. TechTalk: Subfiles Without Records
- (RPG)
- ... except when there are no deductions (i.e., zero records in the subfile). The messages are RPG1255 ("Session or device error occurred") and CPF5012 ("Cannot process sub-file request for file"). The RPG line ...
- Created on 30 September 1992
- 3374. In the Trenches: Something for the Road
- (Change Management)
- ... goes well until Sunday morning when you have to write a quick RPG conversion program. You sit down at the AS/400 only to discover that neither the RPG compiler nor the Program Development Manager is available ...
- Created on 30 September 1992
- 3375. Job Accounting-OS/400's Built-in Watchdo
- (System Administration)
- ... as possible. Preparing Reports Job accounting would be useless if you couldn't print reports based on the data gathered in the journal receiver. The trouble is that HLL programs like RPG/400 cannot rea ...
- Created on 30 September 1992
- 3376. TechTalk: Printer File Names
- (System Administration)
- Q. I am trying to write an RPG program which will create print files with varying spool file names. The input file I am reading will contain the name of the print file to be created. I have tried using ...
- Created on 30 September 1992
- 3377. In My Opinion: CASE Technology is not a Panacea
- (Commentary)
- ... RPG/400. Even if the CASE vendor is working closely with IBM, language en-hancements may not be available at the same time. Code which is generated by a CASE tool is only a subset of the language; it does ...
- Created on 30 September 1992
- 3378. TechTalk: DATE Keyword Quirk
- (General)
- ... 1: Replacement for DATE Keyword ... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 A DATE6N 6 0 10EDTCDE(Y) TechTalk: DATE Keyword Quirk Figure 2 Retrieving date in RPG/400 Figure ...
- Created on 30 September 1992
- 3379. SDA's Design Image Work Scree
- (RPG)
- ... like RPG specifications, are column-dependent. Coding DDS is fairly simple for physical and logical files, but becomes more complicated with printer and display files. Fortunately, keywords are available ...
- Created on 31 August 1992
- 3380. AS/400 Subfile Programming Part III: Advanced
- (RPG)
- ... be redisplayed. I often use the same field name both in the SFL-RCDNBR keyword and in the RPG program's F-spec, as shown in Figures 2 and 3. However, this is not mandatory. The RPG field must be numeric ...
- Created on 31 August 1992
- 3381. List Source Maintenance Activity
- (Change Management)
- ... Activity Figure 6 RPG program EDT001RG FQAFDMBRLIP E K DISK FEDT001P1O E 98 PRINTER * C *IN98 IFEQ *ON C WRITEHDR1 C WRITEHDR4 C MOVE *OFF *IN98 C ENDIF * C MOVE MLCDAT CRTDAT C MULT 100.0001 CRTDAT ...
- Created on 31 August 1992
- 3382. HOT TIPS: Operations (10 Tips)
- (System Administration)
- Operations Find Save Info on an Object The Display Object Description (DSPOBJD) command can provide you with a quick and simple method of determining the last time an object(s) was saved and on what ...
- Created on 31 August 1992
- 3383. HOT TIPS: Performance (7 Tips)
- (System Administration)
- ... - Leigh Guerra Faster Processing by Sequential Read When processing a file in an RPG program, it is more efficient to process it sequentially. So if you don't need to process by keys (say you want to ...
- Created on 31 August 1992
- 3384. HOT TIPS: Work Management (10 Tips)
- (System Administration)
- Work Management Eliminate Unwanted Printer Writer Job Logs If you would like to reduce the amount of job logs generated on your system and see no need for logging printer writers, use the following command ...
- Created on 31 August 1992
- 3385. HOT TIPS: Debugging (5 Tips)
- (General)
- ... test files when I'm done since the files in QTEMP will be removed when I sign off. - Ryoichi Morita Use SEU to Check Compiler Errors Use the following technique to find errors in an RPG compile listing. ...
- Created on 31 August 1992
- 3386. HOT TIPS: Programming (16 Tips)
- (General)
- ... - Tim Johnston Dynamic Source Member Manipulation Source physical files may be processed in RPG like a normal database file. This allows a simple method of creating your own tools to provide documentation ...
- Created on 31 August 1992
- 3387. HOT TIPS: Utilities (11 Tips)
- (General)
- ... temporarily changed during an SEU/400 session via F13. This allows CL command prompting from within RPG for QCMDEXC strings, or from within OCL36, for instance. - Douglas Handy SEU Find/Change Improvement ...
- Created on 31 August 1992
- 3388. AS/400 Subfile Programming Part II: Basic Coding
- (RPG)
- ... and structure that you must understand to use subfiles effectively. This article focuses on the typical logic flow of a subfile program, along with the coding of both the display file and the RPG/400 program ...
- Created on 31 July 1992
- 3389. TechTalk: Message Subfile Bug
- (RPG)
- My article "Easy and Powerful Message Presentation" (April 1992) described the usage of message subfiles to present messages in application programs typically written in high-level languages like RPG. Everything ...
- Created on 31 July 1992
- 3390. TechTalk: Doing Windows
- (RPG)
- From: Mike Mohr To: All I am trying to display a window showing the status of the program like the "Printing..." window on the ResourceLibrary. The window should show while I am building a subfile. I ...
- Created on 31 July 1992
- 3391. Creating Program-style Menus
- (CL)
- ... for simplicity. Now let's move on to the CL program. The CL Program The program you use in your menu (whether it's written in CL or in another language like RPG/400) must accept three parameters. These ...
- Created on 31 July 1992
- 3392. Getting Into Outfiles
- (CL)
- ... the outfile must exist before compiling the program. If you are using a system-supplied outfile, you can simply specify the name of the model outfile on your program's file definition statement (the RPG ...
- Created on 31 July 1992
- 3393. Fat Folder Finder
- (CL)
- ... objects. The logical files are used to control report sequence. FLR-002W3 (4a) selects records by name within folder; FLR002W4 (4b) is in name sequence only. The RPG program (6) uses an externally described ...
- Created on 31 July 1992
- 3394. TechTalk: Degraded SETLL Performance
- (System Administration)
- Between V1R3M0 and V2R1M0 of OS/400, IBM seems to have changed the RPG/400 SETLL operation in such a fashion that it may affect the performance of certain applications. Under V1R3M0, it is perfectly acceptable ...
- Created on 31 July 1992
- 3395. TechTalk: Who's Calling Please
- (General)
- ... instance. If the program that needs the caller's name is written in RPG/400 you can call the program activated by the RTVPRVPGM command directly. Just include the code from 1c in your program. If the ...
- Created on 31 July 1992
- 3396. Better Than Job Logs...
- (IT Infrastructure - Other)
- ... ENDPGM Better Than Job Logs... Figure 2C RPG program USR002RG FUSRLOG O E DISK A * C *ENTRY PLIST C PARM ULMSGI C PARM ULMSGL C PARM ULMSGF C PARM ULMSGT C PARM ULMSGX C PARM ULJOBN C PARM ULJOBU ...
- Created on 31 July 1992
- 3397. AS/400 Subfile Programming, Part I: Foundation
- (RPG)
- ... RPG and COBOL source required to complete the program. During file definition specifications, a file extension or clause identifies the subfile and associates the RRN field with it to act as the relative ...
- Created on 30 June 1992
- 3398. TechTalk: Retrieving the AS/400 Serial Number
- (System Administration)
- From: Rick Crider To: All Does anybody out there know how to retrieve the system serial number in an RPG program? I would be most appreciative to have somebody stand up and say: I do!! I do!! It would ...
- Created on 30 June 1992
- 3399. TechTalk: S/36 to AS/400 Conversion Tips
- (System Administration)
- ... this month's Tech36 for an example of this code. About the position of the cursor, this information is now available in the INFDS, even with RPG36. The binary row is in 370, and the binary column is in ...
- Created on 30 June 1992
- 3400. S/36 Environment Printing Internals
- (Document Management)
- ... S/36 Environment are discussed in detail. It's not surprising that some S/36 programmers have expressed frustration with the "simple" job of producing a report on the AS/400. On the S/36, your RPG program ...
- Created on 30 June 1992