* CPF6412 – compilation error
When I compile my cobol cbl program , i get this strange error. . EXCKRD5F 1 >8X ” X ” N . EXCKRDAF 1 ? X ” X ” X à MSGID MI Instruction Stream Semantic Diagnostics * CPF6412 Attributes of instruction X’56F9′ operand 1 not valid. Probable compiler error. * CPF6412 Attributes of instruction [...]
Answer Question
| March 31, 2012 10:01 AM
COBOL, COBOL Programs, COBOL/400
When I compile my cobol cbl program , i get this strange error. . EXCKRD5F 1 >8X ” X ” N . EXCKRDAF 1 ? X ” X ” X à MSGID MI Instruction Stream Semantic Diagnostics * CPF6412 Attributes of instruction X’56F9′ operand 1 not valid. Probable compiler error. * CPF6412 Attributes of instruction [...]
Answer Question
| March 31, 2012 10:01 AM
COBOL, COBOL Programs, COBOL/400
Programming quiz – Excel, VB etc.
Recently heard an interesting quiz and thought it will be fun to see the solution done programmatically. The quiz is as follows: A person bought an old car with over 170,000 miles on it. The odometer is a digital device with 6 digits. The odometer shows only full digits – no decimals. One day as [...]
Answer Question
| March 31, 2012 4:33 AM
C, COBOL, excel, VB
Recently heard an interesting quiz and thought it will be fun to see the solution done programmatically. The quiz is as follows: A person bought an old car with over 170,000 miles on it. The odometer is a digital device with 6 digits. The odometer shows only full digits – no decimals. One day as [...]
Answer Question
| March 31, 2012 4:33 AM
C, COBOL, excel, VB
DBCS data movement
I have a requirement to select fields from an input file which also contains DBCS fields in addition to alphanumeric. THe fields are separated by tabs. Ofcourse I could use unstring delimter option, but the dbcs data movement is showing errors. Is there any way of conversion b/w dbcs and alphanumeric datatypes
Answer Question
| March 31, 2012 6:45 AM
COBOL, DBCS, Mainframe, Mainframe systems
I have a requirement to select fields from an input file which also contains DBCS fields in addition to alphanumeric. THe fields are separated by tabs. Ofcourse I could use unstring delimter option, but the dbcs data movement is showing errors. Is there any way of conversion b/w dbcs and alphanumeric datatypes
Answer Question
| March 31, 2012 6:45 AM
COBOL, DBCS, Mainframe, Mainframe systems
Cobol access to DB2 data over multiple LPARs
I have an iSereis with 2 LPARs – one running V6R1 with a Cobol compiler (not ILE) and the other LPAR is running V5R3 with DB2 files. What code and/or compiler options do I use to connect the v6r1 Cobol with the v5r3 database and how do I create the Cobol program to run on [...]
Answer Question
| March 31, 2012 10:39 PM
AS/400 LPAR, COBOL, DB2, iSeries V6R1, LPAR
I have an iSereis with 2 LPARs – one running V6R1 with a Cobol compiler (not ILE) and the other LPAR is running V5R3 with DB2 files. What code and/or compiler options do I use to connect the v6r1 Cobol with the v5r3 database and how do I create the Cobol program to run on [...]
Answer Question
| March 31, 2012 10:39 PM
AS/400 LPAR, COBOL, DB2, iSeries V6R1, LPAR
Hawkeye Mass Compile
How close do other change management products keep COBOL compile parms for CRTCBLPGM, CRTBDNCBL when replacing an object? Have looked at Hawkeye’s Mass Compile but had to tell them a while back they were not keeping the Activation group was defaulting to QILE even if the object it was replacing was something different. Also currently [...]
Answer Question
| March 31, 2012 7:25 PM
*SRCDBG, COBOL, CRTCBLPGM, Hawkeye
How close do other change management products keep COBOL compile parms for CRTCBLPGM, CRTBDNCBL when replacing an object? Have looked at Hawkeye’s Mass Compile but had to tell them a while back they were not keeping the Activation group was defaulting to QILE even if the object it was replacing was something different. Also currently [...]
Answer Question
| March 31, 2012 7:25 PM
*SRCDBG, COBOL, CRTCBLPGM, Hawkeye
S0C4 ?
I am copying VSAM file to flat file by using ADUT515 but the job is abending with SOC4 with reason code 10. how to fix this permanently ?
Answer Question
| July 21, 2011 10:15 AM
COBOL, JCL, VSAM
I am copying VSAM file to flat file by using ADUT515 but the job is abending with SOC4 with reason code 10. how to fix this permanently ?
Answer Question
| July 21, 2011 10:15 AM
COBOL, JCL, VSAM
Cobol Modules and Program
hi, I have 3 module objects:- 1. Add 2. Update 3. Delete. I have combined these into 1 module MODA. MODA calls these program on the basis of some condition. Now my question is: 1. I am not able to create PGM of MODA. the job log says Definition not found for symbol ‘ADD’. What [...]
Answer Question
| July 8, 2011 8:50 AM
AS/400 job logs, AS400 - COBOL, COBOL, PGM
hi, I have 3 module objects:- 1. Add 2. Update 3. Delete. I have combined these into 1 module MODA. MODA calls these program on the basis of some condition. Now my question is: 1. I am not able to create PGM of MODA. the job log says Definition not found for symbol ‘ADD’. What [...]
Answer Question
| July 8, 2011 8:50 AM
AS/400 job logs, AS400 - COBOL, COBOL, PGM
COBOL/400
Hi Group, I have the code in this format IDENTIFICATION DIVISION PROGRAM-ID. PGM. ——– ——– DATA DIVISION. FILE SECTION FD PHONEFILE 01 PHONE-REC. ———— ———— PROCEDURE DIVISION. <In Procedure division i have written an record into the PHONEFILE> WRITE PHONE-REC. I would like to pass the PHONE-REC record to a sub-program. <My question is, Can [...]
Answer Question
| June 24, 2011 5:45 PM
AS/400, COBOL, COBOL statements, COBOL/400
Hi Group, I have the code in this format IDENTIFICATION DIVISION PROGRAM-ID. PGM. ——– ——– DATA DIVISION. FILE SECTION FD PHONEFILE 01 PHONE-REC. ———— ———— PROCEDURE DIVISION. <In Procedure division i have written an record into the PHONEFILE> WRITE PHONE-REC. I would like to pass the PHONE-REC record to a sub-program. <My question is, Can [...]
Answer Question
| June 24, 2011 5:45 PM
AS/400, COBOL, COBOL statements, COBOL/400
Can you use variables as input and output when calling a stored procedure in COBOL?
If you move data into your variable before calling your procedure, can the procedure then return a value back, which might be different? The procedure will intially be searching for the variable data, but, according to our .net programmer, will return a blank or null if it does not find the data. So far, that [...]
Answer Question
| June 27, 2011 5:02 PM
CL variables, COBOL, SQL procedure, SQL variables, Variable fields
If you move data into your variable before calling your procedure, can the procedure then return a value back, which might be different? The procedure will intially be searching for the variable data, but, according to our .net programmer, will return a blank or null if it does not find the data. So far, that [...]
Answer Question
| June 27, 2011 5:02 PM
CL variables, COBOL, SQL procedure, SQL variables, Variable fields
COBOL SubFile Processing
Hello All. I am sure that this question has already been answered somewhere but I am not able to find the answer so please bear with me. My DDS contains 4 records 1) MAP1 RECORD 2)MAP1S SFL 3)MAP1C SFLCTL 4) MAP1S MAP2 RECORD Map1 contains fields that are used to filter the results to be [...]
Answer Question
| May 26, 2011 5:28 PM
AS/400 Subfiles, AS400 - COBOL, COBOL, Subfile
Hello All. I am sure that this question has already been answered somewhere but I am not able to find the answer so please bear with me. My DDS contains 4 records 1) MAP1 RECORD 2)MAP1S SFL 3)MAP1C SFLCTL 4) MAP1S MAP2 RECORD Map1 contains fields that are used to filter the results to be [...]
Answer Question
| May 26, 2011 5:28 PM
AS/400 Subfiles, AS400 - COBOL, COBOL, Subfile
On overflow in Unix IBM COBOL
stringing a name into a field with a area causing overflow. area is defined as using linkage, but no linkage size defined. overflow only happens with a VERY LONG name. Routine has existed in production for several years, never had too long of name before.
Answer Question
| May 13, 2011 3:04 PM
COBOL, Overflow Error CPF5004, RPG overflow, Unix, Unix administration
stringing a name into a field with a area causing overflow. area is defined as using linkage, but no linkage size defined. overflow only happens with a VERY LONG name. Routine has existed in production for several years, never had too long of name before.
Answer Question
| May 13, 2011 3:04 PM
COBOL, Overflow Error CPF5004, RPG overflow, Unix, Unix administration
How to handle Null value in COBOL/400.
I have created a view that have Null value.I have populated this field on the basis of some conditions.But when i am reading this view in COBOL program it is going in infinite loop & reading the same record.
Answer Question
| May 12, 2011 5:49 AM
COBOL, COBOL Programs, COBOL/400, COBOL/400 Errors
I have created a view that have Null value.I have populated this field on the basis of some conditions.But when i am reading this view in COBOL program it is going in infinite loop & reading the same record.
Answer Question
| May 12, 2011 5:49 AM
COBOL, COBOL Programs, COBOL/400, COBOL/400 Errors
Special formatting on text lines AS/400
HAve a text input screen and somehow the user is burying froamtting controls into the data , ie( highlighing a sentence or underlining a word. The user does not remember how they did it, Need some ideas, the user has not mapped their keyboard with apl coding. Thanks
Answer Question
| May 2, 2011 5:21 PM
AS/400, AS400 - COBOL, COBOL
HAve a text input screen and somehow the user is burying froamtting controls into the data , ie( highlighing a sentence or underlining a word. The user does not remember how they did it, Need some ideas, the user has not mapped their keyboard with apl coding. Thanks
Answer Question
| May 2, 2011 5:21 PM
AS/400, AS400 - COBOL, COBOL
Determining which concatenated dataset is being processed by a COBOL program
I’d like to determine which dataset in a group of concatenated datasets is currently being processed. I have multiple datasets going through an edit process (COBOL) on a mainframe and when I find an error I’d like to list the DSN the record is in.
Answer Question
| July 21, 2011 4:22 PM
COBOL, Concatenate, Datasets, DSN, Mainframe
I’d like to determine which dataset in a group of concatenated datasets is currently being processed. I have multiple datasets going through an edit process (COBOL) on a mainframe and when I find an error I’d like to list the DSN the record is in.
Answer Question
| July 21, 2011 4:22 PM
COBOL, Concatenate, Datasets, DSN, Mainframe
Is there a system date that can be used in extracts?
Is there a system-date (like COBOL) that can be used in extracts?
Answer Question
| July 8, 2011 1:26 PM
COBOL, EXTRACT, System date
Is there a system-date (like COBOL) that can be used in extracts?
Answer Question
| July 8, 2011 1:26 PM
COBOL, EXTRACT, System date
Why this error code in COBOL program: CPD7914
Need help getting pass this error message. using this input file definition * Beginning of data ***************************** R DCREFR DCCODE 3 ALIAS(DC_CODE) DCMEANING 50 ALIAS(DC_MEANING) Which is called by this DSS file definition: UNIQUE REF(DCREF) R DCPHYR DCCODE R DCMEANING R K DCCODE A* DCPHY A [...]
Answer Question
| March 25, 2011 6:00 PM
AS/400 error messages, COBOL, COBOL Programs, COBOL/400
Need help getting pass this error message. using this input file definition * Beginning of data ***************************** R DCREFR DCCODE 3 ALIAS(DC_CODE) DCMEANING 50 ALIAS(DC_MEANING) Which is called by this DSS file definition: UNIQUE REF(DCREF) R DCPHYR DCCODE R DCMEANING R K DCCODE A* DCPHY A [...]
Answer Question
| March 25, 2011 6:00 PM
AS/400 error messages, COBOL, COBOL Programs, COBOL/400
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
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
AS/400 administration
Hi i am uday, i am working on AS 400 as admin, now i want a development job on AS 400, what should i learn, COBOL or RPG???? please advice!!!!
Answer Question
| June 20, 2012 6:36 AM
AS/400 administration, AS/400 Administrator, COBOL
Hi i am uday, i am working on AS 400 as admin, now i want a development job on AS 400, what should i learn, COBOL or RPG???? please advice!!!!
Answer Question
| June 20, 2012 6:36 AM
AS/400 administration, AS/400 Administrator, COBOL
Language Migration: COBOL to JAVA conversion, mapping help
Hi All, Im looking for an idea or suggestion on the COBOL group variable conversion to equivalent conversion approach in Java equivalent: Background: The conversion tool currently im working on demands the tool to convert COBOL programs to .NET platform wherein all COBOL code needs to have an equivalent code in JAVA language. Inspite of [...]
Answer Question
| February 24, 2011 2:25 PM
COBOL, Java, Variable declaration mapping from COBOL to JAVA
Hi All, Im looking for an idea or suggestion on the COBOL group variable conversion to equivalent conversion approach in Java equivalent: Background: The conversion tool currently im working on demands the tool to convert COBOL programs to .NET platform wherein all COBOL code needs to have an equivalent code in JAVA language. Inspite of [...]
Answer Question
| February 24, 2011 2:25 PM
COBOL, Java, Variable declaration mapping from COBOL to JAVA
Use of ‘THRU’ in cobol ?
Hi. i have 2 questions in cobol : 1) Suppose i have a para : 1000-process Now while processing if i use : perform 1000-process thru 1000-exitand perform 1000-process .What will be the difference. 2) Suppose there is a cobol pgm named ABC .and in indentification division, i i give the name XYZ.Then i call [...]
Answer Question
| February 22, 2011 7:00 AM
AS/400, COBOL, COBOL Programs, COBOL statements
Hi. i have 2 questions in cobol : 1) Suppose i have a para : 1000-process Now while processing if i use : perform 1000-process thru 1000-exitand perform 1000-process .What will be the difference. 2) Suppose there is a cobol pgm named ABC .and in indentification division, i i give the name XYZ.Then i call [...]
Answer Question
| February 22, 2011 7:00 AM
AS/400, COBOL, COBOL Programs, COBOL statements
