Re: sql to output row as csv string

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