SQLize Online / PHPize Online  /  SQLtest Online

A A A
Share      Blog   Popular
Copy Format Clear
/* Решение заданий по PL/SQL Порядин А.В. 13.02.2024 */ --1)Создание таблицы TBL1 create table TBL1 ( ORG_ID number(19), --Идентификатор ORG_NAME varchar2(240), --Имя организации COMMENTS varchar2(240) --Комментарий ); --2)Вставка данных в таблицу TBL1 insert into TBL1 values (1, 'Работа', ''); insert into TBL1 values (2, 'Загс', ''); insert into TBL1 values (3, 'Университет', ''); insert into TBL1 values (4, 'Магазин', ''); insert into TBL1 values (6, 'Хобби', ''); --3)Создание таблицы TBL2 create table TBL2 ( EVENT_ID number(19), --Идентификатор EVENT_NAME varchar2(100), --Имя события EVENT_DATE date, --Дата события ORG_ID number(19)); --Идентификтаор организации --4)Создание последовательности EVENT_SEQ с шагом 1, начиная с 1 CREATE SEQUENCE EVENT_SEQ MINVALUE 1 START WITH 1 INCREMENT BY 1 NOCACHE; --5)Создание процедуры заполнения таблицы TBL2 CREATE OR REPLACE PROCEDURE FILL_TABLE ( name_in IN TBL2.EVENT_NAME%TYPE, --входной параметр названия события date_in IN TBL2.EVENT_DATE%TYPE, --входной параметр даты события org_in IN TBL2.ORG_ID%TYPE --входной параметр идентифактора организации ) IS BEGIN --Записываем данные в таблицу TBL2 INSERT INTO TBL2 (EVENT_ID, EVENT_NAME, EVENT_DATE, ORG_ID) VALUES( EVENT_SEQ.NEXTVAL, --Идентификатор события записывается элементом последовательности name_in, date_in, org_in ); commit; END; --6)Заполняем таблицу TBL2 с помощью процедуры FILL_TABLE begin FILL_TABLE('Собеседование',TO_DATE('06.12.2024', 'dd.mm.yyyy'),5); end;

Stuck with a problem? Got Error? Ask ChatGPT!

Copy Clear