![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Параметры в TAdoDataSet [D7, Access]
paul_k © (2003-10-23 13:39:00)
есть 2 ДС
1 :CommandText =
"select id, name,code,edit_mask from t_simples where type_id = :p_type"
Parameters = <
item
Name = "p_type"
Attributes = [paNullable]
DataType = ftWideString
NumericScale = 255
Precision = 255
Size = 510
Value = Null
end>
2 :CommandText =
select t_organisations.*,t_types.name,
t_simples.name as org_form_name,
t_simples.code as org_form_code,
(select t_bank_accounts.acc_no
from t_bank_accounts
where t_bank_accounts.item_id = t_organisations.id
and t_types.code = "RECIPIENT") as acc_no
from t_organisations,t_types,t_simples
where t_types.id = t_organisations.type_id
and t_simples.id = t_organisations.org_form_id
and t_simples.type_id = 25
and t_types.type_code=:p_org_type
order t_organisations.org_name
Parameters = <
item
Name = "p_org_type"
Attributes = [paNullable]
DataType = ftWideString
NumericScale = 255
Precision = 255
Size = 510
Value = Null
end>
Перед открытием ДС присваиваю значения параметров
1:t_simples.Parameters.ParamByName("p_type").Value:=inttostr(25)
t_simples.open
2:t_org_type.Parameters.ParamByName("p_org_type").Value:="BANK"
t_org_type.Open;
В первом случае все работает, а во 2-м ошибка "No value given for one or more requiredparametrs"
Может поможете разобратся в чем дело?
paul_k (2003-10-23 13:52:00) [1]
простите, ларчик просто открывался.
поляt_types.type_codeне существует