AS/400 display file
How to decide the position of Display file's constant variable dynamically. I wanted to decide the position in RPGLE program. Software/Hardware used: AS400
How to decide the position of Display file's constant variable dynamically. I wanted to decide the position in RPGLE program. Software/Hardware used: AS400
475 pts.
AS400 - RPGLE
I wanted move Numeric Field to Character field. I am using Free format RPGLE Program. I have used %Char to do this operation. It is moving 2 to Character field, While trying to move 02 to Character field. I am expecting '02' in Character field How to achieve this in Free format RPGLE Program?
I wanted move Numeric Field to Character field. I am using Free format RPGLE Program. I have used %Char to do this operation. It is moving 2 to Character field, While trying to move 02 to Character field. I am expecting '02' in Character field How to achieve this in Free format RPGLE Program?
Why am I having such a problem copying a file.
Trying to copy a smaller file 89 bytes and one field less file to a 96 byte file that has one more field. Trying Cpyf weblibl/wcur test01/wcur mbropt(*replace) fmtopt(*map *dr op) Get a return message of 29767 records copied but receiving file is empty. Where did they the records goto?
Trying to copy a smaller file 89 bytes and one field less file to a 96 byte file that has one more field. Trying Cpyf weblibl/wcur test01/wcur mbropt(*replace) fmtopt(*map *dr op) Get a return message of 29767 records copied but receiving file is empty. Where did they the records goto?
Record Locking
I'm using embeded SQL to delete (clear) all records in a file. I do not want more than 1 person in this file. So whe the user executes the program it runs the SQL and clears the records in the file. Now I want to do some file/record checking logic to see if the file is locked to another job. THen...
I'm using embeded SQL to delete (clear) all records in a file. I do not want more than 1 person in this file. So whe the user executes the program it runs the SQL and clears the records in the file. Now I want to do some file/record checking logic to see if the file is locked to another job. THen...
Debugging RPGLE Program
I have compiled the RPGLE source with DBGVIEW Option as *STMT. How to debug this program?
I have compiled the RPGLE source with DBGVIEW Option as *STMT. How to debug this program?
BUILTIN FUNCTION..
HOW CAN WE CHECK THE EXISTANCE OF ANY RECORD IN ANY PF WITHOUT READING THE FILE IN RPGILE . . IS THERE ANY BUILT IN FUNCTION THANKS/
HOW CAN WE CHECK THE EXISTANCE OF ANY RECORD IN ANY PF WITHOUT READING THE FILE IN RPGILE . . IS THERE ANY BUILT IN FUNCTION THANKS/
level check error
Hi all, Please tell me how can we prevent level check error..befor occuring dump suppose we have have a pgm 'a' and a file 'pf1' i just want to be assure that level check error will occure or not.. regards/
Hi all, Please tell me how can we prevent level check error..befor occuring dump suppose we have have a pgm 'a' and a file 'pf1' i just want to be assure that level check error will occure or not.. regards/
how to access any particular menber of any pf
Hi, if i have a pf having 5 members..how can i access 3rd member of it through in rpgile.. regards Ambrish
Hi, if i have a pf having 5 members..how can i access 3rd member of it through in rpgile.. regards Ambrish
CGI loses percent sign
We have a web app ( a CGI) written in RPGLE and HTML that prompts for several data fields and writes a record to our web iseries. When the Comments field contains a percent sign ("%"), the data file ends up without that symbol and the next character is gone, too. Is there a simple way to fix this ?...
We have a web app ( a CGI) written in RPGLE and HTML that prompts for several data fields and writes a record to our web iseries. When the Comments field contains a percent sign ("%"), the data file ends up without that symbol and the next character is gone, too. Is there a simple way to fix this ?...
Retrieve the RPGLE program from object
Hi all, I accidently deleted my program. Is there any way to retrive the program from its object. Software/Hardware used: AS400
Hi all, I accidently deleted my program. Is there any way to retrive the program from its object. Software/Hardware used: AS400
SQLCODE = 1077952576
All- I'm getting the above error code from an RPGSQL program. This is just after a DECLARE statement. Other fields in the SQLCA are blank. I can run the statement in Interactive SQL w/o errors. I should be getting a small subset. I get 0 records. Any Ideas? It's not in the SQLCODE finder. Phil ...
All- I'm getting the above error code from an RPGSQL program. This is just after a DECLARE statement. Other fields in the SQLCA are blank. I can run the statement in Interactive SQL w/o errors. I should be getting a small subset. I get 0 records. Any Ideas? It's not in the SQLCODE finder. Phil ...
ACCESS PARTICULAR MEMBERS IN RPG
SUPPOSE I HAVE A PF WITH 3 MEMBERS. IS IT POSSIBLE TO DO READ/WRITE OPERATION ON PARTICULAR 2 MEMBERS? Software/Hardware used: AS/400
SUPPOSE I HAVE A PF WITH 3 MEMBERS. IS IT POSSIBLE TO DO READ/WRITE OPERATION ON PARTICULAR 2 MEMBERS? Software/Hardware used: AS/400
printer file in rpgle
I've program described printer file.. how to code page break for program described printer file?? Software/Hardware used: AS400
I've program described printer file.. how to code page break for program described printer file?? Software/Hardware used: AS400
Convert number to roman numerals in RPG
Hi, Can any know how to convert numbers to roman numerals in RPG or RPGLE?
Hi, Can any know how to convert numbers to roman numerals in RPG or RPGLE?
RPGLE Program woes
I had an AS/400, consolidated to a newer one w/other facilities. When my library was restored and I tried to process an old program, it does not pull any data. I have not programmed in several years and have never used RPGLE. Do not know how to use debugger, etc. so I'm wondering if the problem...
I had an AS/400, consolidated to a newer one w/other facilities. When my library was restored and I tried to process an old program, it does not pull any data. I have not programmed in several years and have never used RPGLE. Do not know how to use debugger, etc. so I'm wondering if the problem...
Need to find everyplace a file is being used.
I have a file that we are adding a field. Need to find every program the file is being used to know which ones need to be recompiler. Would be nice to do one big search of the entire library. Software/Hardware used: as400
I have a file that we are adding a field. Need to find every program the file is being used to know which ones need to be recompiler. Would be nice to do one big search of the entire library. Software/Hardware used: as400
RPGLE. cpytopcd
I have tried to create a file where every record is 80 characters long. Every record should be filled with spaces if the record is shorter than 80 char. In my program I use cpytopcd and this command seems to cut every record if there aren't any more characters. If you look at it in hexadec...
I have tried to create a file where every record is 80 characters long. Every record should be filled with spaces if the record is shorter than 80 char. In my program I use cpytopcd and this command seems to cut every record if there aren't any more characters. If you look at it in hexadec...
decimal data error
I declare time field in RPG as D btime 4 0 eval btime = 2400 this one i pass to a CL program with var type var(&tim) type(*dec) len(4,0) and this in turn passed to another RPG program D stime 4 0 when it comes to third program it has some hex char shown in debug as belo stime = 2_4_...
I declare time field in RPG as D btime 4 0 eval btime = 2400 this one i pass to a CL program with var type var(&tim) type(*dec) len(4,0) and this in turn passed to another RPG program D stime 4 0 when it comes to third program it has some hex char shown in debug as belo stime = 2_4_...
