Databases Reference
In-Depth Information
Listing 3-8.
Manual Tabular Form—Update and Validation Processes
PROCEDURE save emp custom (p message OUT VARCHAR2);
FUNCTION validate emp comm
RETURN VARCHAR2;
PROCEDURE save emp custom (p message OUT VARCHAR2)
IS
v ins count INTEGER := 0;
v upd count INTEGER := 0;
BEGIN
FOR i IN 1 .. apex application.g f02.COUNT
LOOP
BEGIN
IF apex application.g f02 (i) IS NOT NULL
THEN
IF apex application.g f10 (i) <>
wwv flow item.md5 (apex application.g f02 (i),
apex application.g f03 (i),
apex application.g f04 (i),
apex application.g f05 (i),
apex application.g f06 (i),
apex application.g f07 (i),
apex application.g f08 (i),
apex application.g f09 (i)
)
THEN
UPDATE emp
SET ename = apex application.g f03 (i),
job = apex application.g f04 (i),
mgr = apex application.g f05 (i),
hiredate = apex application.g f06 (i),
sal = apex application.g f07 (i),
comm = apex application.g f08 (i),
deptno = apex application.g f09 (i)
WHERE empno = apex application.g f02 (i);
v upd count := v upd count + 1;
END IF;
ELSE
INSERT INTO emp
(ename,
job,
mgr,
hiredate,
sal,
comm,
deptno
)
VALUES (apex application.g f03 (i),
