QTP QUESTION

Lafferty, Mike Mike.Lafferty@AIG.COM
Fri, 5 Mar 1999 16:44:15 -0500


This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

------_=_NextPart_001_01BE6750.93614E68
Content-Type: text/plain;
	charset="iso-8859-1"

How would you avoid contention with concurrent users when updating just 4
items of a KSAM file using QTP....We are running PHv6.09 on an HP3000....In
batch, I got the following message.....

Thank you in advance.....Mike


24   :RUN QTPR.CURRENT.COGNOS;INFO="DICT=TM40DDC AUTO=TM2352AC"
     25   
     29   
     30   99/03/05    14:31    DRC 4.0 QUOTE SUBSYSTEM

PAGE   1
     31   
     32   Run:
     33   Request: 1
     34   
     35   
     36   Executing request 1 ...
     37
----------------------------------------------------------------------
---------
     38   Record has been changed since you found it.

 [15900]
     39      File:  QTE-POL-INDX-RCD
     40        Linkitem:  K-QP-INDEX-KEY                   108262885
     41   
     42   Action Taken: Run terminated.
     43
----------------------------------------------------------------------
---------
     44   
     45   Records read:
     46     TMQUOTE                          1,747,073
     47     QTE-POL-INDX-RCD                 1,746,573
     48   
     49   Transactions processed:               15,900
     50   
     51   Records processed:                     Added    Updated  Unchanged

Deleted
     52     QTE-POL-INDX-RCD                         0      4,213     11,686

      0
     53   
     54   Finished.
     55   
     59   
     60   Program terminated in an error state. (CIERR 976)
          ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
     61   REMAINDER OF JOB FLUSHED.
          ^^^^^^^^^^^^^^^^^^^^^^^^^
62	CPU sec. = 1029.  elapsed min. = 77.  FRI, MAR  5, 1999,  3:48 PM.


Here is the code............



SET DICT TM40DDC
SET INPUT LIMIT 2000000
SET LOCK FILE UPDATE
ACC *TMQUOTE LINK ("1" + Q-QUOTE-NO) TO &
             K-QP-INDEX-KEY OF QTE-POL-INDX-RCD
OUT QTE-POL-INDX-RCD UPDATE NOITEMS ON ERRORS BYPASS UNTIL FINAL

   ITEM K-HOUSEHOLD-NO FINAL HOUSEHOLD-NO OF TMQUOTE &
        IF K-HOUSEHOLD-NO <> HOUSEHOLD-NO OF TMQUOTE
   ITEM K-AMF-ACCOUNT-NO FINAL QP-ACCT-NO OF TMQUOTE &
        IF K-AMF-ACCOUNT-NO <> QP-ACCT-NO OF TMQUOTE
   ITEM K-U-ACCOUNT-NAME FINAL AU-ACCOUNT-NAME OF TMQUOTE &
        IF K-U-ACCOUNT-NAME <> AU-ACCOUNT-NAME OF TMQUOTE
   ITEM K-TOTAL-PREMIUM FINAL QP-TOTAL-VEH-PRM OF TMQUOTE &
        IF K-TOTAL-PREMIUM <> QP-TOTAL-VEH-PRM OF TMQUOTE

BUILD TM2352AC

------_=_NextPart_001_01BE6750.93614E68
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">



QTP QUESTION



How would you avoid contention with = concurrent users when updating just 4 items of a KSAM file using = QTP....We are running PHv6.09 on an HP3000....In batch, I got the = following message.....

Thank you in advance.....Mike


24   :RUN = QTPR.CURRENT.COGNOS;INFO=3D"DICT=3DTM40DDC = AUTO=3DTM2352AC"
     = 25  
     = 29  
     = 30   99/03/05    14:31    DRC = 4.0 QUOTE = SUBSYSTEM          &nb= sp;           &nb= sp;  
PAGE   1
     = 31  
     = 32   Run:
     = 33   Request: 1
     = 34  
     = 35  
     = 36   Executing request 1 ...
     = 37   = ----------------------------------------------------------------------
---------
     = 38   Record has been changed since you found = it.           &nb= sp;           &nb= sp;  
 [15900]
     = 39      File:  QTE-POL-INDX-RCD
     = 40        Linkitem:  = K-QP-INDEX-KEY         &nbs= p;         108262885
     = 41  
     = 42   Action Taken: Run terminated.
     = 43   = ----------------------------------------------------------------------
---------
     = 44  
     = 45   Records read:
     = 46     = TMQUOTE           = ;            = ;   1,747,073
     = 47     = QTE-POL-INDX-RCD         &n= bsp;       1,746,573
     = 48  
     = 49   Transactions processed:     &nbs= p;         15,900
     = 50  
     = 51   Records = processed:          &n= bsp;          = Added    Updated  Unchanged    =
Deleted
     = 52     = QTE-POL-INDX-RCD         &n= bsp;           &n= bsp;   0      = 4,213     11,686   
      = 0
     = 53  
     = 54   Finished.
     = 55  
     = 59  
     = 60   Program terminated in an error state. (CIERR 976)
          = ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
     = 61   REMAINDER OF JOB FLUSHED.
          = ^^^^^^^^^^^^^^^^^^^^^^^^^

Here is the code............



SET DICT TM40DDC
SET INPUT LIMIT 2000000
SET LOCK FILE UPDATE
ACC *TMQUOTE LINK ("1" + = Q-QUOTE-NO) TO &
         &n= bsp;   K-QP-INDEX-KEY OF QTE-POL-INDX-RCD
OUT QTE-POL-INDX-RCD UPDATE NOITEMS = ON ERRORS BYPASS UNTIL FINAL

   ITEM K-HOUSEHOLD-NO = FINAL HOUSEHOLD-NO OF TMQUOTE &
        IF = K-HOUSEHOLD-NO <> HOUSEHOLD-NO OF TMQUOTE
   ITEM K-AMF-ACCOUNT-NO = FINAL QP-ACCT-NO OF TMQUOTE &
        IF = K-AMF-ACCOUNT-NO <> QP-ACCT-NO OF TMQUOTE
   ITEM K-U-ACCOUNT-NAME = FINAL AU-ACCOUNT-NAME OF TMQUOTE &
        IF = K-U-ACCOUNT-NAME <> AU-ACCOUNT-NAME OF TMQUOTE
   ITEM K-TOTAL-PREMIUM = FINAL QP-TOTAL-VEH-PRM OF TMQUOTE &
        IF = K-TOTAL-PREMIUM <> QP-TOTAL-VEH-PRM OF TMQUOTE

BUILD TM2352AC

------_=_NextPart_001_01BE6750.93614E68-- = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l This list is closed, thus to post to the list, you must be a subscriber.