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



Booth,

How this currently works is I'm reading an input file and loading up an
array of my locations. Then I'm reading my array and loading and
displaying a subfile. This all works. It's where I come to the
positioning part of things where the issue comes in. Doing a LOOKUPGT
doesn't seem to work for my situation so I'm going to load up a temporary
file and read from that so that I can use SETLL. But I'm not wanting to
get records that start with something. I'm wanting to start displaying
records from a certain point and show all records from there until the end.

Bill

On Wed, Dec 14, 2016 at 12:54 PM, Booth Martin <booth@xxxxxxxxxxxx> wrote:

In the end, I did this with an SQLRPGLE program, mostly because SQL has
such a fantastic wildcard search capability. This allows the users to
search by unique characters - both "ABC" and "Toy" will get "The ABC Toy
Company". Plus, with SQL it can be case-insensitive. I would add this:
this is more than position-to. Its selecting only desired records.

This is a link: http://www.martinvt.com/SQL_-s
imple-/SQL_Name_Editor/SQL_Names_Index/sql_names_index.html

This is the wildcard search (very simple, very fast):

****

****

wSRCHCOMP = %trim(SRCHCOMP) + '%'
exec sql declare C1 cursor for // define data to be retrieved
select *
from NAMESP
where NACOMPANY like :wSRCHCOMP
order by NACOMPANY, NALAST;
...
dow Sqlcode = 0 and SF1NUM < cLimitSFL; // Table read loop
select;
when wCursor = 'C1';
exec sql fetch C1 into :RecordDS;
...****
****

disclaimer: I am new with SQL. There probably are better SQL solutions,
but this worked for me.

****




On 12/14/2016 9:18 AM, Bill Howie wrote:

Hello all,

Question for the group. I have the need to add "position to"
functionality
to a subfile program. In this scenario, my subfile has one field which is
a bin location in a warehouse. The one field could look something like
"OVER-1A". I want the user to be able to key in just the letter "O" in a
field on the subfile screen and have the subfile display starting with the
records that begin with "O" and going from there. Is it just as simple as
doing a SETLL with the "O" as the key and it will read the records from
there on or is there more to it than that? Any info is as always
appreciated. Thanks!

Bill


--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD


As an Amazon Associate we earn from qualifying purchases.

This thread ...

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.