Custom.pll de OK/CANCEL tarzı sorular sorarak kod çalıştırmak

FND_MESSAGE.SET_STRING (‘Rapor çalışsın mı’); IF (FND_MESSAGE.WARN) THEN / Kullanıcı OK ye basmış demektir… Rapor için ilgili kodlar yazılır… / ELSE

Kullanıcı CANCEL e basmış demektir…

Yapılması istenen başka kodlar varsa yazılır…

….. button_choice NUMBER; … begin … button_choice := fnd_message.question (button1 => ‘YES’,button2 => ‘NO’,button3 => ‘CANCEL’,default_btn => 1,cancel_btn => 3,icon => ‘question’); IF button_choice = 1 THEN

YES e tıklanmış demektir….

NO ya tıklanmış demektir…

CANCEL e tıklanmış demektir…

— — — — — — — — — — — — — — — — - Birde Alert kullanarak yapalım;

Öncelikle tipi CAUTION olan ve Buton1 in Labeli Evet, Buton2 in Labeli Hayır olan bir alert oluşturalim.Adı da ALRT_KAYDET olsun

WHEN-BUTTON-PRESSED: BEGIN SET_ALERT_PROPERTY(‘ALRT_KAYDET’,TITLE,’Kaydedilsin mi?’); SET_ALERT_PROPERTY(‘ALRT_KAYDET’,ALERT_MESSAGE_TEXT,’Değişiklikler kaydedilsin mi?’); IF :SYSTEM.FORM_STATUS=’CHANGED’ THEN IF SHOW_ALERT(‘ALRT_KAYDET Evet denirse

GO_BLOCK(‘BLOCK_NAME’); COMMIT_FORM;

Originally published at http://meskiocak.blogspot.com.