How can 2 parameters be returned from subprocedure in free format RPG.In PR i have to define return parameter.but if i have more than 1 parameter how will i define.Please suggest.

Has anyone had experience with using 4D (4th Dimension) as a front end of IBM DB2 on iSeries? I’ve tried FTPing a database, it was downloaded to a PC into Excel, Excel had no problem retaining formatting…however I can’t get DB2 to maintain the formatting and I used DDS to to generate the physical file…

Hi, I know that the SQL connection is managed by the job QZDASOINIT, I would like to know which is the job that manage the IFS connection through UNC path ? I mean if my server name is : server050.domain.lab and I put that UNC path into a windows which is the job that actually…

What is the purpose of IPI prompt type in RPG? Can anybody explain me with examples?

Hi all, I would like to remove TimeStamp to the reports I’m receiving. Basically the report’s format is just the same and I just like to remove the TimeStamp FILE LIBRARY MEMBER FORMAT QASYCPJ QTEMP QASYCPJ4 QASYCPJ4 DATE . . . . . . . 11/20/12 TIME . . . . . . . 13:35:30…

What is the DASD limit (gigabytes) that can be allocated to an LPAR on a i5 570 Power6 that is running V5R4?

Hi, I want to give two If conditions in a cl program to make sure the value of field is between the Range. I am trying to write following line of code but syntax error is coming,any idea/suggestions How can I do comparison at a same time: IF COND(%SST(&ODOBNM 7 4) *LE %SST(&VAR1 7 4))…

I have an interactive program that writes (Inventory Management) transactions to a file. I do not have the source for this program. I need to ensure that field content which is not currently validated by the program can be validated and corrected BEFORE the transaction being INSERTed or UPDATEd is written to the file. I…

Kindly let me know what special authority required to access collection services in iSeries Navigator(To pull graphs using iSeries Navigator in Collection services + Graph data)?

Hi, I would like to know the details about IBM Certifications on As400. Please help me by providing this information. If you have any sample questions, please provide that also which will be a great help for me. Thanks in Advance

I have a RPG Program consist of 3000 lines and its using 9 Physical Files and some LF also .. Now i need to debug the program only to find out particular values in particular in Particular PF. In debugging Mode if i press F10 its reading all those records in every PF. How can…

Is every search saved from user? Are they trackable when just a last name is typed?

Hi, Currently, I am working in Iseries and have 3.5 years of experience as RPG and CL developer. Now, because of the shrinking usage of Iseries I am planning to shift my profession as PL/SQL developer. Could anyone advise whether it will be a wise decision to continue my profession in Iseries or shift my…

My client has given following information to access their FTP server. How can I do this from AS/400 FTP Client?…………………… The external client/vendor will access the FTP server by following the instructions below using the SSL capable FTP client of their choice: • Host:ftps.xxxxxxxxxxxxxxxx.com (note this is not the same as the unsecured accounts URL…

Hi We are having problems sending double byte characters (Chinese) in an XML string via MQ to Websphere Message Broker. We have been advised to use CCSID 1208 as that is a Unicode character set. The XML string has ‘encoding = “UTF-8″‘ set and we have also set mqmd.mdcsi = 1208 in the RPG program.…

Hi There, I created an overlay using Inforprint 300dpi AFP driver and then attached it to a printer file using the DDS keyword OVERLAY. Now after I called the program the spool file was generated , I used AFP work bench Viewer on ‘iSeries Access for Windows’ to view the spool file and it showed everything perfect. Then I…

Is it possible for an initial program (CLP), that runs when a user logs in, to send a message to the queue of the initial menu? *PRV, *EXT and *SAME do not work when specified as the PGMQ.

Is there any way to create a new physical file(say PF2) with same structure/fields as in a logical file(say LF1, whose physical file is PF1). One way is to use CPYF to create PF2 from LF1 but I dont wan’t any data to be copied from LF1 to PF2 (dont want to use clrpfm after…

I have a date coming in to a query in *iso format. when I put it into a date field it comes back as y/m/d despite the fact my datfmt is set to *mdy

On the first display of a format colors are fine, but on subsequent refresh certain constants are getting reset to default color. How do I prevent this? +1′Typ’ DSPATR(&@BLU) TIA