![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Здравствуйте ребята . Как обратиться хранение процедур в Oracle который есть на Update . Как обратиться из Delphi и делать Update запись
Есть простои таблица Код:
Desc sales Name Null Type ----------- -------- ------------ SALES_ID NOT NULL NUMBER(10) SALES_DATE DATE SALES_NAME NOT NULL VARCHAR2(50) SALES_KOLVO NUMBER(10) SALES_CENA FLOAT(50) Создал процедур на Update Код:
CREATE OR REPLACE PROCEDURE UpdateSales
(
p_SALES_ID sales.sales_id%TYPE,
P_SALES_DATE sales.SALES_DATE%TYPE, --
P_SALES_NAME sales.SALES_NAME%TYPE,
P_SALES_KOLVO sales.sales_kolvo%TYPE,
P_SALES_CENA sales.sales_cena%TYPE
)
AS
BEGIN
UPDATE sales
SET SALES_DATE = p_sales_date,
SALES_NAME = p_sales_name,
sales_kolvo = p_sales_kolvo,
sales_cena = p_sales_cena
WHERE sales_id =p_sales_id;
COMMIT;
END UpdateSales;Я хочу что обновления запись из ХП через его параметр . Но OraStoredProc как я понял не иметь прямой доступ на ХП, Он просто вызывают ХП. Вот так не работает, не магу редактировать существующие запись. Код:
Module.EditProc.StoredProcName := 'UpdateSales';
Module.EditProc.Prepare;
cxDateEdit1.Date := Module.OraStoredProc1.ParamByName('P_SALES_DATE').AsDateTime;
cxTextEdit1.Text := Module.OraStoredProc1.ParamByName('P_SALES_NAME').AsString;
cxTextEdit2.Text := Module.OraStoredProc1.ParamByName('P_SALES_KOLVO').AsString;
cxTextEdit.Text := Module.OraStoredProc1.ParamByName('P_SALES_CENA').AsString;
Module.OraStoredProc1.ExecSQL;Пожалуйста помогите ребята . |