System.cursor_item

if form_name = perwshrg' and block_name = 'assgt' then    if (event_name = 'WHEN-NEW_ITEM-INSTANCE')  and  ( name_in(system.cursor_item) <> 'ASSGT.CHANGEREASONMEANING' ) then 

If  name_in(system.record_staus) = 'CHANGED'

Then 

copy(NULL,'ASSGT.CHANGE_REASON_MEANING')

Enf if ;

End if;

End if;