AS400 COBOL ILE Pointer not set for location referenced - Trigger
Hello, Guys I have been trying to run an ILE Cobol Trigger program, however it stops wiht the message below Pointer not set for location referenced. If when debbuging the system is able to resolve the address of the variable associated with the PF. Hope someone can provide soime guidance. The...
Hello, Guys I have been trying to run an ILE Cobol Trigger program, however it stops wiht the message below Pointer not set for location referenced. If when debbuging the system is able to resolve the address of the variable associated with the PF. Hope someone can provide soime guidance. The...
COBOL: Is it possible to apply a different Pic clause to a single variable?
Is it possible to use a different Pic clause from a single variable? based on the condition. DEBIT PIC ZZZZZZZ,ZZZ,ZZ9.99 PIC ZZZ,ZZZ,ZZZ,ZZ9.99 For example When true...
Is it possible to use a different Pic clause from a single variable? based on the condition. DEBIT PIC ZZZZZZZ,ZZZ,ZZ9.99 PIC ZZZ,ZZZ,ZZZ,ZZ9.99 For example When true...
How to copy source code of Pgm into Flatfile in COBOL
I want to read the one of the pgm's source code through my another program. So anyone plz suggest me how can i read the source code?
I want to read the one of the pgm's source code through my another program. So anyone plz suggest me how can i read the source code?
Justify right in COBOL
I have data where the format has been changed slightly by the carrier and now this change is causing my job to abend. The last page number of each file reads ex.'160 OF 160' however, the new format must read '160 of 160' which means that the last page number needs to justfied to the right to pos...
I have data where the format has been changed slightly by the carrier and now this change is causing my job to abend. The last page number of each file reads ex.'160 OF 160' however, the new format must read '160 of 160' which means that the last page number needs to justfied to the right to pos...
Debug ILE Cobol 400
How can I display (Eval) subset of a filed while debugging ILE Cobol program. How can I view the content of a field from specified position and lenght. I know how to review the content for a specified lenght, but can't find a way to view part of the string from position 256 for example. ...
How can I display (Eval) subset of a filed while debugging ILE Cobol program. How can I view the content of a field from specified position and lenght. I know how to review the content for a specified lenght, but can't find a way to view part of the string from position 256 for example. ...
Empty/Null value field gets downloaded as Junk value when data is captured into Oracle from iseries(Pgm written in COBOL 400)
When no value has been moved into a particular field in a database, then the field contains Junk value. This by itself does not cause any problem in terms of the working of the application on i series. But when the MIS team tries to download the data into Oracle, then if the file being downloaded...
When no value has been moved into a particular field in a database, then the field contains Junk value. This by itself does not cause any problem in terms of the working of the application on i series. But when the MIS team tries to download the data into Oracle, then if the file being downloaded...
How does one change an S9(7) comp-3 value to a 9(7) field?
From an externally define file I bring in an S9(7) comp-3 value how can I convert this field to a 9(7) that I can use to make a compare like 'IF field1 = field2 then do' .
From an externally define file I bring in an S9(7) comp-3 value how can I convert this field to a 9(7) that I can use to make a compare like 'IF field1 = field2 then do' .
Subfiles in COBOL (Single Page, Load All, Expand)
Can anybody please provide sample code (simple) for the 3 Subfiles in COBOL/400??
Can anybody please provide sample code (simple) for the 3 Subfiles in COBOL/400??
Calling FD_Set and FD_Zero API from a COBOL/400 program?
I'm developing a socket client in COBOL/400 and I already have most of calls to Unix-type APIs, but I don't know how to call FD_Set and FD_Zero. Are the API names wrong? (for example, I had to change name "GetErrno" by "__errno". Many thanks in advance. George.
I'm developing a socket client in COBOL/400 and I already have most of calls to Unix-type APIs, but I don't know how to call FD_Set and FD_Zero. Are the API names wrong? (for example, I had to change name "GetErrno" by "__errno". Many thanks in advance. George.
Blank line in report by COBOL
Is it true that a cobol program while writitng a report always writes the first line as blank.
Is it true that a cobol program while writitng a report always writes the first line as blank.
COBOL/400 Debugging
Hello Everyone, Can anyone explain me the exact difference between *SRCDBG and *LSTDBG? Thanks & Regards Bibin
Hello Everyone, Can anyone explain me the exact difference between *SRCDBG and *LSTDBG? Thanks & Regards Bibin
COBOL/400
I want to replacing 1 character in a String with 1 or more Characters in COBOL/400. How can i perform this?? Example : 1) A with ABC 2)A with ABCDE 3)A with A Etc.
I want to replacing 1 character in a String with 1 or more Characters in COBOL/400. How can i perform this?? Example : 1) A with ABC 2)A with ABCDE 3)A with A Etc.
String manipulation in COBOL/400
I want to replacing 1 character in a String with 1 or more Characters in COBOL/400. How can i perform this??
I want to replacing 1 character in a String with 1 or more Characters in COBOL/400. How can i perform this??
AS/400 Debugging
Hi I am using STRISDB to debug my COBOL/400 progra. My object and source are in same libary. But, the debuggin is not working well. It's not executing all the lines and it's executing both the IF statement and else statements. It's behaving mysterically. Could some one explain why this type of...
Hi I am using STRISDB to debug my COBOL/400 progra. My object and source are in same libary. But, the debuggin is not working well. It's not executing all the lines and it's executing both the IF statement and else statements. It's behaving mysterically. Could some one explain why this type of...
Rename Clause
Hi, Can any one please tell me what is Rename Clause and the use of Rename clause? I know only we are using 66 level for Rename clause in Cobol Program. Thanks In advance. Suchi..
Hi, Can any one please tell me what is Rename Clause and the use of Rename clause? I know only we are using 66 level for Rename clause in Cobol Program. Thanks In advance. Suchi..
Record format in Display file in COBOL/400
What is the maximum number of Record format that can be used in Display file in COBOL/400?
What is the maximum number of Record format that can be used in Display file in COBOL/400?
CPF0006 during SBMJOB (COOL 2E generated code)
I have used SBMJOB in the COOL 2E SYNON code (Generating COBOL source). During runtime, the fucntion crashes with CPF0006 message when trying to submit the program through Y2CMEXC. Is it the error caused by the Y2BLSJR command through which the parameters for the SBMJOB is set? Parameter 1 ...
I have used SBMJOB in the COOL 2E SYNON code (Generating COBOL source). During runtime, the fucntion crashes with CPF0006 message when trying to submit the program through Y2CMEXC. Is it the error caused by the Y2BLSJR command through which the parameters for the SBMJOB is set? Parameter 1 ...


