Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
sathish_rathinam

New User

Joined: 22 Aug 2005
Posts: 59
Location: india

 Posted: Thu Oct 20, 2005 3:12 pm    Post subject: Not able to understand ZD & FI in OUTREC statement OUTREC FIELDS =(+1,PD,LENGTH=6,(-1),PD,LENGTH=6,-50,TO=ZD,LENGTH=8) PLZ EXPLAIN THE ABOVE OUTREC STATEMENT CLEARLY. OUTREC FIELDS =(21,5,ZD,TO=PD,X,8,4,ZD,FI,LENGTH=2) IN THE ABOVE OUTREC ,IAM NOT ABLE TO UNDERSTAND 8,4,ZD,FI ,IS IT CONVERTING 9 TO 12 BYTES INTO FIXED POINT FROM BINARY? PLZ CLEAR ME THESE DOUBTS. regards, sathish

Frank Yaeger

DFSORT Moderator

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

Posted: Thu Oct 20, 2005 7:44 pm    Post subject:

 Quote: OUTREC FIELDS =(+1,PD,LENGTH=6,(-1),PD,LENGTH=6,-50,TO=ZD,LENGTH=8) PLZ EXPLAIN THE ABOVE OUTREC STATEMENT CLEARLY.

+1,PD,LENGTH=6 - creates a 6-byte PD output field with a value of P'+1'.
(-1),PD,LENGTH=6 - creates a 6-byte PD output field with a value of P'-1'.
-50,TO=ZD,LENGTH=8 - creates an 8-byte ZD output field with a value of Z'-50'

 Quote: OUTREC FIELDS =(21,5,ZD,TO=PD,X,8,4,ZD,FI,LENGTH=2) IN THE ABOVE OUTREC ,IAM NOT ABLE TO UNDERSTAND 8,4,ZD,FI ,IS IT CONVERTING 9 TO 12 BYTES INTO FIXED POINT FROM BINARY?

8,4,ZD,FI - converts a 4-byte ZD input field starting in position 8 to a 2-byte FI output field. FI is fixed-point (signed).

I won't have access to the internet for a few days, so I can't explain further right now.
sathish_rathinam

New User

Joined: 22 Aug 2005
Posts: 59
Location: india

 Posted: Fri Oct 21, 2005 9:22 am    Post subject: Re: some clarifications in dfsort . hi frank, thank u very much for clarifying my doubt. regards, sathish
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics WER268A OUTREC STATEMENT : SYNTAX E... frozenblood87 SYNCSORT 12 Sat Aug 26, 2017 9:45 pm Suppress value reported by BREAK in D... Learncoholic DFSORT/ICETOOL 3 Wed Aug 16, 2017 6:03 pm ON 2 AND EVERY 1 - Statement ??? UmeySan COBOL Programming 2 Tue Jul 25, 2017 1:20 pm Need to understand TCB CPU and SRB CPU gandikk Testing & Performance analysis 11 Mon Mar 20, 2017 9:32 pm outrec field outside range Danielle.Filteau SYNCSORT 10 Sat Mar 04, 2017 2:37 am

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us