Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to see what a field is

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Iratxe

New User


Joined: 21 Feb 2006
Posts: 24

PostPosted: Thu Dec 28, 2006 9:04 pm    Post subject: How to see what a field is
Reply with quote

Hello,

Merry Christmas and Happy New Year!!

I?ve got a problem. I?ve a VB file, where beginnig from position 5 and with 10 of length there?s a field wich seems to be BI, and I want to see it.

I?m doing this sort:
Code:

  OPTION COPY                                                   
  OUTFIL INCLUDE=((5,10,BI,EQ,0000000140,OR,                     
               5,10,BI,EQ,0215283144,OR,                       
               5,10,BI,EQ,0000000152,OR,                       
               5,10,BI,EQ,0222222232)),FNAMES=OUT1             


the sortin file is like this:
Code:

  ?  *  0Q  2004-02-040Q     9999-01-01                         
  ?  *  0R  2004-03-310R      9999-01-01                         
  ?  *  0T  2004-03-310T      9999-01-01                         
  ?  *  1G  2004-06-011G     9999-01-01                         
  ?      0Q  2004-02-040Q     9999-01-01                         
  ?      0R  2004-04-060R      9999-01-01                         
  ?      1E  2004-06-011E      9999-01-01         

and I obtain this:
Code:

  ?  *  0Q  2004-02-040Q     9999-01-01                         
  ?  *  0R  2004-03-310R     9999-01-01                         
  ?  *  0T  2004-03-310T      9999-01-01                         
  ?  *  1G  2004-06-011G     9999-01-01                         
  ?      0Q  2004-02-040Q     9999-01-01                         
  ?      0R  2004-04-060R     9999-01-01                         
  ?      1E  2004-06-011E      9999-01-01                         


How can I see what this is " ? "?

Iratxe
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Thu Dec 28, 2006 9:05 pm    Post subject:
Reply with quote

Turn on HEX?
Back to top
View user's profile Send private message
Iratxe

New User


Joined: 21 Feb 2006
Posts: 24

PostPosted: Thu Dec 28, 2006 9:10 pm    Post subject: Re: How to see what a field is
Reply with quote

Hello,

for that I?m using this:

OUTREC FIELDS=(1,4,5,10,HEX,16,26)

and I obtain:

00002E02CD0100000000* 0Q 2004-02-040Q 9
00002E02CD0100000000* 0R 2004-03-310R 9
00002E02CD0100000000* 0T 2004-03-310T 9
00002E02CD0100000000* 1G 2004-06-011G 9
00002E02CD0100000000 0Q 2004-02-040Q 9
00002E02CD0100000000 0R 2004-04-060R 9
00002E02CD0100000000 1E 2004-06-011E 9
00002E02CD0100000000 1G 2004-06-011G 9
00002E02CD0100000000 0Q 2004-02-040Q 9
00002E02CD0100000000 0R 2004-03-310R 9
00002E02CD0100000000 0T 2004-03-310T 9

it doesn't seem to be easy to read. What do you think?
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Thu Dec 28, 2006 9:28 pm    Post subject:
Reply with quote

OK, I was thinking a TSO browse with HEX, but that kinda does look binary....Maybe an address?
Back to top
View user's profile Send private message
Iratxe

New User


Joined: 21 Feb 2006
Posts: 24

PostPosted: Thu Dec 28, 2006 9:43 pm    Post subject:
Reply with quote

What do you want to mean with that, the kind of field?

Is this what your looking for?

COD_CONTRATO HCTB719 DB2H 1 DECIMAL 10

COD_POLIZA HCTB719 DB2H 2 SMALLINT 2

TIP_ACCION_VENTA HCTB719 DB2H 3 CHAR 2
Back to top
View user's profile Send private message
Iratxe

New User


Joined: 21 Feb 2006
Posts: 24

PostPosted: Thu Dec 28, 2006 9:45 pm    Post subject:
Reply with quote

The mail before is what sould be, but in the table it?s a

25 RTGCC-COD-CONTRATO PIC S9(10)

VALUE ZERO

COMPUTATIONAL-3.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Dec 28, 2006 10:20 pm    Post subject:
Reply with quote

Hello,

Quote:

00002E02CD0100000000* 0Q 2004-02-040Q 9
00002E02CD0100000000* 0R 2004-03-310R 9
00002E02CD0100000000* 0T 2004-03-310T 9
00002E02CD0100000000* 1G 2004-06-011G 9
00002E02CD0100000000 0Q 2004-02-040Q 9
00002E02CD0100000000 0R 2004-04-060R 9
00002E02CD0100000000 1E 2004-06-011E 9
00002E02CD0100000000 1G 2004-06-011G 9
00002E02CD0100000000 0Q 2004-02-040Q 9
00002E02CD0100000000 0R 2004-03-310R 9
00002E02CD0100000000 0T 2004-03-310T 9

it doesn't seem to be easy to read. What do you think?


The first "20" appear to be the hex values for 10 characters, shown side-by-side (over/under is easier on the eye. . .)
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Dec 28, 2006 11:39 pm    Post subject:
Reply with quote

You used:

Code:

   OUTREC FIELDS=(1,4,5,10,HEX,16,26)


1,4 is the RDW. DFSORT doesn't display it unless you use 1,4,1,4,HEX.

So the first thing in the output is 5,10,HEX which is as follows for the first record:

Code:

00002E02CD0100000000


and appears to be the same for every record. This is a hex value of X'00002E02CD0100000000'.

A more readable way to display this might be:

Code:

   OUTREC FIELDS=(1,4,1,4,HEX,C'|',5,10,HEX,C'|',16,26)


In your INCLUDE statement, you're comparing this 10-byte BI value to a decimal number. X'00002E02CD0100000000' is the decimal number 3315437679876767744 which would not satisfy the INCLUDE conditions.
Back to top
View user's profile Send private message
Iratxe

New User


Joined: 21 Feb 2006
Posts: 24

PostPosted: Thu Jan 04, 2007 2:58 pm    Post subject:
Reply with quote

Hello,

I'm sorry about the delay for answering. The fact?s that seems the original file contains binarys.

Can I transform binary to decimal?

Thanks.

Iratxe
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Jan 04, 2007 10:32 pm    Post subject:
Reply with quote

Quote:
Can I transform binary to decimal?


Yes. You can use something like:

5,10,BI,M11

or

5,10,BI,TO=ZD
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts INVALID FIELD OR CONSTANT IN SORTOF ?? Ron Klop DFSORT/ICETOOL 8 Wed Jan 11, 2017 3:44 pm
No new posts Performing arithmetic on input field zh_lad DFSORT/ICETOOL 31 Tue Dec 06, 2016 8:04 pm
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts How to split the records using the am... vnktrrd DFSORT/ICETOOL 24 Fri Oct 28, 2016 7:33 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us