RE: OPNQRYF

[michel.cuypers@xxxxxxxxxx]

Absolutely right;

Concatenating should ALLWAYS be done with ALPHANUMERIC fields ...

Greetings,
  Michel




|--------+----------------------->
|        |          "Njхl        |
|        |          Fisketjјn"   |
|        |          <n.f@figu.no>|
|        |                       |
|        |          24/08/01     |
|        |          09:30        |
|        |          Please       |
|        |          respond to   |
|        |          rpg400-l     |
|        |                       |
|--------+----------------------->
  >----------------------------------------------------------------------------|
  |                                                                            |
  |       To:     rpg400-l@midrange.com                                        |
  |       cc:     (bcc: Michel Cuypers/New Wave Logistics Belgium)             |
  |       Subject:     RE: OPNQRYF                                             |
  >----------------------------------------------------------------------------|




> 524-
> 551- /*
>     553- CHGVAR     VAR(&QRYSLT) VALUE('SORD *EQ "'
> *CAT &SONO +
> 554  *CAT '"')


You have to define a character field with the same length as
the numeric field SONO, e.g. SONOA, and use that in the CHGVAR
statement:

DCL &SONOA           *CHAR   x


CHGVAR &SONA &SONO
CHGVAR &QRYSLT ('&SORDв' *CAT &SONOA *CAT '"')




_______________________________________________
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