Home » Developer & Programmer » Forms » forms6i
forms6i [message #80645] Thu, 24 October 2002 22:14 Go to next message
muralidhar
Messages: 13
Registered: September 2002
Junior Member
i have written the following procedure which is successfully compiled.
i am executing in two ways.first one,i have written it in when-button-pressed trigger and it is working fine in a single form and the other thing what i am doing is i have got a control block where in i am calling this block via the actual form through the deptno.this is not working why is that please let me know
one more question along with this,how to supress the message do you want to save the changes you have made.whats the level of this message.
the actual form consists of deptno,dname,loc and a save button.
the control block consist of text_item i have named it as carrier and i have got a save button.please help me out i have to submit it tommorrow

PROCEDURE SAVE_TICKET_INFO IS
v_deptno dept.deptno%type;
v_dname dept.dname%type;
ECODE NUMBER;
EMMSG VARCHAR2(80);
alt number;

BEGIN
alt := show_alert('save');
--:dept.dname := v_dname;
SELECT dname INTO v_dname FROM DEPT WHERE DEPTNO = v_deptno;
if alt = alert_button1 then

UPDATE dept set dname = v_dname
WHERE deptno = v_deptno;
commit;
clear_form;
else
exit_form;
end if;
--MESSAGE('THE DEPTNO IS ' ||v_deptno);
--MESSAGE('THE DEPTNO IS ' ||v_deptno);
EXCEPTION
WHEN OTHERS THEN
ECODE := SQLCODE;
EMMSG := SQLERRM;
--MESSAGE(ECODE||'-'||EMMSG);
--MESSAGE(ECODE||'-'||EMMSG);
END;
Re: forms6i [message #81063 is a reply to message #80645] Thu, 02 January 2003 05:12 Go to previous message
kannappan
Messages: 1
Registered: January 2003
Junior Member
the above source code is very easily and understandable for all people.so i encourage your tallent.try again.acheive your goal in the world.
Previous Topic: question
Next Topic: How to capture a varaible
Goto Forum:
  


Current Time: Thu Apr 25 23:06:56 CDT 2024