Calling non-as/400 programs via an RPGLE or CL program
Can it be done? If so, how would I go about doing this? Let's say I just have a small VB program I wrote that displays a picture. Can I let's say somehow link the VB program call to a CF key, like CF08?
Can it be done? If so, how would I go about doing this? Let's say I just have a small VB program I wrote that displays a picture. Can I let's say somehow link the VB program call to a CF key, like CF08?
390 pts.
Parameter structure COBOL vs RPG
We have a COBOL program which can select up to 42 lines. The parameter structure is: 01 PARM PIC X(1024). 03 ID PIC X(4). 03 SELECTED OCCURS 42. 05 ITEM PIC X(4). 05 DESCRPT PIC x(20). I need to call this pgm in RPG. How do I best define the...
We have a COBOL program which can select up to 42 lines. The parameter structure is: 01 PARM PIC X(1024). 03 ID PIC X(4). 03 SELECTED OCCURS 42. 05 ITEM PIC X(4). 05 DESCRPT PIC x(20). I need to call this pgm in RPG. How do I best define the...
getting I/O error CPF5004
hi, I am trying to write 10000 records from pf to printer file but after writing 200 or 300 records into printer file i am getting I/O error CPF5004 i know that this error i am getting because of page overflow indicator is not set it on but i am doing programming in rpgle i dont know how to...
hi, I am trying to write 10000 records from pf to printer file but after writing 200 or 300 records into printer file i am getting I/O error CPF5004 i know that this error i am getting because of page overflow indicator is not set it on but i am doing programming in rpgle i dont know how to...
Determine last day of previous month
Can you help me in determining the last day of the previous month. For example today it is 2008.06.19, the rpgle-routine would return 2008.05.31 Thanks
Can you help me in determining the last day of the previous month. For example today it is 2008.06.19, the rpgle-routine would return 2008.05.31 Thanks
Modify display file in runtime
I need to change field attribute in display file within runtime, is there any way to do that?
I need to change field attribute in display file within runtime, is there any way to do that?
rpg sql
I am using dynamic sql in an rpgle pgm. This pgm is called from 2 different menu options. When I take the 2nd option, everything works fine. I exit out of that option and take the first option. Everything is still work fine. I exit the first option and go back to the 2nd option and the pgm hangs up...
I am using dynamic sql in an rpgle pgm. This pgm is called from 2 different menu options. When I take the 2nd option, everything works fine. I exit out of that option and take the first option. Everything is still work fine. I exit the first option and go back to the 2nd option and the pgm hangs up...
Decipherig RPGLE Specs...
I did a CPYF from LIBRARY/QRPGLESRC(RPGLEPGM) to a new physical file created on the fly. Now, I know that when you do this, the data in the SRCDTA field shows exactly what's in the program. BUT, how am I to figure out if an I-Spec statement reflects an actual I, IX, J, or JX prompt?
I did a CPYF from LIBRARY/QRPGLESRC(RPGLEPGM) to a new physical file created on the fly. Now, I know that when you do this, the data in the SRCDTA field shows exactly what's in the program. BUT, how am I to figure out if an I-Spec statement reflects an actual I, IX, J, or JX prompt?
F9=Retrieve...
I'm creating a DSPF and want to put in some common AS/400 command functions, and one of them would be to hit F9 to retrieve the last command entered. How would I go about doing this? I'm using a mock command line input field and would be sending any commands via QCMDEXC. Any ideas on the F9...
I'm creating a DSPF and want to put in some common AS/400 command functions, and one of them would be to hit F9 to retrieve the last command entered. How would I go about doing this? I'm using a mock command line input field and would be sending any commands via QCMDEXC. Any ideas on the F9...
Rename the uploaded file....
hi all i want to rename the just uploaded file to a PC from AS400. Like what happening is that i have used some commands to upload a PF to a .txt file to a PC that are written in CLLE. now i just want to rename the file name with a longer name that is not supported in that CLLE commands..... How...
hi all i want to rename the just uploaded file to a PC from AS400. Like what happening is that i have used some commands to upload a PF to a .txt file to a PC that are written in CLLE. now i just want to rename the file name with a longer name that is not supported in that CLLE commands..... How...
error message
Hai, i want to know the command to dispaly the description of error messages.pls clear my doubt..
Hai, i want to know the command to dispaly the description of error messages.pls clear my doubt..
AS/400 and Oracle Access Manager
I have a strange behavior in an SQLRPGLE program accessing iSeries DB2 and Oracle via Oracle Access Manager. The program is very simple and reads values from two Oracle Tables in this way : a. SELECT .... into ..... FROM Table1 WHERE ..... return OK : 1 row as expected with my two fields...
I have a strange behavior in an SQLRPGLE program accessing iSeries DB2 and Oracle via Oracle Access Manager. The program is very simple and reads values from two Oracle Tables in this way : a. SELECT .... into ..... FROM Table1 WHERE ..... return OK : 1 row as expected with my two fields...
I Put a HEX on youuuuuuuu......
Does anyone have any suggestions as far as reference material that would help me understand EBCDIC Character sets, Hex, Binary, and how you can tie them into CL's & RPGLE's, and whatnot?
Does anyone have any suggestions as far as reference material that would help me understand EBCDIC Character sets, Hex, Binary, and how you can tie them into CL's & RPGLE's, and whatnot?
Telnet Exit Format INIT0100
Hello I have a simple RPGLE program witht the following parms. &Usr_Info *Char Lent(44) &Dev_Info *Char Len(28) &Conn_Info *Char Len(76) &Env_Opts *Char Len(1) &Len_Env Type(*int) &Alw_Conn *Char Len(1) &Alw_Auto...
Hello I have a simple RPGLE program witht the following parms. &Usr_Info *Char Lent(44) &Dev_Info *Char Len(28) &Conn_Info *Char Len(76) &Env_Opts *Char Len(1) &Len_Env Type(*int) &Alw_Conn *Char Len(1) &Alw_Auto...
convert alphanumeric to binary
hi, my program is receivng an "alphanumeric char 10 length " and im using it to chain a PF, but the field from the physical file is binary 9,0, how will i able to convert an alpha10 to binary 9,0 in RPGLE?
hi, my program is receivng an "alphanumeric char 10 length " and im using it to chain a PF, but the field from the physical file is binary 9,0, how will i able to convert an alpha10 to binary 9,0 in RPGLE?
AS400 to Windows control application
Hi there, I am automating a AS400 based process. The process gets inputs from notepad files on Windows server. After I have processed these files through my RPG, CL programs, I need to take following steps I have 14 files in a windows folder. 1. Create a new folder on windows server. 2. Move...
Hi there, I am automating a AS400 based process. The process gets inputs from notepad files on Windows server. After I have processed these files through my RPG, CL programs, I need to take following steps I have 14 files in a windows folder. 1. Create a new folder on windows server. 2. Move...
I am not able to call CL Programe from within RPG Programme. I am using free as400 connection from pub1.rzkh.de Please Suggest
when i am calling a clle programe from rpgle it gives cannot resolve object as the caled programme did not found but the called and caling programme bothe are present in the current library, also it gives same error now for RPg called programme. The compilation to form a programme fom the module...
when i am calling a clle programe from rpgle it gives cannot resolve object as the caled programme did not found but the called and caling programme bothe are present in the current library, also it gives same error now for RPg called programme. The compilation to form a programme fom the module...
Writing Information to the JobLog
I've seen a number of snippets here and there on the internet regarding the ability to write specific information to the job log in order to figure out exact problems, based on the conditions placed within. I've seen reference being made to some API, but have been unable to actually find useful...
I've seen a number of snippets here and there on the internet regarding the ability to write specific information to the job log in order to figure out exact problems, based on the conditions placed within. I've seen reference being made to some API, but have been unable to actually find useful...
