× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Gary, because it's a journal extract on a keyed file the keys are an issue.

For example, the PO header has a key of POnumber.  So in the extract there would be a before and after image with the same POnumber.

Thanks,

Rob

On 2/22/2019 2:58 PM, Gary Monnier wrote:
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=


As an Amazon Associate we earn from qualifying purchases.

This thread ...

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.