MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » June 2014

Re: multiple SQL in 1 Crystal report



fixed

My question? Why? Just create a stored procedure in RPG and return the
result set to the Crystal Reports. The business logic is where it belongs,
on the iSeries and presenting is the Crystal.


On Thu, Jun 26, 2014 at 4:00 PM, Hoteltravelfundotcom <
hoteltravelfun@xxxxxxxxx> wrote:

HI I have replicated functions from RPG program into SQL's.

I can make each sql as a VIEW. But would like to load them into the CR as
one unit. But the CR rejects more than one. But is this a CR issue or is
there syntax needed to run more than 1 CR.
I think I want to keep these separately coded, as we are showing orders in
various forms of progress i.e. Picking, engraving etc. I want in 1 cr for
tedious wise, there are many screens of RPG i have to do and each time to
make a VIEW is time consuming if there is an alternatives.

SELECT count(*)as Picking
FROM
CCDTA.OEORH48,CCDTA.TRNSTAT2,CCDTA.OETRA99
WHERE OHCOM# = TSCOM# AND OHORD# = TSORD#
AND (otCOM# = OHCOM# AND OTORD#= OHORD# AND ottrnc = 'AQC')
AND OHORDT IN('RTR','INT','SAM') AND TSSTAT IN('ECT','STP')
AND OHREQD = replace(char(current date, iso), '-', '') AND
OHHLDC = ' 'AND OHORD# in(SELECT a.TSORD# FROM ASTCCDTA.TRNSTAT2 a
WHERE a.tsstat IN('AEP','BGE','EAS','REL','STP'));


SELECT count(*) as LaserENG FROM
CCDTA.OEORH48,CCDTA.TRNSTAT2,CCDTA.OETRA99
WHERE OHCOM# = TSCOM# AND OHORD# = TSORD#
AND (otCOM# = OHCOM# AND OTORD#= OHORD# AND ottrnc = 'AQC')
AND TSSTAT IN('EAS','REL','SCC')
AND OHORDT IN('RTR','INT','SAM')
AND OHREQD = replace(char(current date, iso), '-', '') AND OHHLDC =
' '
--
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.







Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot 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 here. If you have questions about this, please contact