× 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.



Hi!

Thanks for all your answers. I was not sure of the meaning of the line, but
my guess was correct. Not I can convert the file correctly and I will,
eventually, change the SORTA for something better (maybe an OPNQRYF or
something like that).

Charles

"Jonathan Mason" <jonathan.mason@xxxxxxxxxxxxxxxx> a
écrit dans le message de news:4172.17138824544$1155304764@xxxxxxxxxxxxxxxxx
Hi Charles

It's been a while since I did any OCL (1990 to be precise), but if I
remember correctly it's comparing the contents of positions 9-16 with the
contents of positions 17-24.

So the complete selection criteria is to include records where:

Position 1 <> "D" and
Positions 17-24 <= Positions 31-38 of LDA and
Positions 9-16 <> Positions 17-24

All the best

Jonathan

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On
Behalf Of Charles St-Laurent
Sent: 11 August 2006 14:28
To: midrange-l@xxxxxxxxxxxx
Subject: Need help about an OCL

Hi!

I would like to understand the meaning of a line of a SORTA line. There's
the complete command:

// LOAD #GSORT
// FILE NAME-INPUT,LABEL-SC_?L'1,2'?_AP,DISP-SHR
// FILE NAME-OUTPUT,LABEL-SC?L'1,2'?L1?WS?,RECORDS-?F'A,SC_?L'1,2'?_AP'?
// RUN
     HSORTA    27A        3        N
     I C   1   1NECD
     IAC  17  24LEC?L'31,8'?
     IAC   9  16NEF  17  24 <--------------- There's the line I'm not sure
to understand
     FNC  29  36
     FNC   2   8
     FOC  17  24
     FOC  25  28
// END

I asked to a more experimented programmer at the office and he said that
it's the first time he sees this kind of syntax in a SORTA...

Can someone help me?

Charles



--
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:
Replies:

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.