COBOL/400 Questions


sflcode & COBOL/400 code
i have a database file name emp         file name=Emp R emprec    Eno           10p    Ename      10a    Esal          10p k Eno and subfile name is empsfl  sflrec Contain fields   SEno        10p   SEname   10a   SEsal       10p sflctl contain indicators [...]

Answer Question   |  March 4, 2011  2:01 PM
AS/400, AS/400 database, COBOL, COBOL/400
asked by:
345 pts.

MCH1202 error in COBOL/400
There are n number of ways a DDE occurs. I saw a new problem recently. Request a help from this group. Q) I have 3 Variables declared in COBOl program A(PIC 9(4)) ,B(PIC 9(4)) and C ( PIC 9(8) ) I am perfoming an arithimatic operation as follows Subtract A from B giving C. i [...]

Answer Question   |  April 15, 2011  2:32 AM
COBOL, COBOL/400, DDE, Decimal Data Error, MCH1202
asked by:
50 pts.

Calling C ILE Procedure from COBOL 400 Program
I cannot get the parameters correct on this. I created a module for both the C and the COBOL, then used CRTPGM. My COBOL has WS-FIRST-COBOL-NUM PIC S9(2), WS-SECOND-COBOL-NUM PIC S9(2), WS-NUM-TOTAL-COBOL PIC S9(3) defined in WORKING-STORAGE.                Then I use those for my call to the C procedure as: CALL PROCEDURE “TESTC” USING WS-FIRST-COBOL-NUM WS-SECOND-COBOL-NUM [...]

Answer Question   |  October 20, 2010  8:49 PM
AS/400 Parameters, COBOL, COBOL/400, ILE Program
asked by:
185 pts.

Calling C ILE Program from COBOL 400 ILE Program
[html xmlns=""> I need help in figuring out how to call a C ILE program from a COBOL 400 ILE program. In my example I would like to pass three parameters from the COBOL program (num1, num2, total) to the C program. In the COBOL program I will hardcode the numbers as, say, 9 for [...]

Answer Question   |  October 1, 2010  2:22 AM
CL Parameters, COBOL, COBOL ILE, COBOL/400, ILE Program
asked by:
185 pts.

How do you initiate a direct web service call from the AS/400?
How do you initiate a direct web service call from the AS/400? I am programming in 400/COBOL. I am assuming I need to use COBOL ILE.

Answer Question   |  September 30, 2010  6:51 PM
AS/400, COBOL, COBOL ILE, COBOL/400
asked by:
185 pts.

cobol/400 code samples
Hi, I am new to COBOL/400, plz provide me a link to some practical examples on cobol/400

Answer Question   |  July 29, 2010  3:53 PM
COBOL, COBOL/400, iSeries, OS/400, V5R4
asked by:
1,150 pts.

Next step in my AS/400 career
Hi, I’ve been working for last 3.5 years in AS400 and in which Cobol400 as programming language. I didnot get any chance to work in RPG in these years. Actually i want to grow in my career as technical expert in AS400. But being only knowledge in cobol and cl, i am not sure that i [...]

Answer Question   |  July 2, 2010  5:42 PM
AS/400 careers, AS/400 Query, COBOL certifications, COBOL/400
asked by:
45 pts.

Getting a decimal data error when making a change in COBOL AS/400
Hi, I am doing a change in COBOL pgm in as400. Requirement is to replace an existing input file with a new one and move its field values to the output file. There is a difference here as old input file had the particular field in numeric and the new input file has it in decimal. [...]

Answer Question   |  September 27, 2010  1:48 PM
AS/400, COBOL, COBOL/400
asked by:
125 pts.

COBOL/400 interview questions
Can anyone share me COBOL/400 Interview questions Document??

Answer Question   |  December 2, 2009  6:24 AM
COBOL/400, COBOL/400 Interview Questions
asked by:
140 pts.

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 full error and code are [...]

Answer Question   |  November 9, 2009  11:32 PM
COBOL Compiler, COBOL/400, ILE COBOL
asked by:
45 pts.

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                          DEBIT should act as a PIC ZZZZZZZ,ZZZ,ZZ9.99              else                         DEBIT should act as a PIC  ZZZ,ZZZ,ZZZ,ZZ9.99 Please Suggesst me..

Answer Question   |  March 17, 2010  1:01 PM
CL/400, COBOL, COBOL/400
asked by:
50 pts.

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?

Answer Question   |  October 23, 2009  8:55 AM
AS/400, CL/400, COBOL, COBOL/400
asked by:
50 pts.

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 [...]

Answer Question   |  October 20, 2009  4:33 PM
COBOL debugging, COBOL/400
asked by:
30 pts.

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.

Answer Question   |  October 15, 2009  10:41 AM
COBOL debugging, COBOL/400, ILE COBOL/400, RPG ILE
asked by:
5 pts.

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 [...]

Answer Question   |  September 4, 2009  10:45 AM
AS/400 to Oracle, COBOL/400, iSeries, iSeries to Oracle data transfer, Oracle
asked by:
1,160 pts.

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’ .

Answer Question   |  August 7, 2009  3:30 PM
COBOL/400
asked by:
385 pts.

File Status 90
Can anyone help me why I’m getting status 90 when I try to write to a logical file.

Answer Question   |  July 31, 2009  9:48 AM
AS/400, COBOL/400
asked by:
45 pts.

Subfiles in COBOL (Single Page, Load All, Expand)
Can anybody please provide sample code (simple) for the 3 Subfiles in COBOL/400??

Answer Question   |  July 6, 2009  12:44 PM
COBOL, COBOL/400, Subfile
asked by:
205 pts.

DEBUG COBOL/400 PROGRAM
PLEASE GUIDE ME HOW CAN DEBUG A COBOL/400 PROGRAM?

Answer Question   |  July 24, 2009  12:00 PM
COBOL, COBOL DEBUG, COBOL debugging, COBOL/400, COBOL/400 Debugging, debug, Debugging, Software Quality
asked by:
5 pts.

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.

Answer Question   |  June 16, 2009  4:13 PM
API, COBOL/400, FD_Set, FD_Zero
asked by:
15 pts.