- 3051. Programmer's Toolbox: Debugging CL Program
- (CL)
- ... doesn't give you any assistance on finding your DO groups (as compared to the RPG compiler listing). If you just added some code and the program no longer compiles because of a DO group problem, you probably ...
- Created on 28 February 1998
- 3052. Design Considerations for Client/Server Performance
- (System Administration)
- ... (and should) be written in your accustomed high-level AS/400 language (like RPG or COBOL) and run on the AS/400. Once the three-tier client/server model is adopted, you can achieve optimal client/server ...
- Created on 28 February 1998
- 3053. Query Optimization 101
- (General)
- ... same way that we might use the Read Equal (READE) operation in RPG. Instead of reading the entire file and testing a value against the corresponding field from the file, we would perform a Set Lower Limits ...
- Created on 28 February 1998
- 3054. TechTalk: Easy Access to SEU
- (General)
- ... *LIBL, +*CURLIB') PROMPT('Library name') QUAL2: QUAL TYPE(*NAME) RSTD(*YES) SPCVAL((RPG) (CLP) + (CBL) (RPGLE) (CBLLE) (PF) (LF) (CMD) (DSPF)) /*==================================================================* ...
- Created on 28 February 1998
- 3055. TechTalk: Removing Separator Characters from a Date Field
- (General)
- ... * To compile:* * CRTRPGMOD MODULE(XXX/RMVDTSEP) SRCFILE(XXX/QRPGLESRC)* * CRTSRVPGM SRVPGM(XXX/RMVDTSEP) SRCFILE(XXX/QRPGLESRC) +* EXPORT(*ALL) * *=============================================================== ...
- Created on 28 February 1998
- 3056. TechTalk: Who Locked the Record?
- (General)
- Figure 1: Who locked the record?Q: An RPG application that I am working on must be able to capture a locked record and display the name of the user who has the record. The File Information Data Structure ...
- Created on 28 February 1998
- 3057. Understanding AS/400 Numeric Data Types
- (General)
- ... added to RPG IV. Otherwise, how do we know when each one is appropriate? How do we understand what values they can have? In the paragraphs that follow, I explain the various numeric data types available ...
- Created on 28 February 1998
- 3058. Working with Temporary Files
- (General)
- ... command to write an outfile named OBJECTSinQTEMP,andthenyoucallanRPGprogramtoprocessthatfile.IntheRPG program, you code OBJECTS in the F-spec and use external file definition. Yet the RPG program fails ...
- Created on 28 February 1998
- 3059. Cursor Placement After Subfile Deletion
- (RPG)
- ... RPG III program that uses the subfile. To determine the cursor position, several elements are required. First, the relative record number (RRN) of the last record displayed in the original file must be ...
- Created on 31 January 1998
- 3060. Java GUI Design with JavaBean Components
- (Java)
- ... Visual RPG, but C++, PowerBuilder, and other programming environments, including Java, also provide visual development tools. The ability to visually build graphical applications lessens the technical ...
- Created on 31 January 1998
- 3061. Using the Date and Time Conversion (QWCCVTDT) API
- (APIs)
- ... with the Original Program Model (OPM)-based systems. A tool that has helped me deal with dates in RPG III and OPM COBOL programs is the Convert Date and Time Format (QWCCVTDT) API (for more information, ...
- Created on 31 January 1998
- 3062. IMHO: Is There Life out There?
- (Commentary)
- ... just as you can in RPG II. Don't think I want to get embroiled in a language war here. My beef isn't with languages; it's with intelligence-or more to the point, the lack of it-on operating systems themselves. ...
- Created on 31 January 1998
- 3063. Midrange Insights--Truth and Consequences: Java Prophets Predict AS/400 Profits
- (Commentary)
- ... or merely a sideshow. For those of us who look to the AS/400 for more traditional client/server tools, IBM's enhancements to VisualAge for RPG (VARPG) are also pushing us toward the Internet. The latest ...
- Created on 31 January 1998
- 3064. Take the AFP Challenge: Creating Images on the AS/400
- (Document Management)
- ... driver. This article was prompted by an email from Dennis Leon at United Automobile Underwriters. He needed to capture images and store them on the AS/400 for use with RPG DDS keywords and wrote to ask ...
- Created on 31 January 1998
- 3065. Say Goodbye to CL-Use Service Programs to Control Your AS/400
- (General)
- In the AS/400 environments I've worked in, there is an almost universal understanding of the roles of CL and RPG that goes something like this: Use CL to control the operating system and system objects, ...
- Created on 31 January 1998
- 3066. Word Wrap Utility
- (General)
- ... CLP program WW000C1 (Figure 1), display file WW000D1 (Figure 2), and RPG program WW000R1 (Figure 3). CLP program WW000C1 is included here merely to demonstrate how to call the RPG program and to provide ...
- Created on 31 January 1998
- 3067. Don't Touch That System Date
- (IT Infrastructure - Other)
- ... that compare to the system date, or calculate based on the system date, need to be tested for Y2K readiness. o Using the job date (the UDATE and *DATE variables in RPG programs) is often just as good as ...
- Created on 31 January 1998
- 3068. Getting Gold out of Journal Records
- (IBM i (OS/400, i5/OS))
- ... toorealistic, but it gives us a good example of lots of functions. Journaling is on, capturing before andafter images for all three files. So we have an RPG cycle that will do the following:o Read sequentiall ...
- Created on 31 December 1997
- 3069. UIM List Panels
- (CL)
- ... in Figure 3. If the library exists, PNL002CL calls the RPG program PNL002RG, shown in Figure 4 on page 42. The UIM source code for the panel group is shown in Figure 5 on page 42. In the highlighted ...
- Created on 31 December 1997
- 3070. Adding Recaps to Reports
- (Document Management)
- ... to load the work file o Adding recap report lines to printer DDS specs or RPG output specs o Adding a subroutine to the RPG program to print the recaps First, look at the RPG program that generates ...
- Created on 31 December 1997
- 3071. The AS/400's TCP/IP Workstation Gatewa
- (General)
-
... systems engineer, and IS manager. He is also the author of two popular MC videos: Inside Lotus Notes and RPG Goes Visual. He welcomes your comments by email at
This email address is being protected from spambots. You need JavaScript enabled to view it. . Figure 1: ... - Created on 31 December 1997
- 3072. Picking a Client from Client Access/400: Who Knew There Were So Many Choices?
- (General)
- ... other PC on your network. For those users who only need a connection to the AS/400 to access shared folders or who use client/server products such as Visual Basic or Visual RPG, the Connect Only feature ...
- Created on 31 December 1997
- 3073. Programmer's Toolbox: Reading a Job Lo
- (General)
- ... you don't want the job log to include any of the messages sent to your program message queue, use this command: RMVMSG CLEAR(*ALL) A high-level language (HLL) program such as RPG may also receive messages ...
- Created on 31 December 1997
- 3074. TechTalk: Millisecond Timer
- (General)
- Figure 15: RPG IV program TIMERWhile trying to create a unique identifier for data transfers, we needed to obtain the system time in milliseconds. Although it is possible to retrieve this time using the ...
- Created on 31 December 1997
- 3075. TechTalk: Reclaim Resource Revisited
- (General)
- ... normally, of RPG programs that have the last record (LR) indicator set on, or of any COBOL programs. RCLRSC should not be used if it might be processed while any COBOL program is still active in the application; ...
- Created on 31 December 1997
- 3076. IBM Repackages Client Access/400
- (Analysis of News Events)
- ... Query Manager and SQL Development Kit for CODE/400 AS/400 Printer Services Facility/400, 1-19 images VisualAge for RPG per minutes (IPM)3 Performance Tools for AS/4003 ValuPak for AS/400 Printing GrowthPak ...
- Created on 31 May 1997
- 3077. VisualBasic and Data Queues
- (Visual Basic)
- ... can be forced to the front or end of a queue for processing. This is a very handy way of setting up shutdown commands for the queue process. The RPG/400 code segment presented in this article uses this ...
- Created on 30 April 1997
- 3078. What Every Client Access/400 Programmer Needs to Know About Lotus Notes
- (Collaboration & Messaging)
- ... a trigger, a formula, or a script, just like an RPG subroutine that is triggered when the user hits a command key. Syntax and Field Properties There are two types of program syntax that can be activated ...
- Created on 31 January 1997
- 3079. Getting Started with Multimedia on the AS/400
- (IBM i (OS/400, i5/OS))
- ... you can develop new multimedia content. Plus, it contains APIs for RPG, COBOL, C, and CL that allow you to add multimedia content to existing AS/400 applications without rewriting them. Ultimedia System ...
- Created on 31 May 1996
- 3080. Are You Ready to Play the Dating Game?
- (RPG)
- ... of RPG IV includes the ability to work with the date data type. Careful implementation of this new technology can offer some pretty significant shortcuts that will take your software well into the 21st ...
- Created on 31 May 1996
- 3081. TechTalk: Create a hidden link to the command line through an Attn key program.
- (RPG)
- ... in 2. The command calls the RPG IV program CSR001RG, which you can see in 3. The RPG IV program uses the QsnGetCsrAdr API, which returns the cursor location without requiring a user input operation. Here' ...
- Created on 31 May 1996
- 3082. TechTalk: Avoid garbage data being passed between modules in ILE.
- (CL)
- When passing parameters from a CL module to an RPG module, both of which are part of a single bound program, the length of alpha variables must be the same. For example, the receiving module needs 10 alpha ...
- Created on 31 May 1996
- 3083. Reusing Object Code
- (Change Management)
- ... another, you can concentrate on other things. Reusing object code allows you to use the best language for each task. RPG III can handle the simple math that makes up most business data processing, but ...
- Created on 31 May 1996
- 3084. Using Multiple Member Files with ODBC
- (APIs)
- ... system program. (The strcpy is similar to a CL CHGVAR or an RPG MOVEL operation. The strcat is similar to the CL or RPG CAT operation.) After the statement is constructed, the SQLExecDirect ODBC API ...
- Created on 31 May 1996
- 3085. API Error Handling
- (APIs)
- ... data field is a variable-length field, so you can define it any length you want. The only restrictions are those of the language you're using. For example, in RPG III, a subfield can have a maximum length ...
- Created on 31 May 1996
- 3086. Building Dynamic Web Pages with Net.Data
- (General)
- ... be developed in RPG, COBOL, CL, and C. IBM and other companies are taking the developments a step further. They are delivering prepackaged CGI programs called gateways that can be used without in- depth ...
- Created on 31 May 1996
- 3087. Client Access without Client Access
- (General)
- ... which uses a GUI. You may use the AS/400 System API Reference as a guide when implementing AS/400 NetServer administration through your CL, COBOL, RPG, C, and C++ programs. With Client Access/400, you ...
- Created on 31 May 1996
- 3088. TechTalk: Here's a quick way to get a compile listing of your program
- (General)
- ... I've set up a user-defined PDM option for the different types of programs. Here are some examples: PDM Option: RL (RPG Listing) Command: SBMJOB CMD(CRTRPGPGM + PGM(QTEMP/&N) SRCFILE(&L/&F) + OPTION(*NOGEN) ...
- Created on 31 May 1996
- 3089. TechTalk: Get the contents of a data area written out, even if the program ends abnormally.
- (General)
- The data areas used in an RPG program are not normally written out if the program ends abnormally. So the UDS style of defining data areas is not suitable when you need a data area written out, even if ...
- Created on 31 May 1996
- 3090. TechTalk: This command converts Julian dates in Query/400.
- (General)
- ... RPG program would have to be written instead of using a simpler tool, such as Query/400. Nobody could tell me how to convert Julian dates to the DD/MM/YY format, which is common here in Australia. After ...
- Created on 31 May 1996
- 3091. TechTalk: Programming--This solution allows the user to search using a text month name in a numeric
- (General)
- ... I'm using Open Query File (OPNQRYF) to query the database inside an RPG III program. I would like to avoid creating another file with the appropriately formatted date because this is an interactive program. ...
- Created on 31 May 1996
- 3092. Message Subfiles 101
- (IT Infrastructure - Other)
- ... RPG don't have direct support for program message queues, so you have to call CL programs or APIs to handle the messaging logic. It probably goes without saying that the APIs give you better performance. ...
- Created on 31 May 1996
- 3093. TechTalk: Use the CLEAR operation against files opened for input.
- (RPG)
- In RPG, you can use the CLEAR operation to clear all fields in a record format. However, this works only if the file is opened for output, update, or input with add (A in column 66). If the file is opened ...
- Created on 30 April 1996
- 3094. Programmer's Toolbox: DO Groups in CL Program
- (CL)
- ... are the ones that say you have too many or not enough ENDDOs. The compiler provides no help at all with the DO groups (unlike RPG, which numbers them with 1s and 2s in a column on the listing). You can ...
- Created on 30 April 1996
- 3095. Souping Up the WRKMSGD Command
- (CL)
- ... program MSG016CL, shown in 3. If the CL program does not determine any errors, it calls an RPG program to display the message descriptions using the MSG016DF display file, shown in 4. The RPG program MSG016RG ...
- Created on 30 April 1996
- 3096. Turning the Tables on FTP
- (General)
- ... value of each EBCDIC character can be found in the back of the RPG/400 Reference SC09-1349-01.) At my site, I needed to translate an EBCDIC character to an ASCII tab. I decided to use the EBCDIC greater-than ...
- Created on 30 April 1996
- 3097. TechTalk: Specify only one file per STRJRNPF command.
- (General)
- ... access paths for file &1 being journaled.) was being trapped by a global Monitor Message (MONMSG) command. The job finally stopped when an RPG program tried to open a file with commitment control. From ...
- Created on 30 April 1996
- 3098. Power Up Your IIS Web Site With AS/400 Data
- (IBM i (OS/400, i5/OS))
- Like a lot of people, the thought of hooking an AS/400 up to the Internet sends chills down my spine. I can sit here and mentally imagine thousands of hackers trying to break into the system to access ...
- Created on 31 March 1996
- 3099. Getting the Most Performance from ODBC Query and Development Tools
- (APIs)
- ... Many development shops are abandoning traditional third-generation language (3GL) programming (such as C, COBOL, and RPG) and are turning to popular fourth-generation language (4GL) development tools. ...
- Created on 31 March 1996
- 3100. Building Commitments
- (Commentary)
- ... file updates and program logic. When I'm through, you should understand how to implement commitment control in your RPG programs and see the advantages it offers. In order to understand how commitment ...
- Created on 31 March 1996