hi, you can just use an external ds (from the file) and export it in the *SRVPGM and import it in the calling PGM. here is a little piece of code i use to do tha same : Global parm : FBRO010P1 uf a e k disk D/Copy Qio_Proto,BRO010P1 d Io_BRO010P1 e ds extname(BRO010P1 ) [...]
View Answer | March 21, 2005 4:14 AM
the parameter you need is DRAWER, not sure if you put 3 or the parm or ’3′.. if that is a problem or is not working, try using a workstation customization object(WSCST).
View Answer | March 18, 2005 4:20 PM
AS/400, Data analysis, DataCenter, Hardware
I suggest you define the data structure in both the program AND the subprocedure. Define the structure in the subprocedure as “based” on a pointer and pass the pointer instead of the datastructure into the procedure. When you define the structure in the program, define a separate pointer field and initialize it to the %addr [...]
View Answer | March 17, 2005 7:59 AM
I believe you’re missing the line to display the message on. SFLMSGRCD(?) is the line no. within the window to display the message. Give it a try.
View Answer | March 15, 2005 4:30 AM
I am not an Access person, but the iSeries handles FTP easily. I’ve created a number of scripts to put files from Windows PCs to the iSeries. Example of a text file I use as a script: userid password lcd lcd clientssontagpgms cd /qsys.lib/test.lib bin put shlib.savf code.file quit Some notes: The user and password [...]
View Answer | March 10, 2005 6:39 AM
AS/400, Desktop management applications, Development, Programming Languages
A stream file has no notion of records; thus there is no way to determine a number of records. What you can do is write a program that reads the file and count the number of carriage returns a/o linefeeds; that is probably what you would consider to be the record separator in a .csv [...]
View Answer | March 9, 2005 2:57 AM
I believe the FONTNAME keyword works with *AFPDS type print files. When you create the print file, specifiy DEVTYPE(*AFPDS). That should allow you to use the keyword correctly.
View Answer | March 8, 2005 8:11 AM
I have not taken any classes from SCOOP but I am currently taking the Ebusiness for iSeries Programmers course over the internet and find it to be excellent. Their website is www.mantatech.com.
View Answer | March 1, 2005 9:32 PM
luismereb, do you have the iSeries Navigator (IBM iSeries Access for Windows) installed on your workstation? If so, you can click and drag spool files to your desktop and view them with an EBCDIC reader. Information on this product can be found at http://www-1.ibm.com/servers/esdd/articles/opsnav/index.html
View Answer | February 26, 2005 8:57 AM
AS/400, Tech support
Check the following option on the CRTDSPF: Restore display . . . . . . . . RSTDSP *YES If set to *YES, it might fix the problem.
View Answer | February 25, 2005 8:00 AM
This is a guess. Check what version of MDAC (Microsoft Data Access Components) the AS400 upgrade recommends. The most recent is 2.8. It may be the solution. Sometimes a non-MS vendor supports a specific version like 2.6 or 2.7. All of these can be downloaded from the Microsoft web site.
View Answer | February 23, 2005 9:11 AM
Microsoft Office, UDB for iSeries/i5
An RFC (or Remote Function Call) is a Function Module with the attribute…Remote-enabled module…checked. This allows another system to “call” this function. In the SAP System, the ability to call remote functions is provided by the Remote Function Call (RFC) interface. This interface allows for remote calls between two SAP Systems or between an SAP [...]
View Answer | February 22, 2005 3:14 PM
If you look at that API definition in V5R3, you will find that they have added at least one field to the format you are using. I didn’t dig, but SPLA0200 has added a 10 character field at the end of that format. That would push your error code parameter left by 10 characters, making [...]
View Answer | February 22, 2005 12:35 PM
DataCenter, Development, Programming Languages, RPG
You could copy that file to a file in Qtemp using the INCREL keyword to specify your key value. Then execute a RTVMBRD over the temporary file which will return the current number of records in the field NBRCURRCD as a 10,0 field. Hope this helps. Rex
View Answer | February 18, 2005 11:21 AM
I always believed that IBM utilities worked as a set of phases chained logically and that they, either completed the tasks(or phases) or not at all. With this in mind LOAD’s SHRLEVEL CHANGE support somehow changed this concept in that it resembles me more a program issuing SQL INSERTs than a batch utility that inserts [...]
View Answer | February 18, 2005 8:42 AM
DB2, OS/390, UDB for mainframe, z/OS
Not exactly sure what you want but you can copy a spooled file to a database physical file(CPYSPLF) then look at the contents of that in Hex(DSPPFM file, then F10,F11).
View Answer | February 17, 2005 3:46 AM
View Answer | February 16, 2005 12:53 PM
Database Management Systems, DataCenter, Hardware, i5, iSeries, Networking, OS/400, Servers, tips and tricks, Tools
You will most probably require a PCL (printer command language)for your printer. The command string is typically embedded in the output string i.e “Print bold” “your String”"End of line” etc. Hope this was able to resolve your issue
View Answer | February 14, 2005 9:18 AM
I saw this answer to your questions a while back: Q. Does RPG have anything comparable to LotusScript’s or Visual Basic’s REDIM command that lets you redimension an array? A. RPG IV doesn’t directly support arrays with a variable number of elements. You have to handle all the storage allocation yourself, and since you have [...]
View Answer | February 12, 2005 10:55 AM
– Create the display file with WAITRCD(300) as a parameter – for 5 minutes. – Don’t use EXFMT in the RPG. Use WRITE followed by READ. When the read is encountered it will wait for the specified 300 seconds then return control to the RPG. In the RPG you will also need to code an [...]
View Answer | February 10, 2005 4:13 AM
i5, iSeries, OS/400