Program calls on AS/400
How i can check that my previous call to a program from other program was successful. Only after successful call and run only i can call another program. How to do check this in RPG and CL?
How i can check that my previous call to a program from other program was successful. Only after successful call and run only i can call another program. How to do check this in RPG and CL?
RPGLE pgm to determine the last day for a month
does anyone have an rpgle pgm that will return the last day of the calendar month if given the month and year.
does anyone have an rpgle pgm that will return the last day of the calendar month if given the month and year.
Read opcode
Hi Can i use the record format in place of a file name for all types of READs available in RPG/400 along with SETLL n SETGT?
Hi Can i use the record format in place of a file name for all types of READs available in RPG/400 along with SETLL n SETGT?
file names in rpg/400
How to alias a file name in rpg/400 program. the problem here is the file name 10 char length and RPG/400 allows a maximum of 8 chars. Please answer...thanks
How to alias a file name in rpg/400 program. the problem here is the file name 10 char length and RPG/400 allows a maximum of 8 chars. Please answer...thanks
key list in RPG/400
Hi, i have a physical file with a composite key of 6 fields. I am writing a single page subfile program in which the program is supplied with two field values from the screen or another program. Now whenever i am chaining using the two fields under the keylist the errors are shown like the key...
Hi, i have a physical file with a composite key of 6 fields. I am writing a single page subfile program in which the program is supplied with two field values from the screen or another program. Now whenever i am chaining using the two fields under the keylist the errors are shown like the key...
Passing parameters thru LDA
Hi i want to know how the parameters can be passed from one RPG program to another RPG program using LDA.Please give me an example code. thanks Ram
Hi i want to know how the parameters can be passed from one RPG program to another RPG program using LDA.Please give me an example code. thanks Ram
RPG Program works fine in debug (ISDB)
I am coding a program in RPG/400 on OS v5r4. The program uses input files to calculate several program described fields for a report. The program does not calc correctly when I call it from the command line. The program works as expected when I run it through debug (ISDB). I am using the same sign...
I am coding a program in RPG/400 on OS v5r4. The program uses input files to calculate several program described fields for a report. The program does not calc correctly when I call it from the command line. The program works as expected when I run it through debug (ISDB). I am using the same sign...
rpg/400
i have a few programs to submit in batch but i need to check each program sucessfully then i need to call another program... please advice how to overcome.
i have a few programs to submit in batch but i need to check each program sucessfully then i need to call another program... please advice how to overcome.
rpg/400
Please advice me how i need to validate the subfile field in subfile. example: user entering the data in subfile, if user enters wrong data in subfile field then i need to show error to user. please advice me any keyword to resolve..
Please advice me how i need to validate the subfile field in subfile. example: user entering the data in subfile, if user enters wrong data in subfile field then i need to show error to user. please advice me any keyword to resolve..
How load a subfile inquiry screen from arrays
I need to display a subfile inquiry screen.But not directly from the file.I have to pass the records into arrays.From the array with specific conditions i need to load the subfile inquiry screen. How can i achieve this?
I need to display a subfile inquiry screen.But not directly from the file.I have to pass the records into arrays.From the array with specific conditions i need to load the subfile inquiry screen. How can i achieve this?
I/O device error in AS/400 program
what is I/O device error in AS/400 programs and when it occurs ? pls clarify....thanks
what is I/O device error in AS/400 programs and when it occurs ? pls clarify....thanks
How to automate getting the .CSV file from IFS folder to local desktop
I am working on tool which extract the data from physical files based on some condition and creates a .CSV file in IFS folder. I want to automate the process to get the CSV file to local Desktop and should save the file in specified location in local system. Is there any way to open the .CSV...
I am working on tool which extract the data from physical files based on some condition and creates a .CSV file in IFS folder. I want to automate the process to get the CSV file to local Desktop and should save the file in specified location in local system. Is there any way to open the .CSV...
rpg/400
I am not able to send the messages to message subfile.. i am able to compile my rpgile program sucessfully... please find below displayfile and rpgile code for your reference so please advice. display file. A R MSGRCD SFL A*%%TS SD 20090407 ...
I am not able to send the messages to message subfile.. i am able to compile my rpgile program sucessfully... please find below displayfile and rpgile code for your reference so please advice. display file. A R MSGRCD SFL A*%%TS SD 20090407 ...
rpg/400
I have a rpgile (XOP560) program as below. compile sucessfully and while calling program displaying screen but once come out of the screen using f3 i am getting error as below. Message ID . . . . . . : CEE9901 Severity . . . . . . . : 30 Message type . . . . . : Escape ...
I have a rpgile (XOP560) program as below. compile sucessfully and while calling program displaying screen but once come out of the screen using f3 i am getting error as below. Message ID . . . . . . : CEE9901 Severity . . . . . . . : 30 Message type . . . . . : Escape ...
RPG/400 Error RNQ1255
I have a RPGILE (XOP560) program. I am able to compile sucessfully this program. once i call this program i am getting below error. please advice me. Additional Message Information ...
I have a RPGILE (XOP560) program. I am able to compile sucessfully this program. once i call this program i am getting below error. please advice me. Additional Message Information ...
Duplicate object (PF) using SQL with same attributes
I want to create a duplicate object using SQL. I don't want to use CRTDUPOBJ and also do not want to compile my rpg's pgm because of new file level identifier. Please advice
I want to create a duplicate object using SQL. I don't want to use CRTDUPOBJ and also do not want to compile my rpg's pgm because of new file level identifier. Please advice
I/O Operations in Program described files
Hi, I have written a program, which reads records from a program described file and write records to another program describe file. However it seems working but that doesn't seem an efficient program to me. Could anyone please suggest me what can be done to improve this program. FEmployee IF F...
Hi, I have written a program, which reads records from a program described file and write records to another program describe file. However it seems working but that doesn't seem an efficient program to me. Could anyone please suggest me what can be done to improve this program. FEmployee IF F...
How to create a code using diff colors in RPG & CL
How to create a code using diff colors in RPG & CL
How to create a code using diff colors in RPG & CL
rpg/400
can yu advice me how to change date format from mmddyyyy to yyyymmdd in rpgile. Please advice..
can yu advice me how to change date format from mmddyyyy to yyyymmdd in rpgile. Please advice..
RPG/400 error
i am getting error while moving data from one field to another field. I have two files xodcfp(physical file) xounpr 8 p(2) xodstsf(physical file) xsuprc1 10a while moving data from xounpr to xsuprc1 i am gettig error.... i tried EVAL XSUPRC1 = %EDITC(XOUNPR:'X') but still...
i am getting error while moving data from one field to another field. I have two files xodcfp(physical file) xounpr 8 p(2) xodstsf(physical file) xsuprc1 10a while moving data from xounpr to xsuprc1 i am gettig error.... i tried EVAL XSUPRC1 = %EDITC(XOUNPR:'X') but still...


