RPG Free Array Processing
Maybe this is what you are trying for:<pre> dow NOT %eof(master) and x <= 600; %subarr(arr1:x:3) = artypes; x += 3; read master; enddo;</pre> Those changes are all inside of your original DOW loop. The D-specs need this change:<pre> Dtypes ds D type1 3a D type2 3a D type3 3a D artypes 3a dim(3) overlay( [...]

View Answer   |  December 2, 2010  7:07 AM
iSeries, RPG arrays, RPG ILE, V5R4

Command to show daily save file verification
I’m not sure what you are asking, but try WRKOBJ OBJ(MYLIB/MYSAVF) Then use option 8. You can also use DSPOBJD OBJ(MYLIB/MYSAVF) DETAIL(*FULL) To see the contents of the save file use the DSPSAVF command.

View Answer   |  December 1, 2010  8:50 PM
AS/400 command functions, AS/400 commands, DSPOBJD

Chat Server for the enterprise
<a href=”http://lync.microsoft.com/en-us/Pages/default.aspx”>Check out Lync.</a>

View Answer   |  December 1, 2010  8:10 PM
Chat applications, Enterprise application development, Enterprise applications

Retrieve the file names in IFS folder to a physical file
Maybe this CL-code may help you: <pre> CD xxxx CRTPF QRPLOBJ/IFSDIR rcdlen(128) STRQSH CMD(‘ls -lT *.* > /qsys.lib/QRPLOBJ.lib/ifsdir.file/ifsdir.mbr’) </pre> The code will create the file you want. If the essense of your question is that you simply want to delete files older than 15 ys, this url may help: <pre> CD /xxxxxxx STRQSH CMD(‘find . [...]

View Answer   |  December 1, 2010  3:24 PM
IFS, IFS Directory, IFS Folder, Physical Files, V5R4

Copy high volume of data between AS/400
Sorry, but that information is missed. The data some 1500.000.000 de records used to collect data sql and ddm record x record Could send me some tips I need have in hand to do this process eficient Tanks You

View Answer   |  December 1, 2010  1:19 PM
AS/400 data transfer, AS/400 database, AS/400 Database File, Copy Database, Data Transfer Rate

Compiling a CL program
No, you do not need to compile the CL, only the RPG program

View Answer   |  November 29, 2010  2:43 PM
AS/400, CL Program, CL programming, CLLE, OVRDSPF

Check IF Field is Numeric in AS/400 SQL
xx

View Answer   |  November 28, 2010  9:33 AM
AS/400 numeric fields, AS/400 SQL, SQL, SQL Server

What is the Web Services Client for C++ toolkit and how is it installed?
There is a very good link from IBM, just link to : http://publib.boulder.ibm.com/infocenter/iseries/v5r3/index.jsp?topic=%2Frzamj%2Frzamjwebservicesintro.htm

View Answer   |  November 26, 2010  12:05 PM
C++, IBM, Web services, Web services (software), XML Toolkit for iSeries

Restore Job Schedule entry to iSeries box.
You can’t FTP the job scheduler object from one system to another because FTP only transfers files, and the scheduler object isn’t a file. You can save the object into a savefile and FTP that, but it will transfer the entire object; the restore will restore the entire scheduler. If you want to transfer only [...]

View Answer   |  November 26, 2010  10:41 AM
AS/400 FTP, AS/400 job scheduler, FTP, JOBSCDE

Not able to restore Logical File after it was damaged and deleted
If I understand you correctly, your restore command should include *REPLACE on the “Output member option”. When the restore is done, you will need to ADD the logical file as a member

View Answer   |  November 26, 2010  9:21 AM
AS/400 administration, IBM System i 550, Logical Files, Restore files, RSTOBJ

How to retrieve system name on which I am working in as/400??
A CL program (or module) can retrieve the system name this way:<pre> dcl &SysName *char 10 rtvneta sysname( &SysName )</pre> In HLLs such as RPG, the <a href=”http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp?topic=%2Fapis%2Fqwcrneta.htm”>Retrieve Network Attributes (QWCRNETA) API</a> can retrieve the same info. (The API can also be called in CL, but the RTVNETA command is easier.) You need to be [...]

View Answer   |  November 26, 2010  8:38 AM
AS/400 administration, AS/400 system administration, CL programming, CL programs

Skype ADM-File for Windows Server 2003 group policy
The latest version I can find is 1.7, located at: <a href=”http://www.skype.com/security/Skype-v1.7.adm”>http://www.skype.com/security/Skype-v1.7.adm</a>

View Answer   |  November 25, 2010  11:30 PM
ADM, Group Policy, Skype, VoIP, Windows Server 2003, Windows Server 2003 Group Policy

How to move an AS/400 numeric field to an alphanumeric field without disturbing the value in it?
Hey Phil, You are a Genius. It worked excellent!! I tried all combinations of %EDITC but in vain, as I used only EVAL I did not think of EVALR. That solved my problem. Great!! Svanky ——————————————————————————————— Thanks but WoodEngineer deserves the <– approved button. He identified the need for EVALR. Good question and good responses. [...]

View Answer   |  November 25, 2010  2:39 PM
AS/400, DB2/400, OS/400, RPG/400

Example of Cobol call to an SQL stored procedure
Without knowing a little more, it’s hard to say. There is a minimum set of statements needed. The first set would be somewhere in your Working-Storage section:<pre> EXEC SQL INCLUDE SQLCA END-EXEC.</pre> You will need the SQLCA to be included to give access to SQL error info, etc. You put it wherever seems best for [...]

View Answer   |  November 24, 2010  11:28 PM
COBOL, iSeries, iSeries Cobol programming, SQL stored procedures, Stored Procedures

RPG /Free Local Data Area definitions
Here is a link to a great article by Bruce Vining that should help you out. http://www.mcpressonline.com/programming/cl/the-cl-corner-reduce-those-annoying-substring-operations.html

View Answer   |  November 24, 2010  7:32 PM
ILE RPG, iSeries, RPGLE, V5R4

Deleting unmatched records from a file in iseries SQL
Original command: <pre>DELETE FROM DVMURRAY/INSRP100 WHERE SHListNo = ALL ( SELECT SHListNo FROM DVMURRAY/INSRP100 Left Outer Join DVMURRAY/INSRP200 on SHListNo = SDListNo WHERE SDListNo is Null ) Row not found for DELETE. </pre> There could be several ways to do it. Here are some examples, although I’m not sure the syntax for the first one [...]

View Answer   |  November 24, 2010  6:00 PM
iSeries SQL, iseries v5r4, RPGSQL, SQL, V5R4

AS/400 command to setup authority at group level to the file sending on SFTP
What is the Servfin system? Another AS/400?

View Answer   |  November 24, 2010  12:05 AM
AS/400, AS/400 command functions, AS/400 commands, AS/400 SFTP

AS/400 Physical File Triggers
I looked through some of the related questions after I submitted this, and this question was asked once before. I was able to get it to work. Somewhere in the answers someone mentioned that if you use CLP it is looking for some kind of parameters. The person mentioned to make it a CLLE program. [...]

View Answer   |  November 23, 2010  7:29 PM
AS/400, AS/400 triggers, AS400 physical file

getting source from object on AS400
It depends on how the objects were compiled. Assume a program named PGMA. Try STRDBG PGMA to see if a listing view is presented. (We can assume that a source view won’t be presented. And the library might need to be specified too.) If one shows up, then it’s fairly easy, though potentially tedious, to [...]

View Answer   |  November 23, 2010  3:19 PM
AS/400 Reports

ZPL Code in Java scripting
you can use java to send zpl data to printer. here is the code http://opentechexpress.blogspot.com/

View Answer   |  November 23, 2010  7:04 AM
JavaScript, Zebra printers