PL/SQL Example script

บริษัทเรากำลังจะจัดกีฬาสีโดยแบ่งเป็นสี R(Red) G(Green) B(Blue)

พนักงาน 1 สี R
พนักงาน 2 สี G
พนักงาน 3 สี B
พนกังาน 4 สี R
… วนไปอย่างนี้เรื่อยๆ

จงเขียน OUT PUT เป็นชื่อพนักงานและสีที่แต่ละคนอยู่

CURSOR employer_cur IS
SELECT empno, ename FROM emp ORDER BY empno ASC;
employer employer_cur%ROWTYPE;
TYPE color_array IS VARRAY(3) OF CAHR(1);
color color_array := color_array('R', 'G', 'B');
i INTERGET := 0;
OPEN employer_cur;
LOOP FETCH employer_cur INTO employer
EXIT WHEN employer_cur%NOTFOUND;
DBMS_OUTPUT.put_line(employer.empno || ': ' || employer.ename || ' = ' || color( mod(i, 3)+1 ));
i := i+1;

Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s