Trigger code: write of pur-vendor

{trigs/wraud.i pur-vendor}