IBM System i

IBM i, formerly known as AS/400, is a proprietary, midrange, object-based operating and application system. It includes a relational database, a menu-driven interface, support for multiple users, block-oriented terminal support and printers, and supports security, communications, and web-based application servers including Websphere, Apache and Tomcat.

Share tech news, updates, or what's on your mind.

Sign up to Post

I need to connect to a DB, run a SQL statement and export the results to a file on the AS/400.

This is a 1 time job.

Can anyone help me out?
Is there an aS400 CL command to abort the current program stack from the origin?
I need the make a clle program that starts, waits 5 minutes and ends.
How to do so?
What is the command to be use?

I have the following situation:
a data structure defined as:

File1Fields       E DS                  Extname(File1)

in File2 (fldname,value)  I have all the field names of File1 and their values (fld1,val1 ; fld2, val1).

now, i want to initialize File1Fields with the values from file2,

File1Fields.fld1 would equal a value of fld1 from File2 and so on...

The problem is how to reference  those fields in File1Fields without hardcoding their name
and having only field name in a variable (field) of File2.
if there would be a way to iterate through a data structure than there would not be a problem:

File1Fields(i) = value;

Any suggestions ?
In my RPGLE program, when I compile it
with option 14 and then F4,
I change the parameter value ->ALWNULL        *Yes
How can I do to write in the body of my program
this instruction to the compiler?
We are in the process of testing a migration of data from DB2400 to SQL Server 2008 database server. We are utilizing a tool called DBMoto to do the replication. We also use the software JD Edwards Enterpriseone. and in that software it comes with included batch programs that you can run that will perform a copy of data from DB2 to SQL.

But we have encountered an issue.  The batch program we run in JD Edwards (R98403)  to replicate the table structures from DB2 to SQL Server is unable to replicate a table’s primary key in SQL Server.  This is due to the differences between the databases were DB2 allows columns will null values to be a part of the primary key whilst SQL Server does not allow columns with null values to be a part of the primary key.  

Without primary keys on the tables in SQL Server, DBMoto tool cannot replicate the data.  

Does anyone have any suggestions on how to programmatically copy table structures from DB2 to SQL Server were the primary key is properly translated, please let me know.

Dear Sir/Madam,

We want read recipient after the mail has been delivered by our AS400 server. some times the recipients are not receiving the mail due to several other reasons. then after we have informed users to get confirm via phone. Can we use the parameter CFMDEL in SNDDST so user would get either delivery notification or better if he can get the "Read Receipt " so it would confirm that the mail delivered and read by the recipient.

but when i am trying with this parameter CFMDEL(*YES) then i observed 1 thing that the mail is taking few minutes as compare to without CFMDEL(*NO).  Should i have to set some parameter to get the notification.

pls confirm
shailesh mahajan
I have a client the is using ODBC to import/export shipping information from the UPS Worldship.  This has work for them for years, until recently we had to replace their AS400.  They went from a 170 V4R5 to another 170 V5R1.  Only the user libraries were restored to the replacement everything else like the profiles and devices had to be manually configured.

So after everything was set back up on the replacement we tested the import/export on the UPS and it still work with no problem, except every once in awhile the export (UPS --> AS400) pops up the error "CWBC01049 The iseries server application is not started." and that shipment information does not reach the AS400.

There is no specific day or time when this happens.  Sometimes it will not happen for a week or two and sometimes it will happen a few times a day a few times a week.

Has anyone ever had this problem or ell me where to begin to look.  I've tried looking through jobs logs but can not seem to find what is causing the connection issue.

Thank You
What is the best way to improve CPU performance on a Power 6 when you are running the same resource intensive program in different subsystems/client regions ?

I'm using the iSeries Access for Windows for connection my AS400 machine.
I wanted to know - since the emulator is configured (on the Signon info) to "prompt always", I'm asked for a password first time via the iSeries (some messagebox...) and when getting to the AS400 machine, I get the the login page mode.
so... what is the purpose of the fist authentication? on wc3270 I don't need this authentication phase but I want to know if I miss something.
We are on AS400 V5R4.

We are planning to do a data refresh. We use the JD Edwards EnterpriseOne software. I coudl try to do the refresh by running built in tools to kick off and run and perform the refresh for me. However, this process takes forever to run.

What I would like to do is have some AS400 scripts created to run and do the COPYLIB to refresh my LIBs and update a couple of tables for me.

The refresh will be copying our 3 Production LIBs (COPD7333,  PD7333DNT and PD7333) to our 3 development LIBs (CODV7333,  DV7333DNT and DV7333) and our 3 test LIBs (COPY7333,  PY7333DNT and PY7333)

I would like to break up the program script into two. So one script to copy the production libs to development libs. And another script to copy production libs to test libs.

After the copy has been completed, I need to have two different tables up dated. Two sets of tables for both development lib and test lib.

The first table AFTER the copy that needs to be updated is: F983051 which is in the PY7333DNT lib for test and in the DV7333DNT lib for development. After the script copies the production lib (PD7333DNT) to PY7333DNT (test lib) that F983051  has a field that will show “PD7333” for production. Well, after the copy that field will need to be updated to reflect the test environment (PY7333). And after the copy from production to development lib (DV7333DNT) that table will need to be updated for development.

So two tables will need to be updated: F983051/PY7333DNT &…
Hi there,

