Hi, could anyone please advice me how to use time stamp in COBOL/400?
Answer Question | May 15, 2013 4:58 AM
AS/400, CLLE, COBOL
I have not written a subfile program in a while, but am having trouble when errors are encountered. As this is COBOL and the code can be lengthy to weed through on a forum, let me first spell out the scenario. I have 32 records in a COBOL subfile, 11 per page. There is one [...]
Answer Question | April 26, 2013 2:09 PM
AS/400, AS/400 Subfiles, COBOL
In my COBOL SQL select statement that was previously running on V5R4, I was able to extract a date field defined with “date” as the data type. We are now on V7R1 and we get a data mapping error. No clue as to why? Any ideas? thanks
Answer Question | April 2, 2013 6:59 PM
COBOL, iSeries, SQL statement
Hi, Please help me with an need an example COBOL program for the below mentioned requirements. Extract fields from 3 files based on selection criteria(specific to each file) and write all the records which satisfies the criteria to a flat file. Thank you.
Answer Question | March 22, 2013 1:30 PM
COBOL, COBOL Programs
Hi, I have a logical file, which I am trying to open in I-O mode, but I get File status 90 File is existing on the system, The code was working fine previously (on development machine), but today I installed all the objects on another machine (Testing machine), and I am getting this file status, [...]
Answer Question | March 18, 2013 5:39 AM
I am trying to read a RPG created file with special characters in the data fields (EX: EP$DEPT,etc). Is there a way I can remap the fields in a COBOL program. I tried a logical mapping over the PF but when I rename the fields in the LF removing the $ sign, I get compile [...]
Answer Question | February 18, 2013 3:43 AM
COBOL, COBOL Programs, RPG file
I have date in yyyymmdd format. I want to validate if it lies between a particular period of 2 years let b/w 1 Jan 2012 to 5 April 2014, in COBOL/400…. Please help me as the intrinsic function like that in COBOL are not working in this case. Thanks.
Answer Question | January 31, 2013 7:22 PM
If I change userids in my CL via QSYGETPH/QWTSETP I get no QPJOBLOG. After adding DSPJOBLOG OUTPUT(*PRINT) to the CL I get a joblog. But still no output from the DISPLAY statements in the program. If I don’t switch userids, I see the messages in the QPJOBLOG.
Answer Question | April 25, 2012 6:48 PM
COBOL, iSeries v7r1
Hi, I have written two online programs. The first one uses PRDATA-FILE. The second one uses a logical file based on PRDATA-FILE. When the screen of the first online program is displayed, the screen of the second online program does not display records. Is this because PRDATA-FILE is locked by the first online program? How [...]
Answer Question | April 26, 2012 10:12 AM
AS/400 logical file, COBOL, iSeries 820
Hi Group, I have a date field declared as packed field of 9, and date is declared as mmddyyyy format. My requirement is such that i need to pick the date field and 1 day to it. For example if the date is ’02142012′ i need to add 1 day to it and end result [...]
Answer Question | March 17, 2012 9:43 PM
AS400 iseries, COBOL, PGM
I’m trying to dynamically create COBOL statements using field names identified in a table, so the same build statement can be used for different fields. Is there a way to dynamically build statements and execute? These buillt statements would be MOVE and ADD statements. Thanks in advance
Answer Question | March 17, 2012 3:50 PM
AS/400, COBOL, COBOL statements
i have one physical file,that pf have one logical file,but pf have 4 key fields,logical file have 2 key fields,now both(pf,lf) are using in cobol/400 code SELECT pf-file ASSIGN TO DATABASE-pf1 [Br _extended=”true” />ACCESS IS dynamic[Br _extended=”true” />ORGANIZATION IS INDEXED [Br _extended=”true” />RECORD KEY IS EXTERNALLY-DESCRIBED-KEY [Br _extended=”true” />FILE STATUS IS pf-STATUS. [Br _extended=”true” />[Br [...]
Answer Question | March 31, 2012 11:30 AM
AS/400, AS400 physical file, COBOL, COBOL/400
Hi, I need to compare 2 large database files on the AS400, they have 20 million + records each. They are both keyed uniquely, exact same file layout. I need to identify inserted, updated and deleted records. I tried using cobol program reading first file with the unique logical, and matching with the second file [...]
Answer Question | March 31, 2012 5:30 PM
AS/400, AS/400 database, AS/400 Database File, COBOL
how we can switch between two screens using maps in cics what will be the logic implemented in cobol programme?
Answer Question | March 31, 2012 2:16 AM
AS/400 DB2, CICS, CICS programs, COBOL
Is there a way to retrieve a Windows environmental variable from a Cobol AS400 environment?
Answer Question | March 31, 2012 6:03 PM
COBOL, Environmental Controls System, Windows Variable Names
I am trying to find a way in Cobol, either with a program or CL to see if a file directory exists in Windows.
Answer Question | March 31, 2012 5:50 PM
COBOL, Windows, Windows administration
Hi! can any one give me sample code of cobol/400 program which loads a subfile records page by page. My problem here is I am able to code page by page records loading from a PF but when the Subfile is dispalyed it is not properly displaying the pages. Fro example after loading and displaying [...]
Answer Question | March 31, 2012 8:10 AM
COBOL, COBOL/400, iSeries, Subfile, V5R3
Hi Group, In COBOL/400 PGM the file has been declared with ACCESS as SEQUENTIAL and ORGANIZATION as SEQUENTIAL. How to delete a record from such file? Regards, M
Answer Question | March 31, 2012 4:42 AM
COBOL, COBOL statements, COBOL/400, PGM
how to program cics inquire storage command in cobol to get the storage alloted to a particular task and then free the alloted storage
Answer Question | March 31, 2012 6:08 PM
CICS, CICS Storage, COBOL, COBOL CICS
“UNSTRING” contained both DBCS and non-DBCS items. My program is returning this compilation error. What is the solution. Please help. Tried many ways but didnt work.
Answer Question | March 31, 2012 9:40 AM
COBOL, COBOL Compiler, COBOL ERROR MESSAGE, DBCS, dbcs data, graphic datatype, unstring