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



Alan,

Anytime.

BTW, if you run STRQSH on a command line and check your user's job list (on
another session), you'll see that there is a program called QZSHSH, running
as BATCHI, associated with your command. Your QTEMP must be there (and
separate from your CL).

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries


On Fri, Dec 11, 2009 at 10:21 AM, Alan Shore <AlanShore@xxxxxxxx> wrote:

Thanks for your reply Luis
Now that makes sense


Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill



Luis Rodriguez
<luisro58@xxxxxxx
om> To
Sent by: Midrange Systems Technical
midrange-l-bounce Discussion
s@xxxxxxxxxxxx <midrange-l@xxxxxxxxxxxx>
cc

12/11/2009 09:49 Subject
AM Re: question on STRQSH and grep


Please respond to
Midrange Systems
Technical
Discussion
<midrange-l@midra
nge.com>






Alan,

I believe that QSH has its own QTEMP, separate from the one your job uses.

Try this:

CRTPF QTEMP/TEST RCDLEN(128)
STRQSH
ls /qsys.lib/qtemp.lib

It should return an empty list.

HTH,

Luis Rodriguez
IBM Certified Systems Expert — eServer i5 iSeries


On Fri, Dec 11, 2009 at 10:00 AM, Alan Shore <AlanShore@xxxxxxxx> wrote:



Hi guys
after my last brainf@#t I am hesitant in asking the following question,
but
here goes
The following CL program works
PGM

STRQSH CMD('DB2 "SELECT TRIM(DENAPIID) || '','' || +
TRIM(CHAR(DENCLNTID)) +
|| '','' || TRIM(DENREFNO) || '','' || TRIM(DENMEMO) +
|| '','' || TRIM(DENPTCODE) || '','' || TRIM(DENPTNAME) +
|| '','' || +
TRIM(DENADD1) || '','' || TRIM(DENADD2) || '','' || +
TRIM(DENCITY) +
|| '','' || TRIM(DENSTATE) || '','' || TRIM(DENPOSTCDE) +
|| '','' || +
TRIM(DENCNTYCDE) || '','' || TRIM(DENCNTYNME) || '','' || +
TRIM(CHAR(DENLOWLVL)) || '','' || TRIM(CHAR(DENMAXRSLT)) +
|| '','' || TRIM(DENLST2CHK) || '','' || TRIM(DENADDBTCH) +
FROM axslib.DENIEDPF" +
| GREP , > /HOME/RADPS_B12108140001.CSV')

RETURN
ENDPGM

but when I change the
FROM AXSLIB.DENIEDPF
to
FROM QTEMP.DENIEDPF

the csv file is empty
The file QTEMP.DENIEDPF contains the same data as AXSLIB.DENIEDPF


Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill

__________________

Never mind guys
I just spotted it
something about wood & trees
The problem was with the file naming convention
The coorect code should read axslib.deniedpf and not axslib/deniedpf

Sorry about that


Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill



Alan Shore
<AlanShore@xxxxxx
om> To
Sent by: midrange-l@xxxxxxxxxxxx
midrange-l-bounce cc
s@xxxxxxxxxxxx
Subject
question on STRQSH and grep
12/10/2009 05:05
PM


Please respond to
Midrange Systems
Technical
Discussion
<midrange-l@midra
nge.com>







Hi guys
I have tried to look for my answer in the archives, to no avail
I have the following CLLE program

PGM

STRQSH CMD('DB2 "SELECT TRIM(DENAPIID) || '','' || +
TRIM(CHAR(DENCLNTID)) +
|| '','' || TRIM(DENREFNO) || '','' || TRIM(DENMEMO) +
|| '','' || TRIM(DENPTCODE) || '','' || TRIM(DENPTNAME) +
|| '','' || +
TRIM(DENADD1) || '','' || TRIM(DENADD2) || '','' || +
TRIM(DENCITY) +
|| '','' || TRIM(DENSTATE) || '','' || TRIM(DENPOSTCDE) +
|| '','' || +
TRIM(DENCNTYCDE) || '','' || TRIM(DENCNTYNME) || '','' || +
TRIM(CHAR(DENLOWLVL)) || '','' || TRIM(CHAR(DENMAXRSLT)) +
|| '','' || TRIM(DENLST2CHK) || '','' || TRIM(DENADDBTCH) +
FROM axslib/DENIEDPF" +
| GREP , > /HOME/RADPS_B12108140001.CSV')

RETURN
ENDPGM

The program compiles and runs with no problems
EXCEPT the ifs file it creates
/HOME/RADPS_B12108140001.CSV
is empty, while data is in the file axslib/DENIEDPF and for the life of
me
I cannot see what is wrong.
If someone else can see my problem
as always - it would be MUCH appreciated

Thanks in advance


Alan Shore
Programmer/Analyst, Direct Response
E:AShore@xxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill
--
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.



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

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.