I have a QL420 zebr4a wireless printer.

I have connected it to the network and it pings all is good.. it prints from windows.
But I cant get it to work when printing from as400/iseries..  it only prints blank pages..

Does anyone know if there are controll files sneeded to upload to printer, or
can anyone help me resolve my issue..

Following is the remote outq i created for it..

                          Change Output Queue (CHGOUTQ)                    
 Type choices, press Enter.                                                
 Output queue . . . . . . . . . . > SBWLES02      Name                    
   Library  . . . . . . . . . . . >   QGPL        Name, *LIBL, *CURLIB    
 Maximum spooled file size:                                                
   Number of pages  . . . . . . .   *NONE         Number, *SAME, *NONE    
   Starting time  . . . . . . . .                 Time                    
   Ending time  . . . . . . . . .                 Time                    
 Order of files on queue  . . . .   *FIFO         *SAME, *JOBNBR, *FIFO    
 Remote system  . . . . . . . . .   *INTNETADR    Character value, *SAME...
 Remote printer queue . . . . . .   'portLF1'     Character value, *SAME...
 Writers to autostart . . . . . .   1             1-10, *SAME, *NONE      
 Queue for …

I have to develop module-file and module-program reference.
how to do that.
Is there any way i can take these information and dump in a file.
or any api or file oniseries server which provides this information.
I have a stored procedure GETSTORES(#####) which requires a five digit account number and returns all stores for that account.  I need to call that stored procedure from php using an ODBC connection.  I can connect to the 400 and query directly but want to use the stored procedure to cut down on traffic.

I can't seem to find anything that works.
Hi All,

We are using a DB2/400 database. For a migration requirement, we are required to dump all data in all tables of a schema into a text file or into a excel file (or CSV file). Is there an easy way to do it preferably using the iSeries Navigator GUI?

The team that will be working on this is not too familiar with AS400 commands so I will have to do with using only the GUI.

i have this error when run RPG program. Image is attached .
I think the reason is capacity of file, to solve it , we increase the size ?

How do I convert as400 green screens to html inexpensively?
We have one single threaded Job Queue which we run all of our Batch Jobs.

We would like to set up our iSeries Backup Job to run in its own Job Queue.  

Does anyone know how to set that up?

Thanks in advance!
Everything was working fine.  I removed Norton Internet Security.  Now I cannot connect via client access.
I can connect via Bosa Nova Console.
All other connections, internal and external, are working properly

I cannot ping the 400
TCP is running on the 400

What troubleshooting steps should I take.
My First Ask.  Be gentle.   I joined today and have searched myself confused.
Problem: Need to get files from the AS400 output queues moved to a pc drive but need to keep the splf date on the file listing for furture retrieval.  EVERYTIME I MOVE A FILE USING NAVIGATOR, TO MY PC, THE PC FILE IS DATED TODAY.  I NEED THE ORGINAL FILE DATE.  Would be able to put groups of files back to AS400 to see date if that is necessary.   These "dayend reports" files are a must archieve item.  I have iSeries Nav and ibm Access for win V5R4mod0.  Files are stored in outqueues with a monthly name.  Oct, Nov, and on etc.  FTP? Will ftp work? How do I get to the outqueue TO get all 4,000 files in there.  Is there some kind of wild card to get them all (LIKE GET THE WHOLE OUTQ).   I really need all files in each outqueue associated with dayend reports moved to my PC.
Further these reports are generated daily with the same filename with a different date.  Moved to a monthly outq but now taking 20% of our space so need to move to windows drive.  Got a 2TB on my system just for this purpose.
i have program  is running on as/400  but data queue size for this program is over.
That is the reason , it is error , would we have any command to increase data queue or solve this for program runs?

Tks so much.

According to this link, DB2 does not offer the "Median" function that is available in MS-Excel for instance.

Does anyone know of an alternative method that I could run in my query to produce the "Median" result?  The SQL below better demonstrates what I'm looking to achieve if "Median" was actually a function that was available to me.

Select FIELD1, Median([FIELD2])
Group by FIELD1
This is a general question…. I’m posting it because of the tight timeline.  

I have a repair order master -  the only field I need off this file is location.  However, think of it as the header record.  Then I have three detail files labor, parts, and other.  Each contains detail costing information.  A repair order may have entries on each or only one of the detail files.  Each file is keyed by the repair order number and service date.

I want to create a report which combines all work from the 3 detail files groups by vehicle number and service date.  Providing total repair costs by vehicle subtotaled by service date.  

Does this lend itself to query?  I would normally right a sql to populate one combined file with selected information from all the detail files and then feed it to a print program or query format…… however the user wants this in query.  

Any input is appreciated….. Thanks
I have to login and out of AS400 sessions all the time and hate having to login everytime. Is there a way to setup some kind of automation where I dont' have to enter username and password on green screen? Maybe a setup in Operations Navagator?

Anything would help.

I'm not able to get my selection correct and this is something that is need asap.... I would normally use sql, but need it in query.  

please see attached

IBM System i

IBM i, formerly known as AS/400, is a proprietary, midrange, object-based operating and application system. It includes a relational database, a menu-driven interface, support for multiple users, block-oriented terminal support and printers, and supports security, communications, and web-based application servers including Websphere, Apache and Tomcat.

Top Experts In
IBM System i