Ok the manager wants it like this :

Pgm reads a file containing the names of other files and the field
name corresponding to the client number.

Pgm must copy from the file in *CURLIB to the file of the same name in
LIBx ( parameter), replacing value of "field name corresponding to the
client number" with client number(parameter).

Manager wants to avoid temporary intermediate file. A DS is not
possible as the file name is only known at run time.

I expect it is technically possible to construct the sql needed to do this :
1. Get name of file to copy
2. Get field names of file to copy.
3. Build SQL insert :





2012/7/19 Charles Wilt <charles.wilt@xxxxxxxxx>:
Well if you prompt the select in STRSQL

You can easily prompt the field selection, then it's just a matter of
putting a 1 in 300 fields...bingo you have your fields :) Or copy the
names from the 5250 screen to a text editor...

If you happen to have SQuirreL SQL Client, I think you could drag and
drop the field names...

Charles

On Thu, Jul 19, 2012 at 10:17 AM, Dave <dfx1@xxxxxxxxxxxxxx> wrote:
There's only about 300 field names in the files!
But Aaron has given me an idea :
create table temp as select client n etc
update temp set client x etc

then insert

2012/7/19 Charles Wilt <charles.wilt@xxxxxxxxx>:
have to specify the other columns on the select

insert into myfile
select 'x', fld2, fld3,fld4, <...>
from myotherfile

Charles

On Thu, Jul 19, 2012 at 9:39 AM, Dave <dfx1@xxxxxxxxxxxxxx> wrote:
Hi,
I need to do this on a bunch of files :

insert into myfile
select *from myotherfile where clientnumber = 'n'

problem is, I want to set the clientnumber that is written to myfile to 'x'.

Possible?
--
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: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
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: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


--
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: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
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: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

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

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