Базы данных и знаний. Проектирование баз данных по технологии "клиент-сервер" и разработка клиентских приложений. Токмаков Г.П. - 67 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

- 67
BEGIN
UPDATE GROUPS SET equip_name=:equip_name
WHERE equip_type_id=:equip_type_id and
equip__name=: equip__name } ;
END ! !
SET TERM ; !!
SET TERM !! ;
CREATE PROCEDURE del_groups (ForEachAtt(GROUPS,',') {})
AS
BEGIN
DELETE FROM GROUPS
WHERE equip type_id=:equip_type_id;
END ! !
SET TERM ; !!
SET TERM !! ;
CREATE PROCEDURE ins_workplace (workplace_id INTEGER,
class_id INTEGER,
workplace_no VARCHAR(20),
workplace_name VARCHAR(20),
ip_address VARCHAR(20),
. note VARCHAR(20) } )
AS
BEGIN
INSERT INTO WORKPLACE (class_id, workplace_no,
workplace_name, ip_address, note)
VALUES (:class_id, :workplace_no, :workplace_name,
:ip_address, mote);
END ! !
SET TERM ; !!
SET TERM !! ;
CREATE PROCEDURE upd_workplace (workplace_id INTEGER,
class_id INTEGER,
workplace_no VARCHAR(20),
workplace_name VARCHAR(20),
ip_address VARCHAR(20),
note VARCHAR(20))
AS
BEGIN
UPDATE WORKPLACE SET class_id=:class_id,
workplace_no=:workplace_no,
workplace_name=:workplace_name,
ip_address-:ip_address,
note=:note
WHERE workplace_id=:workplace_id and
class_id=:class_id and
workplace_no=:workplace_no and
workplace_name=:workplace_name and
ip_address=:ip_address and

Страницы