ABURAT/F0101 update

tbaird

Member
I am writing a report to gather data, store it in the ABURAT/F0101 field for use later using I/O update. The report gathers the correct data but writes the data to the next record instead of the current record? Below is my ER any ideas?

Listing of ER for Report: TREND ANALYSIS -GRR-OLDOVER & KRR (R55TRND)


=======================================================================
SECTION: SALES TAX BY STATE,etc [GROUP SECTION] V (S3)
=======================================================================
OBJECT: SECTION
EVENT: Before Level Break
-----------------------------------------------------------------------
0001 Get Alpha Name From Address Book
BC Address Number -> mnAddressNumber
RV Variable 000007 <- szNameAlpha

Tuesday June 29, 2004 08:33

Listing of ER for Report: TREND ANALYSIS -GRR-OLDOVER & KRR (R55TRND)


=======================================================================
SECTION: SALES TAX BY STATE,etc [GROUP SECTION] V (S3)
=======================================================================
OBJECT: SECTION
EVENT: Do Section
-----------------------------------------------------------------------
0001 Get Alpha Name From Address Book
BC Address Number - Ship To -> mnAddressNumber
RV Variable 000006 <- szNameAlpha
0002 F41002 Get Item UoM Conversion
BC Business Unit -> szBranchPlant
BC Unit of Measure as Input -> szFromUnitOfMeasure
"GA" -> szToUnitOfMeasure
BC Quantity Shipped -> mnQuantityToConvert
UNDEFINED X cInventoryInterfaceFlag
UNDEFINED X mnConversionFactorFromToPrim
UNDEFINED X mnConversionFactorFrom_to_To
UNDEFINED X mnConversionFactorTo_to_Primar
UNDEFINED X mnQuantityConvertedToPrimary
UNDEFINED X cConvertToSecondary
UNDEFINED X mnQuantityConvertedToSecondary
UNDEFINED X cConvertToPurchasing
UNDEFINED X mnQuantityConvertedToPurchasin
UNDEFINED X cConvertToPricing
UNDEFINED X mnQuantityConvertedToPricing
UNDEFINED X cConvertToShipping
UNDEFINED X mnQuantityConvertedToShipping
UNDEFINED X cConvertToWeight
UNDEFINED X mnQuantityConvertedToWeight
UNDEFINED X cConvertToVolume
UNDEFINED X mnQuantityConvertedToVolume
UNDEFINED X cPotencyMode
UNDEFINED X szLotNumber
UNDEFINED X cPotencyControl
UNDEFINED X mnStandardPotency
UNDEFINED X szErrorMessageID
UNDEFINED X cSuppressErrorMsg
UNDEFINED X cPotencyType
BC Item Number - Short -> mnShortItemNumber
UNDEFINED X cUOMByBranch
UNDEFINED X szUOMToPrimary
UNDEFINED X szUOMToSecondary
UNDEFINED X szUOMToPurchasing
UNDEFINED X szUOMToPricing
UNDEFINED X szUOMToWeight
UNDEFINED X szUOMToVolume
UNDEFINED X szUOMToShipping
UNDEFINED X szStandardUOMConversion
RV Variable 000021 <- mnQuantityConvertedFromtoTo
0003 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - Requested (F4211) is equal to "12/26/2003-1/25/2004"
0004 RV Variable 000019 = RV Variable 000021
0005 Else
0006 RV Variable 000019 = "00.00"
0007 End If
0008 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - Requested (F4211) is equal to "12/26/2003-1/25/2004"
0009 RV Variable 000020 = BC Amount - Extended Price (F4211)
0010 Else
0011 RV Variable 000020 = "00.00"
0012 End If
0013 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - Requested (F4211) is equal to "1/26/2004-2/25/2004"
0014 RV Variable 000026 = RV Variable 000021
0015 Else
0016 RV Variable 000026 = "00.00"
0017 End If
0018 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - Requested (F4211) is equal to "1/26/2004-2/25/2004"
0019 RV Variable 000027 = BC Amount - Extended Price (F4211)
0020 Else
0021 RV Variable 000027 = "00.00"
0022 End If
0023 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - For G/L (and Voucher) (F4211) is equal to "2/26/2004-3/25/2004"
0024 RV Variable 000031 = RV Variable 000021
0025 Else
0026 RV Variable 000031 = "00.00"
0027 End If
0028 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - For G/L (and Voucher) (F4211) is equal to "2/26/2004-3/25/2004"
0029 RV Variable 000032 = BC Amount - Extended Price (F4211)
0030 Else
0031 RV Variable 000032 = "00.00"
0032 End If
0033 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - For G/L (and Voucher) (F4211) is equal to "3/26/2004-4/25/2004"
0034 RV Variable 000033 = RV Variable 000021
0035 Else
0036 RV Variable 000033 = "00.00"
0037 End If
0038 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - For G/L (and Voucher) (F4211) is equal to "3/26/2004-4/25/2004"
0039 RV Variable 000034 = BC Amount - Extended Price (F4211)
0040 Else
0041 RV Variable 000034 = "00.00"
0042 End If
0043 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - For G/L (and Voucher) (F4211) is equal to "4/26/2004-5/25/2004"
0044 RV Variable 000035 = RV Variable 000021
0045 Else
0046 RV Variable 000035 = "00.00"
0047 End If
0048 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - For G/L (and Voucher) (F4211) is equal to "4/26/2004-5/25/2004"
0049 RV Variable 000036 = BC Amount - Extended Price (F4211)
0050 Else
0051 RV Variable 000036 = "00.00"
0052 End If
0053 If BC 2nd Item Number (F4211) is equal to "8,9"
And BC Date - For G/L (and Voucher) (F4211) is equal to "5/26/2004-6/25/2004"
0054 RV Variable 000038 = RV Variable 000021
0055 Else
0056 RV Variable 000038 = "00.00"
0057 End If
0058 If BC 2nd Item Number (F4211) is not equal to <Blank>
And BC Date - For G/L (and Voucher) (F4211) is equal to "5/26/2004-6/25/2004"
0059 RV Variable 000037 = BC Amount - Extended Price (F4211)
0060 Else
0061 RV Variable 000037 = "00.00"
0062 End If
0063 RV Variable 000011 = BC Address Number - Ship To (F4211)
0064 RV Variable 000013 = BC City (F0116)
0065 RV Variable 000014 = BC Address Line 1 (F0116)
0066 RV Variable 000012 = PV Variable 000012
0067 RV STA = BC State (F0116)
0068 ! RV Variable 000029 = [RV Total of Variable 000020]+[RV Total of Variable 000027]+[RV Total of Variable 000032]+[RV Total of Variable 000034]+[RV Total of Variable 000036]+[RV Total of Variable 000037]
0069 ! F0101.Update
! BC Address Number = TK Address Number
! RV Variable 000029 -> TK User Reserved Amount

