Re: sql to output row as csv string

How do you know there isn't? :-)
How does CPYTOIMPF do it? Last time I ran it under debug the amount of
SQL under the covers was rather intense. One reason rolling your own
using IFS APIs often runs faster.

Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1
Group Dekko
Dept 1600
Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





From: "Jay Vaughn" <jeffersonvaughn@xxxxxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Date: 09/20/2018 10:22 AM
Subject: Re: sql to output row as csv string
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>



vernon - they are mixed data types...

the cpytoimpf produces a string that leaves the " " off the numeric values
of course.

I can't believe there is not a function to convert an entire row (mixed
data type columns) into
a comma separate string... to be used in such as way as the following...

select highlyDesiredFunctionToGetCSVString(a.*)
into :g_csvString
from myTable

grrrrrr

On Thu, Sep 20, 2018 at 10:11 AM Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>
wrote:

Jay, one issue I see is about data types - are all the columns alpha,
all numeric, or a mix? It seems that something like CPYTOIMPF, which
uses data types internally, is needed somewhere in the process. Not
saying it has to be that, of course.

I'm sorry I don't have a suggestion, just raising a question.

Cheers
Vern

On 9/20/2018 6:52 AM, Jay Vaughn wrote:

don't want the result set to land in a .csv file (cpytoimpf would do
that)... i want the csv formatted row returned to the pgm

On Wed, Sep 19, 2018 at 4:48 PM <dlclark@xxxxxxxxxxxxxxxx> wrote:

"MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx> wrote on 09/19/2018
04:40:15 PM:

you can call an external rpg from the sql stored procedure, that can

then

execute the cl command... but wayyyy too much engineering for what

I'm

trying to accomplish...
but thx for the ideas.

It is easy to call a CL command or CL program from an SQL

MAIN

stored procedure. IBM provides a stored procedure definition for the
QCMDEXC program. So, you can use it like this:

Declare Str1 VarChar(5000);
Declare StrLen Decimal(15,5);

Set Str1 = 'CALL UTSETLLCL (''' || CompNumb || ''' *FIRST)';
Set StrLen = Length(Str1);
Call QCMDEXC (Str1, StrLen);


Sincerely,

Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300

Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331

*********************************************************************************************

This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or

proprietary

information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and

all

copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or

privilege

is waived or lost by any error in transmission.

*********************************************************************************************

--
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: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our

affiliate

link: http://amzn.to/2dEadiD

--
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: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

--
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: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD


--
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: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD