DataWindowChild ldwc_DWC
string ls_user
long ll_row

dw_user.of_SetTransObject(atr_Tr)
ll_row = dw_user.insertRow( 0 )
MessageBox("A",string(ll_row))
dw_user.GetChild('vdata', ldwc_DWC)
MessageBox("A","Getting user...")
if ldwc_DWC.Rowcount( ) <  1  then
	MessageBox("A",'Row count is '+String(ldwc_DWC.Rowcount( )))
end if
ls_user = ldwc_DWC.getItemString( 1 , "vdata")
if isNull(ls_user) then
	MessageBox("A","User is null!!")
end if
MessageBox("A","User to set: "+ls_user)
dw_user.setItem(ll_row, "vdata", ls_user)

dw_user.of_SetTransObject(atr_Tr)

ll_row = dw_user.insertRow( 0 )

dw_user.of_SetTransObject(atr_Tr)
ll_row = dw_user.insertRow( 0 )
dw_user.GetChild('vdata', ldwc_DWC)
ldwc_DWC.setTransObject(atr_tr)
ldwc_DWC.retrieve( )
if ldwc_DWC.Rowcount( ) <  1  then
	MessageBox("A",'Row count is '+String(ldwc_DWC.Rowcount( )))
end if
ls_user = ldwc_DWC.getItemString( 1 , "vdata")
dw_user.setItem(ll_row, "vdata", ls_user)

select 'ALL' vdata
  from dual

select au.user_id nid, au.username vname, au.username vdata, decode(u.vname, null,  0 ,  1 )
	 nexists,  2  norder
  from all_users au, OUR_USER_TABLE u
 where u.vname (+)
	 = au.username
 union all
select  0  nid, 'Все' vname, 'ALL' vdata,  0  nexists,  1  norder
  from dual
 order by  5  asc,  4  desc,  2  asc