Help with QTP UPDATE

[Ken Langendock]

Not if the resulting complex repeats the primary file.

You will get a “Record has changed since you found it” type message.

 

Ken

 

From: powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com [mailto:powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com] On Behalf Of Lloyd, Gavin
Sent: December 17, 2008 1:10 PM
To: vamsi krishna; powerh-l at lists.sowder.com
Subject: [Bulk] RE: [Bulk] Help with QTP UPDATE

 

Correct me if I’m wrong but isn’t the answer as simple as taking the alias off the output command:

 

ACCESS OPTICLEN                                                         &

   LINK CUN                                                             &

     TO CUN OF *$PIC_DATA/OPBEUROD_S                                    &

   LINK CRY OF OPBEUROD_S                                               &

     TO CURR-CODE OF IPTIEURO 

                                           

SELECT IF CLAIM-CURR="SKK"

 

OUTPUT OPTICLEN UPDATE

   ITEM CLAIM-CURR OF CLEN_UPD ="EUR"

 

This way you will directly update the records that are being read rather than linking back to the record which is what the alias makes QTP do.  My Powerhouse is getting rusty these days so excuse me if I’ve given dodgy advice!

 

Regards,
Gavin.

 

From: Ken Langendock [mailto:ken.langendock at rogers.com] 
Sent: 17 December 2008 15:51
To: 'vamsi krishna'; powerh-l at lists.sowder.com
Cc: 'mRiDuLa'
Subject: RE: [Bulk] Help with QTP UPDATE

 

The problem is you are creating a record complex that may result in the same record being ready to update more than once.

 

What you need to do is get the record complex down to One in and One out.

Use output phase reading and move your select statement. And QUALIFY YOUR STATEMENTS

 

Ken

 

ACCESS OPTICLEN

 

OUTPUT *$PIC_DATA/OPBEUROD_S &

       ADD &

       UPDATE &

       NOITEMS &

       IF 1 EQ 2 &

       VIA   CUN &

       USING CUN OF OPTICLEN 

 

 

OUTPUT IPTIEURO &

       ADD &

       UPDATE &

       NOITEMS &

       IF 1 EQ 2 &

       VIA   CURR-CODE & 

       USING CRY OF OPBEUROD_S 

                                          

 

OUTPUT OPTICLEN &

       ALIAS CLEN_UPD &

       UPDATE &

       IF CLAIM-CURR OF IPTIEURO = "SKK"

 

   ITEM CLAIM-CURR OF CLEN_UPD FINAL "EUR"

 

 

From: powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com [mailto:powerh-l-bounces+ken.langendock=rogers.com at lists.sowder.com] On Behalf Of vamsi krishna
Sent: December 17, 2008 9:07 AM
To: powerh-l at lists.sowder.com
Cc: mRiDuLa
Subject: [Bulk] Help with QTP UPDATE

 

Hi All,

 

I need to update an indexed file which has no unique key, but all "repeating primary" and "repeating alternate" indexes.

 

 

When i compile the program, I get the following warning:

*W* Linkage should be via a unique key/index if the file is output only.

 

Program is something like this:

 

ACCESS OPTICLEN                                                         &

   LINK CUN                                                             &

     TO CUN OF *$PIC_DATA/OPBEUROD_S                                    &

   LINK CRY OF OPBEUROD_S                                               &

     TO CURR-CODE OF IPTIEURO 

                                           

SELECT IF CLAIM-CURR="SKK"

 

OUTPUT OPTICLEN ALIAS CLEN_UPD UPDATE

   ITEM CLAIM-CURR OF CLEN_UPD ="EUR"

 

I realize when the QTP runs, the control breaks are set on the primary index by default, and the output update runs on next unique value of repeating index.

So, all the needed records in the selection are not updated.

It would be of great help if I can set a control break so that every record in selection is updated.

Correct me if I am going anywhere, or any other perfect way of updating such files.

We have PowerHouse  8.43.D on Solaris SunOS.

 

Thanks in advance.

 

Regards,

Vamsi

-- 
"Nothing is impossible as impossible itself says i m possible"

 

No virus found in this incoming message.
Checked by AVG.
Version: 7.5.552 / Virus Database: 270.9.18/1852 - Release Date: 16/12/2008 6:11 PM

 

No virus found in this outgoing message.
Checked by AVG.
Version: 7.5.552 / Virus Database: 270.9.18/1852 - Release Date: 16/12/2008 6:11 PM

 

Registered No. 755780 England

Registered Office: FM Insurance Company Limited

1 Windsor Dials, Windsor,

Berkshire, UK, SL4 1RS

Regulated by the Financial Services Authority.

VAT No. G.B.: 792 4276 02

 

No virus found in this incoming message.
Checked by AVG.
Version: 7.5.552 / Virus Database: 270.9.18/1852 - Release Date: 16/12/2008 6:11 PM

 

No virus found in this outgoing message.
Checked by AVG.
Version: 7.5.552 / Virus Database: 270.9.18/1852 - Release Date: 16/12/2008 6:11 PM

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.sowder.com/pipermail/powerh-l/attachments/20081217/3ac6fba7/attachment-0001.htm