Enter the first name: Lewis Enter the last name: Crow Enter the date of birth: 16-OCT-49 Enter the new appointment date: 12-Jan-2012 The data has been updated.  The original next appointment date was 01-JUL-05 PL/SQL procedure successfully completed.

Database System Concepts
7th Edition
ISBN:9780078022159
Author:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Chapter1: Introduction
Section: Chapter Questions
Problem 1PE
icon
Related questions
Question
100%

Write a script to create a PL/SQL procedure that modifies the next date of appointment of certain patient. Call the procedure from anonymous block to allow the user to enter the patient’s first name, last name, date of birth and the new date of appointment. If the following data is used, the output will be as follows.

 

Enter the first name: Lewis

Enter the last name: Crow

Enter the date of birth: 16-OCT-49

Enter the new appointment date: 12-Jan-2012

The data has been updated. 

The original next appointment date was 01-JUL-05

PL/SQL procedure successfully completed.

CREATE TABLE DOCTOR
(DOC_ID
DOC_NAME
DATEHIRED
NUMBER(3),
VARCHAR2(9),
DATE,
NUMBER(12),
VARCHAR2(20),
NUMBER(3),
NUMBER(3),
NUMBER(5),
SALPERMON
AREA
SUPERVISOR_ID
CHGPERAPPT
ANNUAL BONUS
CONSTRAINT DOCTOR_DOC_ID_PK PRIMARY KEY
(DOC_ID));
INSERT INTO DOCTOR VALUES(432, 'Harrison',
TO DATE('05-DEC-94'), 12000,
'Pediatrics', 100, 75, 4500);
INSERT INTO DOCTOR VALUES(509, 'Vester', TO DATE('09-
JAN-00'), 8100,
'Pediatrics', 432, 40, null);
INSERT INTO DOCTOR VALUES(389, 'Lewis', TO_DATE('21-
JAN-96'), 10000,
'Pediatrics', 432, 40, 2250);
INSERT INTO DOCTOR VALUES(504, 'Cotner, TO_DATE('16-
JUN-98'), 11500,
'Neurology', 289, 85, 7500);
INSERT INTO DOCTOR VALUES(235, 'Smith', TO_DATE('22-
JUN-98'), 4550,
'Family Practice', 100, 25, 2250);
INSERT INTO DOCTOR VALUES(356, 'James', TO_DATE('01-
AUG-98'), 7950,
'Neurology', 289, 80, 6500);
INSERT INTO DOCTOR VALUES(558, 'James', TO_DATE('02-
MAY-95'), 9800,
'Orthopedics', 876, 85, 7700);
INSERT INTO DOCTOR VALUES(876, 'Robertson',
TO DATE('02-MAR-95'), 10500,
'Orthopedics', 100, 90, 8900);
INSERT INTO DOCTOR VALUES(889, 'Thompson',
TO DATE('18-MAR-97'), 6500,
'Rehab', 100, 65, 3200);
INSERT INTO DOCTOR VALUES(239, 'Pronger',
TO DATE('18-DEC-99'), 3500,
'Rehab',889, 40, null);
INSERT INTO DOCTOR VALUES(289, 'Borque',
TO DATE('30-JUN-89'), 16500,
'Neurology', 100, 95, 6500);
INSERT INTO DOCTOR VALUES(100, 'Stevenson',
TO DATE('30-JUN-79'), 23500,
'Director', null,null,null );
Transcribed Image Text:CREATE TABLE DOCTOR (DOC_ID DOC_NAME DATEHIRED NUMBER(3), VARCHAR2(9), DATE, NUMBER(12), VARCHAR2(20), NUMBER(3), NUMBER(3), NUMBER(5), SALPERMON AREA SUPERVISOR_ID CHGPERAPPT ANNUAL BONUS CONSTRAINT DOCTOR_DOC_ID_PK PRIMARY KEY (DOC_ID)); INSERT INTO DOCTOR VALUES(432, 'Harrison', TO DATE('05-DEC-94'), 12000, 'Pediatrics', 100, 75, 4500); INSERT INTO DOCTOR VALUES(509, 'Vester', TO DATE('09- JAN-00'), 8100, 'Pediatrics', 432, 40, null); INSERT INTO DOCTOR VALUES(389, 'Lewis', TO_DATE('21- JAN-96'), 10000, 'Pediatrics', 432, 40, 2250); INSERT INTO DOCTOR VALUES(504, 'Cotner, TO_DATE('16- JUN-98'), 11500, 'Neurology', 289, 85, 7500); INSERT INTO DOCTOR VALUES(235, 'Smith', TO_DATE('22- JUN-98'), 4550, 'Family Practice', 100, 25, 2250); INSERT INTO DOCTOR VALUES(356, 'James', TO_DATE('01- AUG-98'), 7950, 'Neurology', 289, 80, 6500); INSERT INTO DOCTOR VALUES(558, 'James', TO_DATE('02- MAY-95'), 9800, 'Orthopedics', 876, 85, 7700); INSERT INTO DOCTOR VALUES(876, 'Robertson', TO DATE('02-MAR-95'), 10500, 'Orthopedics', 100, 90, 8900); INSERT INTO DOCTOR VALUES(889, 'Thompson', TO DATE('18-MAR-97'), 6500, 'Rehab', 100, 65, 3200); INSERT INTO DOCTOR VALUES(239, 'Pronger', TO DATE('18-DEC-99'), 3500, 'Rehab',889, 40, null); INSERT INTO DOCTOR VALUES(289, 'Borque', TO DATE('30-JUN-89'), 16500, 'Neurology', 100, 95, 6500); INSERT INTO DOCTOR VALUES(100, 'Stevenson', TO DATE('30-JUN-79'), 23500, 'Director', null,null,null );
2. Write a script to create a PL/SQL procedure that modifies the next
date of appointment of certain patient. Call the procedure from
anonymous block to allow the user to enter the patient's first name,
last name, date of birth and the new date of appointment. If the
following data is used, the output will be as follows.
Enter the first name: Lewis
Enter the last name: Crow
Enter the date of birth: 16-OCT-49
Enter the new appointment date: 12-Jan-2012
The data has been updated.
The original next appointment date was 01-JUL-05
PL/SQL procedure successfully completed.
Transcribed Image Text:2. Write a script to create a PL/SQL procedure that modifies the next date of appointment of certain patient. Call the procedure from anonymous block to allow the user to enter the patient's first name, last name, date of birth and the new date of appointment. If the following data is used, the output will be as follows. Enter the first name: Lewis Enter the last name: Crow Enter the date of birth: 16-OCT-49 Enter the new appointment date: 12-Jan-2012 The data has been updated. The original next appointment date was 01-JUL-05 PL/SQL procedure successfully completed.
Expert Solution
trending now

Trending now

This is a popular solution!

steps

Step by step

Solved in 2 steps

Blurred answer
Knowledge Booster
Intermediate SQL concepts
Learn more about
Need a deep-dive on the concept behind this application? Look no further. Learn more about this topic, computer-science and related others by exploring similar questions and additional content below.
Similar questions
  • SEE MORE QUESTIONS
Recommended textbooks for you
Database System Concepts
Database System Concepts
Computer Science
ISBN:
9780078022159
Author:
Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:
McGraw-Hill Education
Starting Out with Python (4th Edition)
Starting Out with Python (4th Edition)
Computer Science
ISBN:
9780134444321
Author:
Tony Gaddis
Publisher:
PEARSON
Digital Fundamentals (11th Edition)
Digital Fundamentals (11th Edition)
Computer Science
ISBN:
9780132737968
Author:
Thomas L. Floyd
Publisher:
PEARSON
C How to Program (8th Edition)
C How to Program (8th Edition)
Computer Science
ISBN:
9780133976892
Author:
Paul J. Deitel, Harvey Deitel
Publisher:
PEARSON
Database Systems: Design, Implementation, & Manag…
Database Systems: Design, Implementation, & Manag…
Computer Science
ISBN:
9781337627900
Author:
Carlos Coronel, Steven Morris
Publisher:
Cengage Learning
Programmable Logic Controllers
Programmable Logic Controllers
Computer Science
ISBN:
9780073373843
Author:
Frank D. Petruzella
Publisher:
McGraw-Hill Education