HP3000-L Archives

June 1997, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Jim Phillips <[log in to unmask]>
Reply To:
Jim Phillips <[log in to unmask]>
Date:
Thu, 19 Jun 1997 17:06:39 EDT
Content-Type:
text/plain
Parts/Attachments:
text/plain (27 lines)
bob mcgegor asks:

>Can someone let me know how I specify the value for TAB in in Cobol:
>
> INSPECT variable TALLYING X BEFORE INITIAL TAB
>
>How do I setup the variable TAB in the Data Division?

If you mean the Horizontal Tab character:

01  TAB-CHAR            PIC  X  VALUE %11.

or

SPECIAL-NAMES.

 SYMBOLIC CHARACTERS TAB-CHAR IS 10.

Change the values %11 to %13 and 10 to 12 for the Vertical Tab character.

Hope this helps.

Jim Phillips                            Manager of Information Systems
E-Mail: [log in to unmask]      Therm-O-Link, Inc.
Phone: (330) 527-2124                   P. O. Box 285
  Fax: (330) 527-2123                   Garrettsville, Ohio  44231

ATOM RSS1 RSS2