Tuesday June 29, 2004 08:34


Listing of ER for Report: TREND ANALYSIS -GRR-OLDOVER & KRR (R55TRND)


=======================================================================
SECTION: On Ship To [GROUP SECTION] V (S6)
=======================================================================
OBJECT: SECTION
EVENT: Do Section
-----------------------------------------------------------------------
0001 RV Variable 000029 = [RV Total of Variable 000020]+[RV Total of Variable 000027]+[RV Total of Variable 000032]+[RV Total of Variable 000034]+[RV Total of Variable 000036]+[RV Total of Variable 000037]
0002 F0101.Update
BC Address Number = TK Address Number
RV Variable 000029 -> TK User Reserved Amount
0003 ! RV Variable 000029 = [RV Total of Variable 000020]+[RV Total of Variable 000027]+[RV Total of Variable 000032]+[RV Total of Variable 000034]+[RV Total of Variable 000036]+[RV Total of Variable 000037]
0004 ! F0101.Update
! BC Address Number = TK Address Number
! RV Variable 000029 -> TK User Reserved Amount

Tuesday June 29, 2004 08:33
 
Hi Thomas,

First of all, welcome aboard!

Is "On Ship To" section a Level Break Footer section on "SALES TAX BY STATE,etc" section?

If yes, then you should use PC Address Number instead of BC Address Number in the F0101.Update statement.

PC prefix = Previous Business View Column

In Level Break Footer section the BC values contain already the values from the next record.

Hope, this helps!

Regards,

Zoltán
 
Thanks for the welcome, sorry to be such a newbie.
I have had the tools sets I/II but not ERW yet.

The Sales Tax etc, is a group section.
The On Address is a Level break Header section
The Shipto and On Sales are Level break Footers.
I understand what you are saying about the BC valuse already containing the values from the next row. What I don't get is where to use the PC. It is not available in the I/O update mapping. I tried setting a RV = PC Address number and use the RV for my table I/O and it actually did exactly the same thing?
 
Never mind Got it. I needed to use the EndLvlBrkFooter Section event with the vairable I setup.
Thanks
 
Hi Thomas,

You are right. PC is not available in the I/O mappings on all SP level.

Yo can assign PC to a report or eventrule variable and use it in the update mapping.

If your RV Address Number has its own role, then simply define a new event rule variable in the Event Rule designer, based on AN8 and use it.

evt_mnAddressNumber_AN8 = PC Address Number

and use evt_ in the update. I should work.

Regards,

Zoltán
 
Maybe try creating an AN8 variable (global) in the main section of your UBE and set RPT AN8 = BC AN8 and then pass in RPT AN8 in your footer section update.
 
Back
Top