QRY und PARAMeter

[Sven Schneider]

Für das oben angegebene Beispiel folgendes angeben :

STRQMQRY QMQRY(Queryname)
ALWQRYDFN(*YES)
SETVAR((STATE '''TX'''))

Also Strings immer in doppelte Hochkommas einbetten.

good luck
Sveb

[Fuerchau]

Eine weitere Möglichkeit ist das von mir entwickelte Tool SQLCPY. Dieses Tool startet einen Query als ganz normalen CL-Befehl, der auch dynamisch zusammengesetzt werden kann.
Eine Vielzahl von zusätzlichen Optionen erlaubt das Auswählen beliebiger Dateien, Verknüpfungen (Join's), WHERE- und GROUP-Klauseln usw., mit der Möglichkeit auch neue Dateien zu erstellen.
Weiteres unter www.fuerchau.de

[Sven Schneider]

Oder man nutzt ein kostenloses Tool wie RUNSQL.

Referenz :
NEWS 3X/400, Aug. 1991, Fig. 2, pg. 132

Achtung : Es gab da nochmal eine Korrekur, da diese Version einen Fehler beim Zusammensetzen des SQL-String enthält.
Leider weis ich nicht mehr in welcher Ausgabe von NEWS/400.

oder

von Paul Conte gibt es auch ein Tool "Quick Query" von 1996 !!!
unter http://www.as400forum.de/news400/abo...ools/prog1.zip

Sven

[Dieser Beitrag wurde von Sven Schneider am 17. September 2001 editiert.]

[HoScHiE]

Hallo,
zur Info an Alle und zur Bestätigung von Schreibr:
Wenn auf der Maschine Qry/400 ist dann ist auch automatisch QMQRY drauf.
Ich nur zur deppert ;-) es zu bedienen.

So nun möchte ich nochmal genau wissen,
wie mein SQL Statement aussehen muss wenn ich die Variable &FELDA aus dem CL and das QMQRY übergeben.

Beispiel:
Select * from Adresse where ADNO = &FELDA

Danke

[COS]

> So nun möchte ich nochmal genau wissen, wie
> mein SQL Statement aussehen muss wenn ich
> die Variable &FELDA aus dem CL and das > QMQRY übergeben.

in der QMQRYSRC:
Select ..... where dateifeld = &FELDA

im CLP:
STRQMQRY QMQRY(xxxx) QMFORM(*QMQRY) +
SETVAR((FELDA &FELDA))

die erste Angabe ist der VariablenName im QMQRY (ohne &)
die zweite Angabe ist der VariablenName im CLP (mit &)

HTH

[Fuerchau]

Wichtig beim SETVAR ist der Feldtyp. Obige version funktioniert nur bei numerischen Feldern. Alphawerte müssen in SQL in Hochkommata übergeben werden:

... SETVAR((FELDA ('''' *CAT &FELDA *CAT '''')))

[HoScHiE]

Hallo,

ich habe es jetzt endlich mal geschafft und ein QMYQRY aus einer SQL Source erstellt.

Dspf erstellt(&VAR1), CL erstellt.

IM CL: STRQMQRY ..... bei QMFORM (geht nur *SYSDFT) aber im o.g. Beispiel *QMQRY, denke mal das er ein Form dafür hat.

Wenn ich das ganze jetzt starte und einen Wert im DSPF eingebe dann fragt OS/400 mich nach der Eingabe des Wertes ?
obwohl ich SETvar mit ('''' *CAT &VAR1 *CAT ...)
gemacht habe.

Woran liegts `?

Thx,
HoScHiE

[HoScHiE]

Habe was gefunden ..

Mein SQL lautet."Select ... where FELD1(alpha) = &FELD1(alpha)

dann kommt trotzdem immer die Aufforderung einen Wert einzugeben.

wenn aber jetzt im SQL :FELD1 = '&FELD1' mache, dann kommt diese Aufforderung nicht mehr... aber es werden auch keine Datensätze ausgegeben = 0 DS.

Kann mir jemand mal sagen wie der SQL und SETVAR aussehen müssen wenn.

1. Dateifeld(Alpha) & &FELD(Alpha)
2. Dateifeld(num) & &FELD(Alpha)
3. Dateifeld(num) & &FELD(num)

Ich danke Euch.

HoScHiE

[andreas_bichler]

ich habe das gleiche Problem.

im CL pgm
....
CHGVAR VAR(&FAX) VALUE('''' *CAT &FA *CAT '''')
CHGVAR VAR(&CCVONX) VALUE('''' *CAT &CCVON *CAT '''')
....
STRQMQRY QMQRY(CSPUSR/TIMEMAIL) OUTPUT(*PRINT) +
QMFORM(CSPUSR/TIMEMAIL) NAMING(*SQL) +
ALWQRYDFN(*YES) SETVAR((VONCC &CCVONX) +
(BISCC &CCBISX) (FA &FAX) (VONKST +
&KSTVONX) (BISKST &KSTBISX) (VONMENTOR +
&MENVONX) (BISMENTOR &MENBISX))
.....
Trotzdem bekomme ich einen Eingabeprompt für die Parameter.
Wie schaffe ich das, dass das QMQRY die Werte einfach übernimmt.

Danke und Gruß
Andi

[Fuerchau]

Poste mal den SQL des QM-Queries.

[andreas_bichler]

SELECT A.LEGENT, A.PROJECT, A.ACTCDE, A.HOURS, A.DAYDT, A.PNR,
B.KT040 AS NAME, C.TG148 as CC, A.systen, D.tg148 as HK, e.tg148 as
Mentor FROM CSPUSR.TIMESHP A, CSPDTA924.CS0KT B, CSPDTA924.CS0TG C,
cspdta924.cs0tg D, cspdta924.cs0tg e WHERE A.PNR=B.KT016 AND
A.PNR=C.TG016 AND C.TG147='C3' AND TFRDAT = (select max(tfrdat) from
cspusr.timeshp) AND C.TG148
BETWEEN &voncc AND &biscc AND A.LEGENT = &fa and d.tg147='HK' and
d.tg016=a.pnr and e.tg147='ME' and e.tg016=a.pnr
and d.tg148 between &vonkst and &biskst
and e.tg148 between &vonmentor and &bismentor
ORDER BY 1, 8, 6, 5, 3

[Heinz Molter]

Wir arbeiten sehr gut mit dem ShowCase AS/400 Query der Firma SPSS.

Dieser bietet neben einer PC-Oberfläche, welche die Arbeitet um ein vielfaches beschleunigt, auch genau diese Parameterfunktion.

So z.B. übergeben wir, in unserer AS/400 basierenden CRM-Lösung MaiDi, als Parameter die Kundennummer des geöffneten Kunden in ein ".txt" file. Dieses File erkennt der Query als Parameter und führt Abfragen automatisch zum geöffneten Kunden aus.

Viele weitere Parametermöglichkeiten und Funktionen wie die Vergabe von Aliasnamen oder der integrierte Reportgenerator sorgen so für eine wirklich anwenderfreundliche Auswertungslösung.

Mehr Infos unter http://www.imcs-systeme.de/query-report-writer.html

Bei Interesse an einer Onlinedemo einfach melden. Lizenzkosten sind sehr preisgünstig!

MFG
Heinz Molter