Hi, I need to work with numbers which are digits long. Why? Because this is the way to create a German IBAN code from Bank Code and Bank account: Concatenate Bank Code (8 digits) plus Account nbr (10 digits, leading zeroes) plus “131400″ to a 24 digit number. Compute Modulo 97 of this number. (or…

I declared an array which is of character data type and I want to overlay an element in the array which is of decimal type. Is it possible to overlay an element which is of decimal type (zoned) in to an array which is declared as character one? The code of the following issue is…

When my php executes the db2 insert, I get error 7008. Any ideas what I might try to get it working ? The PF is new with *all public authority and no trigger nor journal. I manually added 1 record via green-screen SQL with the same context as what is assembled in my php. Here’s…

We have a web service for placing orders and sending them to our iSeries. Basically front ending the EDI package on the iSeries. If the data is sent over without errors on the SQL insert to the DB2 databases the job runs. If there are run time errors during order processing the errors are logged…

If current ASP is 65% used from 10TB and if 1TB is removed from the rack how much ASP percentage would get increased? I said it is 75%. Can anyone improve this answer?

Could anyone let me know what is an EVALR Opcode in AS/400? If possible, can anyone give me some sample code which is on EVALR Opcode?

How can we remove the two years back data from our table? We don’t have any time stamp in a table. Please let me know the process to achieve it. Thanks, Ravula

How to get the saved object details from the backup tape, when the library which contains the objects is saved without object level details.

Has anyone every heard of ‘Roll your own Level Breaks’ in RPG? Can you enlighten me on how it works? I have to mimic a program that does this already with a different set of data. Here is a basic overview of the application. A selection screen allows you to select a date range, region,…

Hi , I have one program which starts a job , I do ALCOBJ on a dataarea so that if the job is already running and someone tries to start the job again i can show the error that job is running ALCOBJ OBJ((&LIBLDTAQ/&DTAAA *DTAARA *EXCL)) WAIT(0) MONMSG MSGID(CPF1002) EXEC(DO) SNDPGMMSG MSG(‘Mikaodo Job Schedular is…

I have an object library and my source code is in object library and the files which are opened in output/update mode in the PGM are in my object library and the file which is opened in input mode is in another object library. Now I included two object libraries to my library list and…

PGM DCLF FILE(AMITLIB/STUDPF) LOOP: RCVF RCDFMT(STUDRRC) MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(END)) SNDUSRMSG MSG(&NAME) OPNQRYF FILE((AMITLIB/STUDPF)) QRYSLT(*ALL) GOTO CMDLBL(LOOP) END: ENDPGM it displays only the first data in the file. how to display all the records present in the file?

Hi, I have a logical file, which I am trying to open in I-O mode, but I get File status 90 File is existing on the system, The code was working fine previously (on development machine), but today I installed all the objects on another machine (Testing machine), and I am getting this file status,…

While applying PTF’s SI38079 AND SI38080 for V7R1, it keeps coming back as not installed.

Hi, there is a source library for me where I created a module and I binded it to a program with the command ‘CRTPGM’. Now I have created the object of that module in the object library. Now my question is how do I need to organize the library list when the things are as…

A file is opened in a program in input mode and he turned the parameter ‘file addition’ to ‘A’. My doubt is, is it possible to add a record to the file thru the program when the file is opened in input mode?

I have users that are uploading data to the AS/400 (V6R1) using the Excel Add-in. One user gets a log on pop up window each time she initiates the data transfer. Others in her same group do not. Where would I go to turn this off? She is logged on an AS/400 session and it…

Hello I am trying find a way to change the Customer Friendly Description in the SKU (SKN) DESC. 

SQL statements from a session (first session) have been lost because I opened a second SQL session and saved this when exiting AFTER exiting my first session. So, when I STRSQL, I only see the statements from my second session, those from the first session are gone. Can I somehow retrieve the statements from my…

I have a Linux ODBC that pushes data to the AS/400. When I am trying to connect my ODBC Linux connection, it fails and logs the following error message: [rduser@ebsdbprod ~]$ isql -v misysdb erp0101 [08S01][unixODBC][IBM][iSeries Access ODBC Driver]Communication link failure. comm rc=10060 – CWBCO1048 – A time-out occurred trying to connect to the iSeries…