× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Geez,

Apparently I didn't either <grin>.

See if this new example helps:

select * from YCSC1 where land(YSTAT1, x'40') = x'40'

the results of land is simply the results of a binary and between the fields
passed.

  0110 1101
  0100 0000
------------
  0100 0000

Since were dealing with single byte fields, and x'40' has only one bit on,
if my results is equal to x'40' then the YSTAT1 field had bit 7 on.

Charles


> -----Original Message-----
> From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
> Sent: Thursday, August 12, 2004 3:56 PM
> To: Midrange Systems Technical Discussion
> Subject: RE: 7th bit of a field
> 
> 
> 
> 
> I just read the SQL reference manual and still don't 
> understand land at
> all.
> 
> Rob Berendt
> --
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
> 
> 
> |-----------------------------+-------------------------------
> ------------|
> |   CWilt@xxxxxxxxxxxx        |                               
>             |
> |   Sent by:                  |                               
>             |
> |   midrange-l-bounces@midrang|                               
>           To|
> |   e.com                     |    midrange-l@xxxxxxxxxxxx    
>             |
> |                             |                               
>           cc|
> |   08/12/2004 02:25 PM       |                               
>             |
> |                             |                               
>       Fax to|
> |         Please respond to   |                               
>             |
> |         Midrange Systems    |                               
>      Subject|
> |       Technical Discussion  |    RE: 7th bit of a field     
>             |
> |      <midrange-l@xxxxxxxxxxx|                               
>             |
> |                m>           |                               
>             |
> |                             |                               
>             |
> |                             |                               
>             |
> |                             |                               
>             |
> |                             |                               
>             |
> |-----------------------------+-------------------------------
> ------------|
> 
> 
> 
> 
> 
> 
> Depends on where you're doing the selection.
> 
> Since you didn't post in the RPG-L list, how about some SQL.
> 
> select * from YCSC1 where land(YSTAT1, x'40')
> 
> HTH,
> Charles
> 
> 
> > -----Original Message-----
> > From: Muralidhar Narayana [mailto:Muralidhar_Narayana@xxxxxxxxxxx]
> > Sent: Thursday, August 12, 2004 3:08 PM
> > To: midrange-l@xxxxxxxxxxxx
> > Subject: 7th bit of a field
> >
> >
> > There is column oriented file YCSC1. One of the field  is
> > YSTAT1 which  is defined as
> >  Type Character  &  Length  1.
> > I need select records from this file YCSC1 when 7th bit of
> > YSTAT1 is "on" .
> > Can some one help me how to go about this and acheive records
> > for this selection.
> >
> >
> > --
> > This is the Midrange Systems Technical Discussion
> > (MIDRANGE-L) mailing list
> > To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> > or email: MIDRANGE-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/midrange-l.
> >
> --
> This is the Midrange Systems Technical Discussion 
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
> 
> 
> 
> --
> This is the Midrange Systems Technical Discussion 
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
> 


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.