HP3000-L Archives

February 2010, 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:
Greg Terterian <[log in to unmask]>
Reply To:
Date:
Fri, 19 Feb 2010 13:42:19 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (77 lines)
no it does not Rene.  He is using ODBC, but on Image site the field is X100 and it is consist of X20 field, X10 field, Comp field, X2 field, Comp field, X12 field and Xbuffer for the rest
So through ODBC he is getting X100 into string in VB and in VB he needs to do the breaking of the fields...






-----Original Message-----
From: Rene Nunnington <[log in to unmask]>
To: [log in to unmask]
Sent: Fri, Feb 19, 2010 10:29 am
Subject: RE: [HP3000-L] Is there a formula to convert Cobol comp fields to readable format?


Hi Greg
Is he using an ODBC driver to connect to the COBOL?  If so, that should convert 
t.
Rene

René Nunnington 
orth American Sales Executive
Transoft, part of IRIS 
165 Northchase Parkway, Suite 225 
arietta, GA  30067 
Direct: (678) 336-5340 
[log in to unmask] 
ww.transoft.com 

----Original Message-----
rom: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf Of 
reg Terterian
ent: Friday, February 19, 2010 1:13 PM
o: [log in to unmask]
ubject: Re: [HP3000-L] Is there a formula to convert Cobol comp fields to 
eadable format?
Friend of mine asked me if I can:
<< Can you ask our HP buddies and find out what the formula is to convert comp 
ields to readable format 

 know what its doing but I just don’t get the formula 
 know it is packing the information into 4 bytes for example 5500 = 7)

ow to get something into pure binary form 
I am trying to read the 100 byte string which contains some packed fields (I do 
ave the layout) in Visual Basic and need to update SQL from VB>>
Any ideas or directions will be highly appreciated.
Thank you
reg

* To join/leave the list, search archives, change list settings, *
 etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
his message (and any associated files) is intended only for the 
se of the individual or entity to which it is addressed and may 
ontain information that is confidential, subject to copyright or 
onstitutes a trade secret. If you are not the intended recipient 
ou are hereby notified that any dissemination, copying or 
istribution of this message, or files associated with this message, 
s strictly prohibited. If you have received this message in error, 
lease notify us immediately by replying to the message and deleting 
t from your computer. Messages sent to and from us may be monitored. 
Internet communications cannot be guaranteed to be secure or error-free 
s information could be intercepted, corrupted, lost, destroyed, arrive 
ate or incomplete, or contain viruses. Therefore, we do not accept 
esponsibility for any errors or omissions that are present in this 
essage, or any attachment, that have arisen as a result of e-mail 
ransmission. If verification is required, please request a hard-copy 
ersion. Any views or opinions presented are solely those of the author 
nd do not necessarily represent those of the company.

his message has been scanned for malware by SurfControl plc. 
ww.surfcontrol.com


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

ATOM RSS1 RSS2