Access PO Receipt Header from Landed Cost

Hello All,

I'm running the script below and attempting to update a couple of PO Receipt Header UDFs, but am receiving the error Invalid/Unknown Property Name. Object Required: oHeaderObj.  I'm sure I need a bit of code to call the Receipt Header.  Can anyone point me in the right direction?  Code is pasted below.  And thanks!

'to be triggered on column post write of the Landed Cost Amount on PO_LandedReceipt
'Updates the UDF values that hold the landed cost totals on the PO_Header

DeclaTotal = 0
FrghtTotal = 0

sLandedCost = ""
LandedCostQty = 0

retval = oBusObj.GetValue("LandedCostType$", sLandedCost)
retval = oBusObj.GetValue("LandedCostAmt", LandedCostQty)

if sLandedCost = "DECLA" and LandedCostQty <> 0 then
DeclaTotal = LandedCostQty

'******ERROR IS HERE*********
retval = oHeaderObj.SetValue("UDF_DECLA_TOTAL", DeclaTotal)
end if