This was really simple. Code is hard coded for this particular purpose to Item-Standard Cost specific pricing. I may create a function for it to be flexible for all pricing methods in the future but this worked for the limited scope that I had in my project. Obviously just a snippet and does not include oSS session or variable DIM and assigns.
retval = oSS.nSetDate(""P/O"", ""20161231"")
retval = oSS.nSetModule(""P/O"")
retval = oSS.nSetProgram(oSS.nLookupTask(""PO_VendorPriceLevel_UI""))
Set oVendorPrice = oPVX.NewObject(""PO_VendorPriceLevel_bus"", oSS)
retval = oVendorPrice.nsetkeyvalue(""APDivisionNo$"", PrimaryVendorDiv)
retval = oVendorPrice.nsetkeyvalue(""VendorNo$"", PrimaryVendorNo)
retval = oVendorPrice.nsetkeyvalue(""PricingType$"", ""I"")
retval = oVendorPrice.nsetkeyvalue(""ProductLine$"", "" "")
retval = oVendorPrice.nsetkeyvalue(""ItemCode$"", ItemCode)
retval = oVendorPrice.nsetkey
retval = oVendorPrice.nsetvalue(""PricingMethod$"", ""S"")
retval = oVendorPrice.nsetvalue(""DiscountMarkup1"", VendorPrice)
retval = oVendorPrice.nwrite