HP3000-L Archives

February 2006, 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:
Glenn Mitchell <[log in to unmask]>
Reply To:
Glenn Mitchell <[log in to unmask]>
Date:
Tue, 21 Feb 2006 12:40:58 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (40 lines)
Rakesh - 

Simply code (in the SPECIAL-NAMES paragraph):
     SYMBOLIC CHARACTERS MY-SEPARATOR IS 29. 

You can then "MOVE MY-SEPARATOR TO ..." to move a X'1C'(decimal 28) to any 1
byte alphanumeric receiving field.

Note that SYMBOLIC CHARACTER are ordinal numbers and are 1 greater than
their ASCII equivalent (see
http://docs.hp.com/cgi-bin/doc3k/B3150090014.11950/8).

Regards.

Glenn
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf
Of [log in to unmask]
Sent: Tuesday, February 21, 2006 11:18 AM
To: [log in to unmask]
Subject: [HP3000-L] ASCII decimal 28 as delimeter in COBOL.

Hello Sir/Madam,

We want to use ASCII value of decimal 28 as a data separator while writing a
data file in COBOL.

Please give us the source code so that we can try it from our side.
Your help is very much appreciated.
 
Regards
Rakesh.


* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2