×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




Thanks for your reply Jon
What you suggested, we do in fact use in a number of different RPG programs

However, what I am looking for was a quick reply, with an answer we could use in an SQL query today - without creating a new procedure in a service program that would take time in testing and promoting to production (couple of weeks to accomplish this)

Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Jon Paris
Sent: Thursday, October 25, 2018 11:36 AM
To: Midrange-L Midrange-l <midrange-l@xxxxxxxxxxxx>
Subject: [EXTERNAL] Re: Creating an SQL function using C routines

Basically a C function/procedure call is no different than calling any other ILE language.

But given your example I'm not clear why you need to use C routines at all. From your example a simple re-mapping of char to zoned would give you the right result.

In RPG terms.

Dcl-ds *n;
charVal char(5);
numVal zoned(5) overlay charVal;
end-ds;

charVal = charField;

// At this point numVal (positive or negative) is usable.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Oct 25, 2018, at 10:23 AM, Alan Shore <ashore@xxxxxxxx> wrote:

Hi everyone
Before I forget, we are on V7r3

I know how to create an SQL function using procedures in service
programs and have done so many times My question is, Is there a way to
create an SQL function using C routines Without going into the "why
the %$^^ did you do it that way' explanation, we have a number of
fields that are numeric, but stored in alpha fields, where we have to
use the C routine QXXZTOI to convert it from alpha to numeric If the
numeric value is positive - then there is no problem in seeing what
the numeric value in the alpha field is However, if the numeric value
is negative - then a process I know as over punching (back from when
cards were used) is in effect For example The value '0001}" is really
-10 The value '0002J' is really -21

Now trying to use SQL against fields such as this becomes a no no
Hence my request

I have tried googling for the answer to this, but so far, nothing

As always, any and all answers welcome

Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [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: 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 thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.