RE: multiple SQL in 1 Crystal report

["Paul Nelson" <nelsonp@xxxxxxxxxxxxx>]

So purchase SEQUEL. Embed the RPG into a script that ends with producing the
report.

Paul Nelson
Cell 708-670-6978
Office 409-267-4027
nelsonp@xxxxxxxxxxxxx


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Hoteltravelfundotcom
Sent: Thursday, June 26, 2014 5:15 PM
To: Midrange Systems Technical Discussion
Subject: Re: multiple SQL in 1 Crystal report

but it won't be dynamic data that way. The RPG would need to be run. the
other issue with making a view is you have to replicate whatever logic is
on the logicals that are used.


On Thu, Jun 26, 2014 at 6:04 PM, Alan Campin <alan0307d@xxxxxxxxx> wrote:

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