<div>                QTP has input phase, sort phase, output phase<br><br>defines are evaluated again in all phases <br>- so every time there is a reference to a define  - it is re-evaluated in all phases<br>- QTP assumes a define is changeable<br><br>try changing the qtp to the following<br><br>put temps before the sort<br>- the temps will be initialized to 0<br><br>- change define to use temp - this will then be fixed value for a given record<br><br><br>TEMP  QPD-DTL-AMT ZONED SIZE 14<br>ITEM  QPD-DTL-AMT  = ROUND((AMOUNT OF TRANDETL * 100),0,NEAR))<br><br><br><br>TEMP QPT-DTL-AMT ZONED SIZE 14<br><br>  TEMP QPT-DTL-CR  ZONED SIZE 14<br>  TEMP QPT-DTL-DR  ZONED SIZE 14<br><br>SORT ON ACCOUNT-NUMBER OF ACCOUNTS                              &<br>        ON TRANS-IDENT OF TRANSACTIONS                            &<br>        ON TRANS-IDENT OF TRANDETL<br><br><br><br>      ITEM QPT-DTL-AMT SUBTOTAL QPD-DTL-AMT                        &<br>        RESET AT TRANS-IDENT OF TRANDETL<br><br><br>      ITEM QPT-DTL-CR  SUBTOTAL QPD-DTL-AMT                        &<br>        IF TRANS-TYPE OF TRANACCT EQ "AP"                          &<br>        OR TRANS-TYPE OF TRANACCT EQ "CA"                          &<br>        RESET AT TRANS-IDENT OF TRANDETL<br><br><br>      ITEM QPT-DTL-DR  SUBTOTAL QPD-DTL-AMT                        &<br>        IF TRANS-TYPE OF TRANACCT EQ "CQ"                          &<br>        OR TRANS-TYPE OF TRANACCT EQ "DA"                          &<br>        RESET AT TRANS-IDENT OF TRANDETL<br><br>    OUTPUT TRANSACTIONS UPDATE AT TRANS-IDENT OF TRANDETL          &<br>      ON ERRORS REPORT                                            &<br>      IF QPG-UPDATE EQ "Y"<br><br>      ITEM AMOUNT OF TRANSACTIONS FINAL                            &<br>        ROUND(((QPT-DTL-AMT) / 100),2,NEAR)<br><br>      ITEM CREDIT-AMOUNT OF TRANSACTIONS FINAL                    &<br>        ROUND(((QPT-DTL-CR) / 100),2,NEAR)<br><br>      ITEM DEBIT-AMOUNT OF TRANSACTIONS FINAL                      &<br>        ROUND(((QPT-DTL-DR) / 100),2,NEAR)<br><br><br>    SUBFILE QPAPBLT1 AT TRANS-IDENT OF TRANDETL KEEP              &<br>      INCLUDE                                                      &<br>        TRANSACTIONS,                                              &<br>        QPT-DTL-AMT, QPT-DTL-DR, QPT-DT<br>            </div>            <div class="yahoo_quoted" style="margin:10px 0px 0px 0.8ex;border-left:1px solid #ccc;padding-left:1ex;">                        <div style="font-family:'Helvetica Neue', Helvetica, Arial, sans-serif;font-size:13px;color:#26282a;">                                <div>                    On Wednesday, October 27, 2021, 10:37:11 a.m. PDT,  <powerh-l-request@lists.sowder.com> wrote:                </div>                <div><br></div>                <div><br></div>                <div><div dir="ltr">Send powerh-l mailing list submissions to<br></div><div dir="ltr">    <a ymailto="mailto:powerh-l@lists.sowder.com" href="mailto:powerh-l@lists.sowder.com">powerh-l@lists.sowder.com</a><br></div><div dir="ltr"><br></div><div dir="ltr">To subscribe or unsubscribe via the World Wide Web, visit<br></div><div dir="ltr">    <a href="https://lists.sowder.com/mailman/listinfo/powerh-l" target="_blank">https://lists.sowder.com/mailman/listinfo/powerh-l</a><br></div><div dir="ltr">or, via email, send a message with subject or body 'help' to<br></div><div dir="ltr">    <a ymailto="mailto:powerh-l-request@lists.sowder.com" href="mailto:powerh-l-request@lists.sowder.com">powerh-l-request@lists.sowder.com</a><br></div><div dir="ltr"><br></div><div dir="ltr">You can reach the person managing the list at<br></div><div dir="ltr">    <a ymailto="mailto:powerh-l-owner@lists.sowder.com" href="mailto:powerh-l-owner@lists.sowder.com">powerh-l-owner@lists.sowder.com</a><br></div><div dir="ltr"><br></div><div dir="ltr">When replying, please edit your Subject line so it is more specific<br></div><div dir="ltr">than "Re: Contents of powerh-l digest..."<br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr">Today's Topics:<br></div><div dir="ltr"><br></div><div dir="ltr">   1. Certain transactions not updated on final item (James B. Byrne)<br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr">----------------------------------------------------------------------<br></div><div dir="ltr"><br></div><div dir="ltr">Message: 1<br></div><div dir="ltr">Date: Wed, 27 Oct 2021 11:58:00 -0400<br></div><div dir="ltr">From: "James B. Byrne" <<a ymailto="mailto:byrnejb@harte-lyne.ca" href="mailto:byrnejb@harte-lyne.ca">byrnejb@harte-lyne.ca</a>><br></div><div dir="ltr">To: <a ymailto="mailto:powerh-l@lists.sowder.com" href="mailto:powerh-l@lists.sowder.com">powerh-l@lists.sowder.com</a><br></div><div dir="ltr">Subject: Certain transactions not updated on final item<br></div><div dir="ltr">Message-ID:<br></div><div dir="ltr">    <<a ymailto="mailto:cde4cebd689c30ec752d45cb8f51dc77.squirrel@webmail.harte-lyne.ca" href="mailto:cde4cebd689c30ec752d45cb8f51dc77.squirrel@webmail.harte-lyne.ca">cde4cebd689c30ec752d45cb8f51dc77.squirrel@webmail.harte-lyne.ca</a>><br></div><div dir="ltr">Content-Type: text/plain;charset=iso-8859-1<br></div><div dir="ltr"><br></div><div dir="ltr">I have a QTP process that selects all the transaction detail lines for a<br></div><div dir="ltr">specific account and recalculates the transaction totals.<br></div><div dir="ltr"><br></div><div dir="ltr">   SORT ON ACCOUNT-NUMBER OF ACCOUNTS                              &<br></div><div dir="ltr">        ON TRANS-IDENT OF TRANSACTIONS                             &<br></div><div dir="ltr">        ON TRANS-IDENT OF TRANDETL<br></div><div dir="ltr"><br></div><div dir="ltr">    DEFINE QPD-DTL-AMT ZONED SIZE 14 = (                           &<br></div><div dir="ltr">      ROUND((AMOUNT OF TRANDETL * 100),0,NEAR))<br></div><div dir="ltr"><br></div><div dir="ltr">    TEMP QPT-DTL-AMT ZONED SIZE 14<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM QPT-DTL-AMT SUBTOTAL QPD-DTL-AMT                        &<br></div><div dir="ltr">        RESET AT TRANS-IDENT OF TRANDETL<br></div><div dir="ltr"><br></div><div dir="ltr">    TEMP QPT-DTL-CR  ZONED SIZE 14<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM QPT-DTL-CR  SUBTOTAL QPD-DTL-AMT                        &<br></div><div dir="ltr">        IF TRANS-TYPE OF TRANACCT EQ "AP"                          &<br></div><div dir="ltr">        OR TRANS-TYPE OF TRANACCT EQ "CA"                          &<br></div><div dir="ltr">        RESET AT TRANS-IDENT OF TRANDETL<br></div><div dir="ltr"><br></div><div dir="ltr">    TEMP QPT-DTL-DR  ZONED SIZE 14<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM QPT-DTL-DR  SUBTOTAL QPD-DTL-AMT                        &<br></div><div dir="ltr">        IF TRANS-TYPE OF TRANACCT EQ "CQ"                          &<br></div><div dir="ltr">        OR TRANS-TYPE OF TRANACCT EQ "DA"                          &<br></div><div dir="ltr">        RESET AT TRANS-IDENT OF TRANDETL<br></div><div dir="ltr"><br></div><div dir="ltr">    OUTPUT TRANSACTIONS UPDATE AT TRANS-IDENT OF TRANDETL          &<br></div><div dir="ltr">      ON ERRORS REPORT                                             &<br></div><div dir="ltr">      IF QPG-UPDATE EQ "Y"<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM AMOUNT OF TRANSACTIONS FINAL                            &<br></div><div dir="ltr">        ROUND(((QPT-DTL-AMT) / 100),2,NEAR)<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM CREDIT-AMOUNT OF TRANSACTIONS FINAL                     &<br></div><div dir="ltr">        ROUND(((QPT-DTL-CR) / 100),2,NEAR)<br></div><div dir="ltr"><br></div><div dir="ltr">      ITEM DEBIT-AMOUNT OF TRANSACTIONS FINAL                      &<br></div><div dir="ltr">        ROUND(((QPT-DTL-DR) / 100),2,NEAR)<br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr">    SUBFILE QPAPBLT1 AT TRANS-IDENT OF TRANDETL KEEP               &<br></div><div dir="ltr">      INCLUDE                                                      &<br></div><div dir="ltr">        TRANSACTIONS,                                              &<br></div><div dir="ltr">        QPT-DTL-AMT, QPT-DTL-DR, QPT-DTL-CR<br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr">The problem is that not all transactions are updated as expected:<br></div><div dir="ltr"><br></div><div dir="ltr">Quiz reports this in QPAPBLT1:<br></div><div dir="ltr"><br></div><div dir="ltr"> Transaction  Amount  QPT-DTL-AMT    Credit   QPT-DTL-CR    Debit   QPT-DTL-DR<br></div><div dir="ltr">  AP036531     485.52       48552    485.52CR      48552     0.00DB          0<br></div><div dir="ltr">  AP036532    1171.79      117179   1171.79CR     117179     0.00DB          0<br></div><div dir="ltr">  CA016586       1.20         120      1.20CR        120     0.00DB          0<br></div><div dir="ltr">  CQ217386       0.00      117179      0.00CR          0  1171.79DB     117179<br></div><div dir="ltr">  DA019461       0.00       48672      0.00CR          0   486.72DB      48672<br></div><div dir="ltr"><br></div><div dir="ltr">The last two transactions do not get the AMOUNT set properly, but the<br></div><div dir="ltr">DEBIT-AMOUNT is set. I am at a loss as to why.  All three accumulators sum up<br></div><div dir="ltr">correctly.  But the FINAL clause does not seem to apply to AMOUNT field of the<br></div><div dir="ltr">debit transactions.<br></div><div dir="ltr"><br></div><div dir="ltr">What am I missing?<br></div><div dir="ltr"><br></div><div dir="ltr">-- <br></div><div dir="ltr">***          e-Mail is NOT a SECURE channel          ***<br></div><div dir="ltr">        Do NOT transmit sensitive data via e-Mail<br></div><div dir="ltr">   Unencrypted messages have no legal claim to privacy<br></div><div dir="ltr"> Do NOT open attachments nor follow links sent by e-Mail<br></div><div dir="ltr"><br></div><div dir="ltr">James B. Byrne                mailto:<a ymailto="mailto:ByrneJB@Harte-Lyne.ca" href="mailto:ByrneJB@Harte-Lyne.ca">ByrneJB@Harte-Lyne.ca</a><br></div><div dir="ltr">Harte & Lyne Limited          <a href="http://www.harte-lyne.ca" target="_blank">http://www.harte-lyne.ca</a><br></div><div dir="ltr">9 Brockley Drive              vox: +1 905 561 1241<br></div><div dir="ltr">Hamilton, Ontario             fax: +1 905 561 0757<br></div><div dir="ltr">Canada  L8E 3C3<br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr"><br></div><div dir="ltr">------------------------------<br></div><div dir="ltr"><br></div><div dir="ltr">Subject: Digest Footer<br></div><div dir="ltr"><br></div><div dir="ltr">-- <br></div><div dir="ltr">= = = = = = = = = = = = = = = = = = = = = = = = = = = =<br></div><div dir="ltr">Mailing list: <a ymailto="mailto:powerh-l@lists.sowder.com" href="mailto:powerh-l@lists.sowder.com">powerh-l@lists.sowder.com</a><br></div><div dir="ltr">Subscribe: &quot;subscribe&quot; in message body to <a ymailto="mailto:powerh-l-request@lists.sowder.com" href="mailto:powerh-l-request@lists.sowder.com">powerh-l-request@lists.sowder.com</a><br></div><div dir="ltr">Unsubscribe: &quot;unsubscribe &lt;password&gt;&quot; in message body to <a ymailto="mailto:powerh-l-request@lists.sowder.com" href="mailto:powerh-l-request@lists.sowder.com">powerh-l-request@lists.sowder.com</a><br></div><div dir="ltr"><a href="https://lists.sowder.com/mailman/listinfo/powerh-l" target="_blank">https://lists.sowder.com/mailman/listinfo/powerh-l</a><br></div><div dir="ltr">This list is closed, thus to post to the list you must be a subscriber.<br></div><div dir="ltr">Add 'site:lists.sowder.com powerh-l' to your search terms to search the list archive at Google.<br></div><div dir="ltr"><br></div><div dir="ltr">------------------------------<br></div><div dir="ltr"><br></div><div dir="ltr">End of powerh-l Digest, Vol 160, Issue 1<br></div><div dir="ltr">****************************************<br></div></div>            </div>                </div>