Need help with SQLRPGLE program to obtain active job details

[mgarczynski]

I have written a program using the new SQL based features to obtain status from the Active jobs on my system. My routine is to check for active subsystems before a shutdown. If they are found and active, I want to know if there are any jobs running in that subsystem as sometimes the shutdown, ends...

[user13482104]

Hello dear community,
I'm currently having trouble with an insert. I can't get an insert. In the debug I saw that the SQLCOD was set to -7008 (object-name NOT VALID FOR
OPERATION (reason code)). I've attached an image. Can someone tell me what I'm doing wrong? I create the file in QTEMP...

[matt.perkins]

Hello all,

I am trying to compile my .SQLRPGLE program from the i Project section in RDI. The only issue I am running into is that I need to add my library before it compiles otherwise it fails to compile because my library list is not in the default library list.

The default...

[Alexis.A]

Hello,

I have an interactive program that is not working properly.
In my program, I fill in a temporary file (via SQL) and then I process the file.

Here is the SQL :
EXEC SQL insert into wfictmp1
(wservic, wimmeub, wnumcop, wdattrt)
select servic, immeub,...

[mgarczynski]

I found a service program which will wrap text for output and call it LINEWRAP. There is a Module and Service program in my library list. I also followed the instructions to create an SQL procedure. The program works fine with Interactive SQL. However, when try to code it in my SQLRPGLE program,...

[mgarczynski]

I'm trying to issue a command using QCMDEXC within an RPGLE program. The command will send an status email.
CLUNODE = NODES

The failed message is CPD0047 List or expression not valid for parameter SUBJECT. I am guessing it does not like the extra single quote in the Subject...

[mgarczynski]

I am trying to populate a subfile with data read from a master file in a particular order. The user can switch order by pressing the appropriate Function Key. The problem is the data populates the subfile based on the first statement processed all the time. I have cleared the array before launching...

[Carpiem]

Hello all,

I'm puzzled why REGEXP_COUNT returns weird results, for example take this query:

select regexp_count('1','[A-Z]')
from SYSIBM.SYSDUMMY1 

Regular expression [A-Z] means it accepts a letter from A to Z. But 1 is no letter, and the result of...

[henrymiller]

Hello,
I have a weird behaviour on a stored procedure running in QUSRWRK subsystem.
When I run the above stored procedure from ACS(Run SQL Script) it takes 21 minutes to execute.

[ 31/12/2020, 18:49:16 ] Run Selected...
CALL spgetQtyOnHand ('020', '2020-01-01' , '2020-12-31'...

[jason.aleski]

I am attempting to use a prepared statement to fetch information (a single row) about a location; based on a given ID. The location ID is either passed via parameter, or directly entered and read from the display/user interface.

I have tried stepping through the RDi debugger. I see the...

[vijayrmca]

All,

I am having one DB2 query

SELECT year(current date)*10000 +
month(current date)*100 +
day(current date-1 days),count(*) FROM mstfile.

Above query gives me the result as 20200108 ,100 as output...

[Vinoth]

Hi,

I am developing a program using Scott's yajl libraries to process the Json String into DB2 table. I have two questions,

1. More generic, we are using V 7.2 - Is it ideal to use yajl libraries or we need to consider using DATA-INTO and Json tables for efficiency. Json...

[CaptainRon]

So I have a Data structure array. I can sort on one field using the SORTA command with %subarr. Can I add another field WITHOUT combining the two fields together in a one field sort? To basically sorting on two fields or three etc..... Again without combining into one field. If I can in SQL do you...

[fountaintech]

I have what I thought was a simple statement (below)

H ALWNULL(*INPUTONLY)

select rhwhs,rhvnno,rhbol,rhcanm,rhrcdt,rhsnno,vennam,
cast (coalesce(apevthh,0) as numeric(2,0)) as apevthh,
cast (coalesce(apevtmm,0) as numeric(2,0)) as apevtmm

from...

[paolinosal]

HI all,

I was trying the systools function base64 encode and decode but I have a little problem with the decode...

here's a test case:

Create Table Testbase64(Rowid Int Not Null Generated Always As Identity (Start With 1, Increment By 1, No
Cache), Fieldutf8

...