PB10.5

СПАСИБО

Использую Ваш совет, но я (не Вы) не могу
реализовать,
figure_1.gif – по центру снимка видны 2 отчёта:
dw_1 and dw_2 – таковы их имена в object DataWindow ‘d_composite1, нижний надо заполнить из таблицы
Если отдельно брать, то имена object DataWindow таковы:
d_shape_for_composite - верхний
d_for_composite_3_with_arg – нижний


figure_2.gif – на 2-ом снимке показны выбранные значения 2-ух параметров, заданных для выборки
после подстановки реальных имё код таков:

DataWindowChild state_child
integer rtncode
string ls_argument1
ls_argument1 = 'dw_2'

rtncode = dw_composit.GetChild(ls_argument1, state_child)
// if the child object does not exist
if rtncode = -1 then
MessageBox("","the child object~n" + ls_argument1 + "~n does not exist")
return
end if

// Set the transaction object for the child
state_child.SetTransObject(SQLCA)

// Set the transaction object for the child
// Populate the child with values for eastern states
//state_child.Retrieve("East")
//2 state_child.Retrieve('Kp_Enter_composit','st_enter_composi')

// согласно примера неправильно я задаю нижеидущий оператор
// тип первого аргумента kp_enter_composit - целое число от 1 до 7
// тип второго аргумента st_enter_composit - символ 'ч' или ' ж'
state_child.Retrieve(3,'х') // Retrieve argument 1 does not match expected type
//+- state_child.Retrieve('3','х') // Retrieve argument 1 does not match expected type



figure_3 – если выбрать отдельно object DataWindow ‘d_for_composite_3_with_arg’ , выполнить Run \ Preview, то ОК!