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 =
----------------------------------------------------------------------=
FONT>
---------
=
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 =
----------------------------------------------------------------------=
FONT>
---------
=
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.
=
^^^^^^^^^^^^^^^^^^^^^^^^^
- CPU sec. =3D =
1029. elapsed min. =3D 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 &
&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.