Re: Removing keys from Keyed Physical File

Unless the keys aren't actually an issue.

- Create your table (CRTDUPOBJ without data I assume).
- Place the JOESD field into a DS based upon its PF.
- Insert rows to your new table using the DS fields.


Gary Monnier



On Fri, Feb 22, 2019 at 11:51 AM Robert Rogerson <rogersonra@xxxxxxxxx>
wrote:

Gary, it's looking more and more that I'll have to use an sql approach.
It's just I've already coded the CRTDUPOBJ approach and I was hoping I
could still use it. But it's looking like I won't be able to.

Thanks,

Rob

On 2/22/2019 2:42 PM, Gary Monnier wrote:

Have you tought about using SQL's create table?

Gary Monnier



On Fri, Feb 22, 2019 at 11:29 AM Robert Rogerson <rogersonra@xxxxxxxxx>
wrote:

Rob, that was my first thought as well.

Message ID . . . . . . : CPD32B1 Severity . . . . . . . :

20

Message type . . . . . : Diagnostic
Date sent . . . . . . : 02/22/19 Time sent . . . . . . :
11:17:11

Message . . . . : Constraint cannot be removed from file PWDTLPROB.
Cause . . . . . : Constraint *ALL cannot be removed from file
PWDTLPROB in
library TSXROBWRK for TYPE value *ALL, RMVCST value *REMOVE. The
constraint
was not removed because of errors. The reason code is 12. The

reason

codes
and their meanings are as follows:
01 - CST(*CHKPND) and TYPE(*UNQCST) or TYPE(*PRIKEY) not valid.

11 - Error with QADBFCST cross reference file.
12 - File has no constraints.
13 - Check constraint associated with the primary key cannot be
removed

Also if I look for indexes in TSXROBWRK there are none. But I right
click on the file in Schemas and Work with Indexes then there is one row
with the same name as the phsysical file. And it's type is Keyed
Physical file

But thanks,

Rob

On 2/22/2019 2:11 PM, Rob Berendt wrote:

Can you try RMVPFCST?
I have used ADDPFCST to create a key over a file created by DSPUSRPRF

OUTPUT(*FILE)...

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of

Robert Rogerson

Sent: Friday, February 22, 2019 2:02 PM
To: Midrange Systems Technical Discussion <

midrange-l@xxxxxxxxxxxxxxxxxx

Subject: Removing keys from Keyed Physical File

Hi all,

I'm trying to create a journal extract file which will format JOESD

from

DSPJRN.

I have it more or less working. I use CRTDUPOBJ of the journaled file

and then ALTER TABLE to add the journal fields.

As I said I have this working. The problem I just found was that the

CRTDUPOBJ still creates a keyed physical file.

Before I change the process to an all SQL solution I'm wondering if

anyone knows a way to remove the keys from the keyed physical file.

I haven't found a way but I thought someone else may of a way. If not

I'll use and sql approach...

Thanks,

Rob

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To

subscribe,

unsubscribe, or change list options,

visit:

https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=lpNHDiXz6Q8qa3KDrjnc_-T8XVNsvoMVm8FRpnGS2s8&e=

or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at

https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=kCjOZ8TltTP9CD9MQlF917eslXHWXFpD4-HamK4CHAU&e=

.

Please contact support@xxxxxxxxxxxx for any subscription related

questions.

Help support midrange.com by shopping at amazon.com with our affiliate

link:

https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=5Z235dCJ_OuHEu7tGPP5O4QFnhnpxI3W58WBstgPa8M&e=

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:

https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=lpNHDiXz6Q8qa3KDrjnc_-T8XVNsvoMVm8FRpnGS2s8&e=

or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at

https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=kCjOZ8TltTP9CD9MQlF917eslXHWXFpD4-HamK4CHAU&e=

.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:

https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=J_Y1kOzkjopkN_Ddna88Pum6PgenEUn_5urhsiRXsX0&s=5Z235dCJ_OuHEu7tGPP5O4QFnhnpxI3W58WBstgPa8M&e=
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=8FEMA5dqaTrmYDYl8cvCW_7fRR67qGEimcOJuMcnt3M&s=I6P6Bz4U5--0J-LLbh_Vbo5t0-2c0uqh15WLRgT7sIM&e=
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=8FEMA5dqaTrmYDYl8cvCW_7fRR67qGEimcOJuMcnt3M&s=4OXwPb7PFOQR45X_oYXq9aUQbum_4YLpFi2QYy2xwbg&e=
.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:
https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwIGaQ&c=pApUd0AUA6FmKRo01iR_VA&r=r7w16KGEqE6t2tVCvCsz4_ztz5b0wbCtdhwrG0PzYq8&m=8FEMA5dqaTrmYDYl8cvCW_7fRR67qGEimcOJuMcnt3M&s=rao3UJKg_zy5_ElwCYyG_v7S7ap_oKprjy4l8gimjgA&e=