Search results for query: *

Hello everyone, If I take a file and put it in a Save file at version 1 then take the file an do an upgrade with it where I add fields to this file making it version 2. But if in the end I need to go back to the version 1 from the save file how can I do a RSTOBJ to restore the origninal...

I have a program where I use the example below from the Websphere on using %KDS but my question is if the key list is not all Character type and is a mixture of character and numeric how do you get around this? It complies when I do it this way but a get a decimal data error when I hit SETLL...

Hello All, I am writing a CL program that retrieves a job description's initial lib list and puts it into a variable &hldlibl which I then plug into the CHGJOB command It populates it with the 18 libs but for some reason puts quotes around it when executed which gives the error below. Any ideas...

Hello All, As RPG evolves and there becomes better better and more modern ways to code in free form. I was wondering is anyone able to replace a plist without turning a program into a procedure. I'd like to know how to replace PLIST and PARM statements in a program that is called by a CL and...

Hello I am modifying a program that haves two integer fields one called (screen field)@CDATE and the other (field from file)RCDATE that are 6 character fields. Now my problem is is that @CDATE is *MDY format while RCDATE is in *YMD format and I'm trying to get the RCDATE format to *MDY also so...

Thanks that worked out fine

Hello everyone, I created a module called PNCOPYM and when I used the Crtpgm command to bind it with a CL module I created I keep getting the following message. Cause . . . . . : No definition was found for reference PNCOPYM in *MODULE object DACOPYCL in library ULRMODS. The...

Hello everyone, I am new to SQL and I have two statements I'm embedding in a CL program. Could someone help me with the syntax on this it would be greatly appreciated. DOSQL STM('DELETE FROM DTALIB/DAMAST WHERE DAUSER = ''' + *CAT &TOUSER *CAT '''') DOSQL STM('INSERT INTO...

Hello everyone, I am new to SQL and I have two statements I'm embedding in a CL program. Could someone help me with the syntax on this it would be greatly appreciated. DOSQL STM('DELETE FROM DTALIB/DAMAST WHERE DAUSER = ''' + *CAT &TOUSER *CAT '''') DOSQL STM('INSERT INTO...