RE: creating a view -- RPG400-L

Well Charles - I was right, I had done something wrong
I revisited your example and realized the original OVRDBF was in fact WRONG
so I submitted
OVRDBF FILE(INPOPAXS) TOFILE(INPOP300/RMSFILES#)
MBR(M026)

where INPOPAXS is the view that I created
I then tried DBU and received a divide by 0 error
Within STRSQL I tried
select * from inpopaxs
and received the following error

INPOPAXS in INPOP300 type *FILE not found

Anyone any thoughts?

Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 06/28/2007 04:46:20 PM:

Thanks for your reply Charles, but unless I'm doing something wrong

(which

is ALWAYS possible) I still ended up looking at the view from the *FIRST
member (which is NOT the member I want)

Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 06/28/2007 04:30:26 PM:

Alan,

You're misunderstanding...

Just create the view, yes it will be over the *FIRST member in the

file.

Now before using the view, do an OVRDBF specifying the member you
want in the physical.

Ex:

PF: MYPFILE
View: MYVIEW

OVRDBF FILE(MYVIEW) TOFILE(MYPFILE) MBR(NBR25)

According to Peter it should work, and I believe it will also.

Charles

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Shore
Sent: Thursday, June 28, 2007 4:13 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: creating a view

Thanks for your reply Peter.
Sorry Peter, I know what you are saying, but for me to create
a view against the 26th member of the file, that would mean
me having to DELETE the 1st 25 members, create the view, and
then reload the DELETED 1st 25 members back is just not
feasible (although in the business I should realize NEVER to
say NEVER)

Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 06/28/2007 04:08:43 PM:

Hi Alan,

That's correct. However, you can override that view to

another member

before using it, just like you can override a physical file before
using it. When you override to a member other than the

first member

in the file, that's the only member that the view sees.

The *FIRST member is normally the first member that was

added to the

file. However, if you added 4 members, then deleted the

first two you

added, then the *FIRST member would be the one you added

3rd. Sounds

confusing, but it's actually pretty straightforward. If I do

CRTPF FILE(QTEMP/TEST) RCDLEN(1) MBR(*NONE) MAXMBRS(*NOMAX)

ADDPFM FILE(QTEMP/TEST) MBR(GEORGE)

ADDPFM FILE(QTEMP/TEST) MBR(PAUL)

ADDPFM FILE(QTEMP/TEST) MBR(RINGO)

ADDPFM FILE(QTEMP/TEST) MBR(JOHN)

DSPPFM FILE(QTEMP/TEST) MBR(*FIRST) displays member GEORGE.

Now I remove a couple of members:

RMVM FILE(QTEMP/TEST) MBR(GEORGE)

RMVM FILE(QTEMP/TEST) MBR(PAUL)

DSPPFM FILE(QTEMP/TEST) MBR(*FIRST) displays member RINGO.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

Alan Shore wrote:

Thanks for your reply Peter
With ALL the testing on this that I've done based upon the
suggestions

that

I have received (which as always is MUCH appreciated) I'm

NOT 100%

sure

of

my following reply, but I am 95% sure.
Anyway, to answer your question.
The view that gets created only has ONE member, no matter what I
tried

with

the OVRDBF, and I think (only 75% sure on this) but the view gets

created

from the *FIRST member (whatever that is)

--
This is the RPG programming on the AS400 / iSeries

(RPG400-L) mailing
list

To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx Before posting,

please take a

moment to review the archives at

http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

This e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are
not a named addressee you are hereby notified that you are not
authorized to read, print, retain, copy or disseminate this
communication without the consent of the sender and that doing so is
prohibited and may be unlawful. Please reply to the message
immediately by informing the sender that the message was
misdirected. After replying, please delete and otherwise erase it
and any attachments from your computer system. Your assistance in
correcting this error is appreciated.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing

list

To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing

list

To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.