IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Include or Omit with "ALL" parameter


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
mgl

New User


Joined: 12 Dec 2005
Posts: 29
Location: Belgium

PostPosted: Wed Jun 14, 2017 2:31 pm
Reply with quote

Hello,

I saw in a Dfsort joinkey job the following omit statement in jnf1cntl:

OMIT COND=((142,1,BI,ALL,B'00000001',
AND,61,1,BI,ALL,B'00000001',
AND,314,4,BI,EQ,X'00000000',AND,29,4,CH,EQ,C' '),OR,
(142,1,BI,ALL,B'00001000'),OR,(142,1,BI,ALL,B'00000010'))

Could anybody tell me the result of the "142,1,BI,ALL,B'00000001' " condition ?

I didn't manage to found an explonation in the book about the use of "ALL" in a relational condition. My first idea was that it is a mistake, but Dfsort accept the statement without any comment. This is the messages received in the sysout :

ICE000I 0 - CONTROL STATEMENTS
FOR 5650-ZOS, Z/OS DFSORT V2R1 - 01:09 ON WED JUN 14, 2017 -

OMIT COND=((142,1,BI,ALL,B'00000001',AND,61,1,BI,ALL,B'00000001',
AND,314,4,BI,EQ,X'00000000',AND,29,4,CH,EQ,C' '),OR,
(142,1,BI,ALL,B'00001000'),OR,(142,1,
BI,ALL,B'00000010'))
ICE146I 0 END OF STATEMENTS FROM
JNF1CNTL - PARAMETER LIST STATEMENTS FOLLOW
SORT FORMAT=BI,FIELDS=(45,16,A)
RECORD TYPE=F
DEBUG NOABEND,ESTAE
OPTION EQUALS,MSGPRT=ALL,LIST,NOCHECK,
RESINV=0,DYNALLOC,SORTDD=JNF1,MSG*
DDN=JNF1JMSG,SORTIN=SORTJNF1
ICE193I 0 ICEAM2 INVOCATION ENVIRONMENT IN EFFECT - ICEAM2 ENVIRONMENT SELECTED

Many thanks for any help in advance.

Best regards, Michel.

Coded - do it yourself next time
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 2567
Location: NYC,USA

PostPosted: Wed Jun 14, 2017 4:39 pm
Reply with quote

DFSORT OMIT COND
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2448
Location: Hampshire, UK

PostPosted: Wed Jun 14, 2017 7:45 pm
Reply with quote

Rohit, that does not explain what the 'ALL' does within the conditional expression. It seems that 'ALL' should be the entire expression i.e.
Code:
OMIT COND=ALL
but the example shows
Code:
OMIT COND=((142,1,BI,ALL,B'00000001')
Back to top
View user's profile Send private message
dneufarth

Active User


Joined: 27 Apr 2005
Posts: 318
Location: Inside the SPEW (Cincinnati OH USA)

PostPosted: Wed Jun 14, 2017 8:42 pm
Reply with quote

This may help. Look for it on the page Rohit suggested.


For complete details on the parameters of the OMIT control statement, see INCLUDE control statement.
Back to top
View user's profile Send private message
sergeyken

Active Member


Joined: 29 Apr 2008
Posts: 924
Location: Maryland

PostPosted: Wed Jun 14, 2017 9:00 pm
Reply with quote

Read carefully the suggested manual.

Quote:
BO (or ALL) All mask bits are 1s (ON) in the input field
BM (SOME) Some but not all mask bits are 1s (ON) in the input field
BZ (NONE) None of the mask bits is 1 (ON) in the input field
BNO (NOTALL) Some or no mask bits are 1s (ON) in the input field
BNM (NOTSOME) All or no mask bits are 1s (ON) in the input field
BNZ (NOTNONE) All or some mask bits are 1s (ON) in the input field


You need to understand Bit Operations (or Bitwise Operations) first of all - no relation to SORT itself.
If not, then RTFM (including Wikipedia)
Back to top
View user's profile Send private message
mgl

New User


Joined: 12 Dec 2005
Posts: 29
Location: Belgium

PostPosted: Fri Jun 16, 2017 2:37 pm
Reply with quote

Many thanks for your posts and specialy to RahulG31 and Sergeyken.
I am sorry, i didn't saw this explonation in the book and i always work with method 2.

Have a great end of day, Michel.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts include cond ascii constant DFSORT/ICETOOL 4
No new posts XML Parsing in COBOL creating "h... COBOL Programming 0
No new posts How do i verify the char field is hav... PL/I & Assembler 1
No new posts Am I missing something on "FREE ... CLIST & REXX 10
No new posts Required Date Format in Include Sort ... DFSORT/ICETOOL 6
Search our Forums:

Back to Top