You're jumping over things again - there are important gaps in what we
1. This member is NOT where the data resides. If that is what you think,
then disavow yourself of that notion instantly
2. This member is the source code for CREATING the table where the data
a. That table is names DTAWHS and it is located in library PROJ_MKWN1
3. I'm glad you keep asking questions, BTW, because it seems things that
are "obvious" to those who've been on the platform for awhile - that
they are not "obvious" to you - maybe you've been pushed into doing
these tasks, I think you've hinted at that.
4. So you will need to use this member to create the table, and the
command for that is RUNSQLSTM, where you specify this member, and out
comes an SQL table (also know as a PF).
5. You CAN make an index on that table, and if you are at a newer
release, there is more you can do, but I don't think you will need to.
So now I have to ask, how does the data get into DTAWHS? Or does that
table already exist and has been in production?
On 1/30/2014 5:36 PM, Hoteltravelfundotcom wrote:
I wanted to index the invoice number as we are adding this processing. THe
current report has 2 tables linked by part #. this new table has the
invoice amt. data which they wish to add to the report.
On Thu, Jan 30, 2014 at 6:32 PM, Hoteltravelfundotcom <
It would be processed in the reporting tool, on the PC side.
On Thu, Jan 30, 2014 at 6:24 PM, Buck Calabro <kc2hiz@xxxxxxxxx> wrote:
On 1/30/2014 5:58 PM, Hoteltravelfundotcom wrote:
the source for the DTAWHS is thisNow we're getting somewhere.
CREATE TABLE PROJ_MKWN1/DTAWHS (
CUSTOMER# CHAR ( 8),
NAME CHAR (40 ),
CITY CHAR (30 ),
STATE CHAR (3 ),
COUNTRY CHAR (3 ),
ZIP_CODE char (10 ),
ITEM# CHAR (15 ),
ITEM_TEXT CHAR (40 ),
ORDER# CHAR (8 ),
ORD_STATUS CHAR (2 ),
INVOICE# CHAR (8 ),
ORD_DATE NUMERIC (8 , 0),
INV_DATE numeric (8 , 0),
ORD_TYPE CHAR (3 ),
CUST_TYPE CHAR (3 ),
PROD_LINE CHAR (3 ),
SALES_REP CHAR (3 ),
WAREHOUSE CHAR (3 ),
The source you posted above is stored in the source file QDDSSRC in
member DTAWHS. This is probably processed via RUNSQLSTM. The fact that
the member type is TXT is irrelevant to your question because the member
type is only important to SEU, PDM and RDi (editors and compiler front
On Thu, Jan 30, 2014 at 5:43 PM, Hoteltravelfundotcom <a
here is the official info on this file. Note that in the DDS it is has
Once someone processed the source (CREATE TABLE), the database managerTYPE of TXT, yet, on an Library level view, it has an attribute of PF.
File . . . . . .
Library . . . . PROJ_MKWN1 Position to . . . .
Type options, press
2=Edit 3=Copy 4=Delete 5=Display 6=Print
8=Display description 9=Save 13=Change text 14=Compile 15=Create
Opt Member Type Text
DATAWHS_PT LF Part #
DTAWHS TXT Create Table - SQL
SADTAW1F PF SA OutPut-Name/Add/Address (Ted
SADTAW1FX PF SA OutPut-Name/Add/Address (Ted
created a table - a PF. As you show below, that table is in fact a PF
and it is called DATAWHS.
toCMKWNDTW *PGM CLLE 90112 Clear and Add
MKWNDTW *PGM RPGLE 487424 SA Detail File
CSUBINV4 *PGM CLLE 102400 SA Ext Rpt:
Now for your question.Mis
SUBINV3 *PGM RPGLE 1200128 Make Inv Dates
DATA_WHSV3 *FILE LF
* DTAWHS *FILE PF
DTAWHST *FILE PF
QCLSRC *FILE PF 118784 CL Source
QDDSSRC *FILE PF 106496 DDS Source
QRPGLESRC *FILE PF 405504 RPGLE Source
The table DATAWHS is not a view, it is a table in SQL parlance, or a PF
to a native OS programmer. It looks as if someone has created at least
one view (or LF) called DATA_WHSV3.
Do you want to access DATA_WHSV3 by a different key? Why? Is it
because there is select/omit criteria? Generally, one would do a CREATE
VIEW over the base PF (table), not over another logical file. If you
already had a VIEW (and I don't see that here), then you'd do a CREATE
INDEX to give the database manager some hints on how to optimise SQL
Let's assume for the moment that you had a VIEW with a key - how would
you be accessing it? SQL SELECT (including embedded SQL)? Query/400?
ODBC? RPG READE? OPNQRYF?
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
This mailing list archive is Copyright 1997-2015 by MIDRANGE dot 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 here. If you have questions about this, please contact