Interesting soliloquy, this ! ;-)
I appreciate your posting the solution here, BJ !
On Sep 30, 10:24 pm, BJ <[EMAIL PROTECTED]> wrote:
> ANSWER:
> chr$("&h" & "F2")
>
> USE:
>
> strValue = "F23425E406888101"
>
> If Len(strValue) = 16 Then
>
> Dim i As Integer
> strPiece = ""
>
> For i = 1 To 16 Step 2
> strPiece = strPiece & Chr$("&h" & Mid(strValue, i, 2))
> 'chr$("&h" &
> "F2")
> Next i
> End If
>
> On Sep 29, 12:42 pm, BJ <[EMAIL PROTECTED]> wrote:
>
>
>
> > Think of the Bit Map field as an 8 byte binary field of 64 switches.
> > 1 means on 0 means off. So, for example, the first two bytes would be
> > made up of 16 switches:
>
> > 0011 1010 0001 0110
>
> > The bit map has to contain 8 eight bit values (or 64 bits or 2 words
> > etc..) indicating which fields are included in the rest of the
> > record. So in the example above fiels 3,4,5,7,12 14, and 15 are
> > included in this record. Field 3 is the members First Name, 4 =
> > middle initial, 5 = Last Name, 7 = account number. Field 2, in this
> > case, is the members prefix (Mr., Miss, Dr, Honorable, etc...), but I
> > don't always have that piece data so I am not going to include this
> > field in this record (or any record for that fact) which is why in the
> > bit map field 2 is off (or 0).
>
> > Determining what the Bit Map looks like is very easy, encoding it to
> > be of type byte is proving to be a challenge. I've tried different
> > examples from the web; wrote the output to a TXT file; and opened the
> > file using TextPad expecting a specific Hex representation. For
> > example using the bianry example above, I would expect the first two
> > bytes to have a Hex value of:
> > 3A 16
>
> > Thanks
> > B
>
> > On Sep 29, 9:27 am, BJ <[EMAIL PROTECTED]> wrote:
>
> > > I was tasked with creating this new output record for an existing VB6
> > > app. The new record(s) first field cotains a text value that contains
> > > a transaction code. The second field needs to be of type
> > > binary while the remainder of the record is text. The sample file I
> > > received does infact look this way. Field one is text value, followed
> > > by what looks like grabage, and then more text.
>
> > > If I open this text file in an editor like TextPad (using the binary
> > > format), I can see the Hex representation of the second field. I need
> > > to create the same type of record format using my values:
> > > F2 34 25 E4 06 88 81 01
>
> > > I thought I was close to an answer when I looked up UTF8Encoding
> > > Class. I can't ask the team who created the sample file because it
> > > came from a COBOL application on a mainframe. I'm sure they used
> > > something like:
>
> > > Field1 X(06).
> > > Field2 X(08) COMP3.
> > > Field3 X(10).
>
> > > The application is in VB6. I can either modify the application to read
> > > (at minimum) a hex string and return a Binary value or create a
> > > literal value of this Binary field.
>
> > > B- Hide quoted text -
>
> > - Show quoted text -- Hide quoted text -
>
> - Show quoted text -
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"DotNetDevelopment, VB.NET, C# .NET, ADO.NET, ASP.NET, XML, XML Web
Services,.NET Remoting" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://cm.megasolutions.net/forums/default.aspx
<p><a href="http://feeds.feedburner.com/DotNetDevelopment";><img
src="http://feeds.feedburner.com/~fc/DotNetDevelopment?bg=99CCFF&fg=444444&anim=1";
height="26" width="88" style="border:0" alt="" /></a></p>
-~----------~----~----~----~------~----~------~--~---
