2,838 questions
1
vote
1
answer
51
views
RPGLE error "RNF3438 30 LIKE keyword is expected but not found; definition is ignored."
I am new to programming with RPGLE I was trying to write a simple code to read data from a file and displaying it in the screen. While doing it I get errors:
RNF3438 30 000600 LIKE keyword is ...
- 13
0
votes
1
answer
39
views
How to return a multidimensional ds in a procedure called in a different main program
Here i have defined the procedure which is returning a Orderds of dim 256,In debug its getting the right value but when called in the main program only first row is printed 256 times.
Module in which ...
0
votes
1
answer
48
views
On IBM Power Systems / AS400 files are not found in library list when using dynamic SQL
Scenario:
Table 1 is in library lib1
Table 2 is in library lib2
Library List is set as lib1, lib2
When I use dynamic SQL like:
sqlcmd = 'select ''1'' from table1 a join table2 b on a.id = b.id';
...
- 11
0
votes
0
answers
30
views
Convert a list of from columns to rows grouped by customer name via SQL [duplicate]
I have scoured Stack overflow for solution and I see solutions that dance around my question but miss the mark...so here goes -
I have a file that looks like the following -
CustNam
Balance
Curr
AAA
...
- 25
0
votes
1
answer
50
views
SQL table that will report Fld1 when criteria is met and will report Fld2 when criteria is met UNLESS Fld1 is already added to the table
All,
Imagine you have a database (File: INPUTPF) that looks as such...
Rec No
Client_Name
Class
Fld1
Fld2
1
Abbey
123
Y
2
Abbey
999
Y
3
Abbey
234
Y
4
Bill
222
N
5
Bill
333
Y
N
6
Bill
444
Y
N
...
- 25
0
votes
1
answer
53
views
CL Programming AS400: check fisical file members
Good morning,
with the STRSEU command I should query several physical files in a library and check if among the different fields in the various files there is the field beginning with DT. For each ...
1
vote
2
answers
51
views
JTOpen Bulk configuration
I wanted to ask something related to the Java AS400 connection driver, that is, JTOpen, and it is about whether it has a URL parameter similar to that of PostgreSQL:
jdbc:postgresql://localhost:5432/...
- 11
1
vote
1
answer
58
views
Any tool or command to export meta-data from iBM DB2 Webquery to file eg. XML?
Would like to export ALL META-DATA from existing iBM-i DB2 Webquery to file eg. .xml type of file for a client as they want to have their webquery reports meta-data migrated to other solutions. They ...
- 13
0
votes
1
answer
53
views
pyodbc w/ iSeries Access ODBC Driver: TABLE in DATABASE not valid for operation. (-7008) (SQLExecDirectW)')
i have a problem with pyodbc, commiting an update statement in python to a as400/db2 - this is my code:
class CDP_ODBC():
def __init__(self):
self.cnxn = pyodbc.connect(
'DRIVER=...
- 143
1
vote
1
answer
93
views
JDBC ResultSet has more data than selected
I am selecting data from an AS/400 database from different tables using a change indicator. I then export the data to a file and mark the data as exported by updating this change indicator.
While this ...
- 3,008
0
votes
1
answer
95
views
In GENERATE_SPREADSHEET SQL on IBM i there are problems if a $ character is present in qualified names
If you have a library that begins with a $, such as $BASDTA it seems to throw off the GENERATE_SPREADSHEET scalar function when used in embedded SQL (i.e. exec sql...). At runtime it does not ...
- 23
0
votes
1
answer
49
views
AS400 SQL - Select records from a file where there are unique values based on the grouping of multiple columns
I run an SQL for a user and it work perfect! The code is pretty straight forward delete a table, create a table where we examine coulmn1 & group by coulmn1. Write out to the table any all data ...
- 25
0
votes
2
answers
118
views
SH variable in QSH on IBM i
I am trying to run a shell script in QSH of IBM i. It seems there is a problem in the system translating the variables due to the curly braces used in the script. Has anybody encountered this and know ...
- 11
1
vote
1
answer
47
views
Get a message during a submitted job
Hello everyone (first thing sorry for my english, it's not my native language),
I have a basic clle program, the purpose is to count the file total size in a library. At the end the programm should ...
- 11
0
votes
0
answers
32
views
Subfile Crud Operation Invalid Option Logic
When we enter any invalid option on the main screen the reverse image and pc is turning on for every subfile field,
//***************************************************************************
//* ...
0
votes
3
answers
119
views
System Power / AS400 - Embedded sql Cursor initial Fetch is slow
On my System Power / AS400,
i'm using embedded sql in an RPGLE Program to write a Subfile.
On a large selection the initial fetch is to slow.
When i scroll the speed is good.
Even though i only select ...
- 11
0
votes
1
answer
81
views
How to add logical operator on logical source file
I have this logical source file:
A S VALIDFLAG CMP(EQ '1')
A S ITEMPFX CMP(EQ 'PF')
But it seems that it works as an OR when I use the logical ...
- 49
1
vote
1
answer
74
views
How to find the list of jobs that a given program is being used in ? For a AS400 (i-series) system [closed]
Suppose I have a program , say PGM1 , I want to find the list of JOBS that are using this program.
Is there any way of getting the list of JOBS using a particular program in AS400 (i-series)?
- 787
0
votes
1
answer
74
views
Is there a way to simultaneously change password for numerous user account simultaneously in IBM AS/400?
I am new to IBM AS400. Recently there is a need in my company to implement a 90 days password change for all users. The problem is some users won't change their password even if we already notify them ...
- 315
-2
votes
1
answer
74
views
getting org.springframework.jdbc.UncategorizedSQLException: SQL state [HY109]; error code [-99999]; Cursor position not valid
I am getting the below exception whenever i run a method which run the following query.
org.springframework.jdbc.UncategorizedSQLException: PreparedStatementCallback; uncategorized SQLException for ...
0
votes
1
answer
68
views
Provide full data on DSPJRN output file
I'm using the command DSPJRN having the parameter OUTPUT(*OUTFILE). One of the output file column is JOESD which contains the specific data for the journal. But the field length is only 100. Is there ...
- 49
0
votes
1
answer
113
views
Specified provider is not supported IBMDA400
A Microsoft SSIS (Sql Server Integration Service, as a dtsx file) was handed to me by a fellow co-worker, but when I open it in Visual Studio 2019 and try to edit one of its connections I get an error ...
- 311
0
votes
1
answer
100
views
Translate SUMIF from Excel to SQL
I need to extract in Excel invoices from AS400 table but there are just values from each line is not the total amount of the invoice. Now I have query to extract each line of the invoices to Excel and ...
2
votes
1
answer
90
views
What are "EVFTEMPF01" files created by RDI and how to prevent them?
I discovered today the source files "EVFTEMPF01" and "EVFTEMPF02". I was unable to find out what they are and under which circumstances the RDI is creating them. The Files have ...
- 93
0
votes
2
answers
92
views
CPF5149 with a setll *loval
I get the following error when I try to setll s a logical file
he is my code :
H OPTION(*NODEBUGIO:*SRCSTMT) dATFMT(*DMY)
FOPRBAS00 IF E DISK extfile('...
- 59
0
votes
1
answer
62
views
Display File with interactive operations and an autorefreshing clock
I am curious if it is possible to have a Display File with a clock that updates every second and you still can work on it interactively. Like a menu where you can choose programms and still having a ...
- 93
0
votes
2
answers
127
views
IBMi SQL stored procedures - how to set comma / decimal point in numbers
I am working on IBMi where whole number and fraction is represented by comma instead of decimal point (eg: 123,45 instead of 123.45).
This seem to be causing SQL functions to fail.
Example:
SUBSTR(...
- 39
-1
votes
1
answer
51
views
as400 (IBMi) journals for analysis [closed]
IBM i journals seem primarily designed for recovery and replication.
We can display or print contents of journal (DSPJRN) or apply changes back to database in case of a restore (APYJRNCHG).
examples:
...
- 39
0
votes
2
answers
84
views
Program source code gets truncated while copying. Width is less by 20 characters
I copied a RPGLE source from Production Library to my programmer's library so that I could modify the code but the characters at the end got truncated. Please help.
I can see that the length is 100 in ...
0
votes
3
answers
155
views
Batch update a column from a Select in AS/400
I am trying to use this update statement in order to fill a column Name in a table called MD001 from a table called Patient
MD001(MRN, Name, Address)
Patient(CaseNo, FName, MName, LName,...)
UPDATE ...
- 627
4
votes
3
answers
102
views
In what ways can I use the DUP keyword in DDS for the IBMi?
TLDR
In what ways can I define DUP in a DDS file that I haven't tried?
Note: I don't care about the RPG to hook it up. I'm only looking at the Display File definition.
In a perfect world, someone out ...
- 41
0
votes
1
answer
76
views
Auto Login to WINS in Batch File using iSeries
This one is difficult to find information for as the product is no longer Produced. IBM had a product called WINS that ran on the iSeries and connected to the AS400. My company still uses it and we ...
- 805
0
votes
1
answer
74
views
Determining Which System Values Have Been Changed and By Whom in iSeries AS400
I have Question Related to AS400 in a Healthcare setup, I want to Determine a specific system Value have been Changed and By Whom , For suppose a requisition of a lab test CBC is generated by User ABC ...
0
votes
0
answers
51
views
SQLRPGLE delete statment
I'm using a sqlrpgle to insert rows from table A into table B, then I'm deleting rows from table A using another query. At the end, I'd like to retrieve the number of rows deleted following the ...
- 59
0
votes
3
answers
166
views
restore an ibm db2 from a savf file
I have a .savf file that someone created from an IBM DB2 S400 server to transmit a database to me.
I installed db2 server community edition on Ubuntu. My install works, as I was able to create a test ...
- 59
0
votes
1
answer
89
views
Translate to foreign languages in SQL query
I am trying to figure out how to translate names stored in an AS/400 table called Clients (ID, FNAME, MNAME, LNAME,...) into foreign languages. The first attempt is doing that into Arabic.
The DB ...
- 627
0
votes
1
answer
235
views
AS400 WRKACTJOB + Opt.7=Display message (MSGW) --> What command is it?
I would like to know, which command I could use when you do a WRKACTJOB + OPT.7=Display message. It exist a command or script to achieve?
This is because I'm doing a monitor with SQLRPGLE and from ...
- 59
0
votes
1
answer
132
views
Need help for the IBM COBOL Program Status Clause
I need a function or procedure to retrieve a username, libraryname, modulename, etc. from the active running program. The IBM documentation tells me something about "program status structur"!...
0
votes
1
answer
50
views
Is there a way to transpose a data in WRKQRY in SMART400?
I have the data:
T1 A1
T1 A2
T1 A3
T2 B1
T2 B2
Is it possible to make it like this using WRKQRY:
T1 A1 A2 A3
T2 B1 B2
- 49
1
vote
1
answer
73
views
How to call program while debugging in CLP program
I have this CLP:
PGM
/* 1st command */
CRTCBLPGM PGM(QTEMP/TESTPGM) +
SRCFILE(MYSRC/QLBLSRC) +
OPTION(*SRCDBG)
/* 2nd command */
STRISDB PGM(QTEMP/TESTPGM) +
INVPGM(*NO) + ...
- 49
0
votes
5
answers
219
views
I-Series RPGLE function to test multiple bits in array for a value
I'm trying to determine if there's a more efficient coding technique I can use for an if statement. I have a bit array that can contain 128 bits, either 0 or 1. Currently, my code looks like this:
if ...
- 3
2
votes
3
answers
345
views
RPGLE File declaration
I need to write a program that reads a file from library 1 and writes it to another file in another library. The problem is that both files have the same name and format.
I've tried renaming the ...
- 59
0
votes
0
answers
88
views
ODBC Driver continuing to fail credential authentication
I am currently using an ODBC driver to pull in several tables from an IBM AS400 system. I have been able to connect the tables, build reports refresh data etc. on a fairly consistent basis, however I ...
0
votes
1
answer
179
views
File not found even if it is existing
I have a CLP which declares a file:
DCLF FILE(QTEMP/TEMPFILE)
When I compile it, it will have an error:
CPD0852 30 File TEMPFILE in library QTEMP not found.
So, I tried to create ...
- 49
0
votes
1
answer
220
views
Files stay open after close in SQLRPGLE
I have the SQLRPGLE code below showing my access and close - yet after the program runs the files (MONEWAS3 and WELFARE) stay open as verified by looking at "Display Open Files" for the ...
- 47
0
votes
1
answer
119
views
DB2/400 - How to use DBUJRN command when there are no entries returned from journal?
Longtime reader, first question ever!
I'm trying to write a stored procedure in DB2 that will periodically write journal entries to a file using a batch job, with the DBUJRN tool. The problem I'm ...
- 1
0
votes
0
answers
43
views
Cannot resolve to object VAT111. Type and Subtype X'0201' Authority X'0000'
My 'VAT111' RPGLE program is in the VTAX library and I try to call this VAT111 from the MAUTINV RPGLE program in the QDEVLIB library. I got the issue [Cannot resolve to object VAT111. Type and Subtype ...
- 21
0
votes
0
answers
66
views
A cursor locks a file but doesn't release it (AS/400 COBOL + DB2)
I have a program that uses a table both in a SQL cursor and as a file (READing and WRITE-ing it).
Now, every time the program runs a OPEN CURSOR that uses the table, I see in WRKOBJLCK that another ...
- 27
0
votes
1
answer
73
views
Is it possible to qualify a field of a non-qualified data structure?
Is it mandatory to add QUALIFIED to DS1 in order for this code to compile:
**FREE
DCL-DS DS1;
FIELD1 PACKED(5);
END-DS;
DS1.FIELD1 = 2024;
DSPLY DS1.FIELD1;
RETURN;
I know the question might ...
- 383
1
vote
1
answer
61
views
DB2 SQL list single char values at positions specified in another table
Given two tables, i want to match values at certain position of the string in table two so that i can see how many produce does one student have:
Table1:
items
ids
apple
3
banana
4
carrot
1
...
