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 SORT VSAM file with each field one by... maxsubrat DFSORT/ICETOOL 6 Tue Mar 14, 2017 1:07 pm
No new posts IMS DB-How to update a record (a sing... Nic Clouston IMS DB/DC 9 Thu Mar 09, 2017 4:38 pm
No new posts outrec field outside range Danielle.Filteau SYNCSORT 10 Sat Mar 04, 2017 2:37 am
No new posts 2 byte YEAR from Y'DATE2' field tecnokrat DFSORT/ICETOOL 2 Tue Feb 07, 2017 12:05 pm
No new posts Sort two file having same field, one ... himanshu malik DFSORT/ICETOOL 7 Thu Feb 02, 2017 10:09 am


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