Append a semicolon

This is a Mainframe COBOL forum - you can post your queries on Mainframe COBOL, VS COBOL II, COBOL/370 , Enterprise COBOL

Moderators: dbzTHEdinosauer, Moderator Group

Post Reply
bernix
Member
Posts: 21
Joined: Tue Oct 28, 2008 8:32 pm
Location: Vienna, Austria

Append a semicolon

Post by bernix » Thu Nov 27, 2008 6:06 pm

I get comma sperated values in a variable file. The problem is that the last seperator (a semicolon) is missing. The COBOL UNSTRING instruction needs a seperator to process the last field.

How can I append a semicolon on each input record and thereby increasing the length of the variable record by 1

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Thu Nov 27, 2008 7:00 pm

bernix,

since you can calculate your record length w/in the COBOL program, why not use the length in reference modification of the UNSTRING object?

and no, the UNSTRING does not need a delimiter at the end of record; with an added delimiter at end of record, the UNSTRING is forced to populate an additional receiving field (albeit with zero length).

I have been stringing and unstringing people (along) for years and never needed an end-of-record delimiter because i always had the length of the record.

UNSTRING RECORD-AREA(1:length-of-record-area)
into.......
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others