Attribute in BO ?

Hi Experts,

I want to fetch the purchase group. iam using bus2105. i create a Virtual attribute. but iam not getting the Purchase group value.

i write the code as below.

Please Correct me.

Attribute = PurGroup

-> Virtual Attribute

ABAP Dictionary:

Reference table : EBAN

Ref field: BANFN

GET_PROPERTY PURGROUP CHANGING CONTAINER.

data:Purgroup type eban-ekgrp,

lv_banfn type eban-banfn.

select single ekgrp from eban into purgroup where banfn = lv_banfn.

SWC_SET_ELEMENT CONTAINER 'PurGroup' object-PURGROUP.

END_PROPERTY.