RE: RPGILESQL PGM

[RIMMA.POLISHUK@xxxxxxxxxxxx]

Thank you very much for help, guys.  It works.
Thanks a lot, Buck.
------------------( Forwarded letter 1 follows )---------------------
Date: Thu, 6 Jun 2002 16:20:07 -0400
To: rpg400-l@midrange.com
From: Buck.Calabro@commsoft.net
Sender: rpg400-l-admin@midrange.com
Reply-To: rpg400-l@midrange.com
Subject: RE: RPGILESQL PGM

>Buck, I think that concatenation idea is really could help.
> Is it exact syntax what I should put in my SQL statement for
>the "cat"?

Yes.
where (digits(snscc) concat digits(snsyy) concat
       digits(snsmm) concat digits(snsdd))
  between :FC and :TC

>Also my Fdate and Tdate should be declare in RPG DS
>as 8 characters?

Yes.  The idea is that you will convert the 4 individual numeric fields to
character with DIGIT() and then combine them into one long character with
CONCAT.  Once you have one character field containing the date, you'll need
to compare it to another character.

You can see how this works by using STRSQL.  Paste the SELECT statement
without the WHERE clause, like so:
SELECT (digits(snscc) concat digits(snsyy) concat
        digits(snsmm) concat digits(snsdd))
FROM ...

Then you can see how it works.

If you are going to be doing much work with SQL, you should really become
comfortable with the SQL manuals.  Go to the InfoCentre at
http://www.iseries.ibm.com/library and navigate to Database and File
Systems, then DB2 UDB for iSeries.  The right side will have good
references.
  --buck
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.