No subject

lorcan-computers at fsmail.net lorcan-computers at fsmail.net
Wed Mar 11 10:14:47 CDT 2009


Running the following QTP code on a HP3000, but keep getting the same error, any ideas on how to get around it
Cheers

Ron
RUN STOCKS
DISPLAY " ****** Program VS4002PS Version J.01.004 *******"
SET PROCESS LIMIT 300000
SET LOCK FILE UPDATE
GLOBAL TEMPORARY GT-WK-END-DATE DATE
GLOBAL TEMPORARY GT-WK-ST-DATE DATE
REQUEST ONE
ACCESS PMATRL LINK PLANT-MAT-KEY TO PLANT-MAT-KEY OF MATRL-STOCK OPT

ITEM GT-WK-END-DATE = DATE(DAYS(WK-END-DATE(13))+7) &
     IF GT-WK-END-DATE = 0 ELSE GT-WK-END-DATE
ITEM GT-WK-ST-DATE = WK-END-DATE(13) &
     IF GT-WK-ST-DATE = 0 ELSE GT-WK-ST-DATE
SORT ON PLANT-MAT-KEY OF PMATRL
OUTPUT MATRL-STOCK UPDATE ADD ON ERROR REPORT
ITEM PLANT-MAT-KEY OF MATRL-STOCK FINAL PLANT-MAT-KEY OF PMATRL
ITEM WK-END-DATE(1) FINAL WK-END-DATE(2)
ITEM WK-RECEIVED(1) FINAL WK-RECEIVED(2)
ITEM WK-USAGE(1) FINAL WK-USAGE(2)
ITEM WK-USAGE-MORTAR(1) FINAL WK-USAGE-MORTAR(2)
ITEM WK-USAGE-OTHER(1) FINAL WK-USAGE-OTHER(2)
ITEM WK-ACT-CLSTOCK(1) FINAL WK-ACT-CLSTOCK(2)
ITEM WK-END-DATE(2) FINAL WK-END-DATE(3)
ITEM WK-USAGE(2) FINAL WK-USAGE(3)
ITEM WK-USAGE-MORTAR(2) FINAL WK-USAGE-MORTAR(3)
ITEM WK-USAGE-OTHER(2) FINAL WK-USAGE-OTHER(3)
ITEM WK-RECEIVED(2) FINAL WK-RECEIVED(3)
ITEM WK-ACT-CLSTOCK(2) FINAL WK-ACT-CLSTOCK(3)
ITEM WK-END-DATE(3) FINAL WK-END-DATE(4)
ITEM WK-USAGE(3) FINAL WK-USAGE(4)
ITEM WK-USAGE-MORTAR(3) FINAL WK-USAGE-MORTAR(4)
ITEM WK-USAGE-OTHER(3) FINAL WK-USAGE-OTHER(4)
ITEM WK-RECEIVED(3) FINAL WK-RECEIVED(4)
ITEM WK-ACT-CLSTOCK(3) FINAL WK-ACT-CLSTOCK(4)
ITEM WK-END-DATE(4) FINAL WK-END-DATE(5)
ITEM WK-USAGE(4) FINAL WK-USAGE(5)
ITEM WK-USAGE-MORTAR(4) FINAL WK-USAGE-MORTAR(5)
ITEM WK-USAGE-OTHER(4) FINAL WK-USAGE-OTHER(5)
ITEM WK-RECEIVED(4) FINAL WK-RECEIVED(5)
ITEM WK-ACT-CLSTOCK(4) FINAL WK-ACT-CLSTOCK(5)
ITEM WK-END-DATE(5) FINAL WK-END-DATE(6)
ITEM WK-USAGE(5) FINAL WK-USAGE(6)
ITEM WK-USAGE-MORTAR(5) FINAL WK-USAGE-MORTAR(6)
ITEM WK-USAGE-OTHER(5) FINAL WK-USAGE-OTHER(6)
ITEM WK-RECEIVED(5) FINAL WK-RECEIVED(6)
ITEM WK-ACT-CLSTOCK(5) FINAL WK-ACT-CLSTOCK(6)
ITEM WK-END-DATE(6) FINAL WK-END-DATE(7)
ITEM WK-USAGE(6) FINAL WK-USAGE(7)
ITEM WK-USAGE-MORTAR(6) FINAL WK-USAGE-MORTAR(7)
ITEM WK-USAGE-OTHER(6) FINAL WK-USAGE-OTHER(7)
ITEM WK-RECEIVED(6) FINAL WK-RECEIVED(7)
ITEM WK-ACT-CLSTOCK(6) FINAL WK-ACT-CLSTOCK(7)
ITEM WK-END-DATE(7) FINAL WK-END-DATE(8)
ITEM WK-USAGE(7) FINAL WK-USAGE(8)
ITEM WK-USAGE-MORTAR(7) FINAL WK-USAGE-MORTAR(8)
ITEM WK-USAGE-OTHER(7) FINAL WK-USAGE-OTHER(8)
ITEM WK-RECEIVED(7) FINAL WK-RECEIVED(8)
ITEM WK-ACT-CLSTOCK(7) FINAL WK-ACT-CLSTOCK(8)
ITEM WK-END-DATE(8) FINAL WK-END-DATE(9)
ITEM WK-USAGE(8) FINAL WK-USAGE (9)
ITEM WK-USAGE-MORTAR(8) FINAL WK-USAGE-MORTAR (9)
ITEM WK-USAGE-OTHER(8) FINAL WK-USAGE-OTHER (9)
ITEM WK-RECEIVED(8) FINAL WK-RECEIVED(9)
ITEM WK-ACT-CLSTOCK(8) FINAL WK-ACT-CLSTOCK(9)
ITEM WK-END-DATE(9) FINAL WK-END-DATE(10)
ITEM WK-USAGE(9) FINAL WK-USAGE(10)
ITEM WK-USAGE-MORTAR(9) FINAL WK-USAGE-MORTAR(10)
ITEM WK-USAGE-OTHER(9) FINAL WK-USAGE-OTHER(10)
ITEM WK-RECEIVED(9) FINAL WK-RECEIVED(10)
ITEM WK-ACT-CLSTOCK(9) FINAL WK-ACT-CLSTOCK(10)
ITEM WK-END-DATE(10) FINAL WK-END-DATE(11)
ITEM WK-USAGE(10) FINAL WK-USAGE(11)
ITEM WK-USAGE-MORTAR(10) FINAL WK-USAGE-MORTAR(11)
ITEM WK-USAGE-OTHER(10) FINAL WK-USAGE-OTHER(11)
ITEM WK-RECEIVED(10) FINAL WK-RECEIVED(11)
ITEM WK-ACT-CLSTOCK(10) FINAL WK-ACT-CLSTOCK(11)
ITEM WK-END-DATE(11) FINAL WK-END-DATE(12)
ITEM WK-USAGE(11) FINAL WK-USAGE(12)
ITEM WK-USAGE-MORTAR(11) FINAL WK-USAGE-MORTAR(12)
ITEM WK-USAGE-OTHER(11) FINAL WK-USAGE-OTHER(12)
ITEM WK-RECEIVED(11) FINAL WK-RECEIVED(12)
ITEM WK-ACT-CLSTOCK(11) FINAL WK-ACT-CLSTOCK(12)
ITEM WK-END-DATE(12) FINAL WK-END-DATE(13)
ITEM WK-USAGE(12) FINAL WK-USAGE(13)
ITEM WK-USAGE-MORTAR(12) FINAL WK-USAGE-MORTAR(13)
ITEM WK-USAGE-OTHER(12) FINAL WK-USAGE-OTHER(13)
ITEM WK-RECEIVED(12) FINAL WK-RECEIVED(13)
ITEM WK-ACT-CLSTOCK(12) FINAL WK-ACT-CLSTOCK(13)
ITEM WK-END-DATE(13) FINAL GT-WK-END-DATE
ITEM WK-USAGE(13) FINAL 0
ITEM WK-USAGE-MORTAR(13) FINAL 0
ITEM WK-USAGE-OTHER(13) FINAL 0
ITEM WK-RECEIVED(13) FINAL 0
ITEM WK-ACT-CLSTOCK(13) FINAL 0
This is the section of the jobstream that shows the error
68   > USE VS4040PS.LVPHOUSE.EXE NOL
69   VS4040PS * Version H.01.003
70   
71   10/03/2009  19:14    Hanson Aggregates                               1
72   
73   Run:     VS4040PC
74   Request: ONE
75   
76   
77   Executing request ONE ...
78   ----------------------------------------------------------------------
79   Record has been changed since you found it.                          ]
     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
80      File:  VS-ORDER
81        Linkitem:  CUST-ACNO                        0118    933066
82        Linkitem:  ARC-ORDNO                        644 200903100007
83        Linkitem:  PLANT-DAY-REF                    644 20090310
84        Linkitem:  VS-JOB-REF                       759R
85   
86   Action Taken: Report and Continue.
87   ----------------------------------------------------------------------
88   
89   Records read:
90     VS-ORDER                           394,902
91     VS-CUST-JOB                          1,306
92     VS-CUST-MIX                          1,285
93     LATEST-MIX                          42,116
94   
95   Transactions processed:                1,245
96   
97   Records processed:                     Added    Updated  Unchanged   
98     VS-ORDER                                 0        127      1,117   
99   
00   Finished.
01   
02   > EXIT
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.sowder.com/pipermail/powerh-l/attachments/20090311/d4569b29/attachment.htm 


More information about the powerh-l mailing list