GO-ITEM - WHEN-BUTTON-PRESSED - SQLAP-10048 - You have not selected a record.

Hi,
I need to use go-item -> execute-trigger(when-button-pressed) personalization in oracle EBS Payables module. However i face certain problem.
When i do 'go-item' to particular 'button', row selection disappear(its a multi row block). In the result i receive an error - 10048 - you have not selected a record.
Manually you just click a button with row selected, and everything goes fine. There must be some kind of a context parameter which is passed from a block/record/row to a button. However how to achieve this through personalization?
Many thanks for every help.
Best regards,
Martin

write a procedure in forms that disables all your items in that record and call this on When-New-Record-Instance and When-Button-Pressed.
PROCEDURE disable_item IS
BEGIN
IF :<block>.indicator = 'X'
THEN
SET_ITEM_INSTANCE_PROPERTY('<block>.<item>, CURRENT_RECORD, INSERT_ALLOWED, PROPERTY_FALSE);
SET_ITEM_INSTANCE_PROPERTY('<block>.<item>, CURRENT_RECORD, UPDATE_ALLOWED, PROPERTY_FALSE);
.. (repeate this t2o Statemnts for every item,
more elegantliy you may write a loop using built-in NEXT_ITEM to get all items and set insert and update off) ...
END IF;
END;
On When-Button-Pressed set the value of :block.indicator to 'X' before calling the disable_item procedure.
Attemtion: This solution assumes that the button is part of your MR block (cited bove as <block>).
... and code is just written down, not tested.

Similar Messages

What do you do when iBook downloads a book you did not select?

What do you do when iBook downloads a book you did not select?

Welcome to the Apple Community.
Select the content which is causing a problem and use the 'Report a problem' button in Your Purchase History.

Disable items when button pressed

Hi all,
I have a master detail form. Users first have to enter the master.
When finished adding the master they press a button to display the detail region.
After pressing the button the users are not allowed to edit the master region anymore.
How can I disable the master region when the button is pressed?
Thanx,
Pim

Hi,
Please try this,
create P1_STATUS as hidden
Set default value = Y
Set the condition of the master region choose Expression1= Expression2
Expression 1 = :p1_status
Expression 2 = Y
Pass the argument in submit button which one you need to hide the master region -> choose URL and give f?p=&APP_ID.:1:&SESSION.::::P1_STATUS:N
Now the :p1_status = N value after you submit button.. Your master region will not show.
Thanks
Mark Wyatt
Edited by: Websoft on Sep 22, 2009 4:46 AM

FRM-40732 ORA-06502 in when button pressed triger

I Have a the code below in when button pressed
If :block1.text_item is not null Then
:control.title := :block1.text_item
end if;
go_block('block2);
Here the when button-button-pressed unhandled exception Frm-40735 Ora-06502 appears. I know this may be because of datatype problem, but how would I know the culprit item. The form allow the user to save the data. Am using forms 6i 10G database.

Can check the maximum length of :control.title
It seems that it can handle the amount of data you are assigning to it

How can I call my chart in Forms6i on When Button Press Trigger?

Hi Friends,
I have make a chart in Graphic Builder 6i and save on path C:\graph\test.ogd
Now I want to run this Chart from Form6i on When Button Press trigger.
I have call my report in forms using this command on When Button Press trigger.
Run_Product(reports,'C:\Cheema\Qdir_store\reports\pmms\sec_backlog',asynchronous,runtime,filesystem,TO_CHAR(NULL));
So tell me How can I call my chart in Forms6i?
Please reply me on urgent.
Thanks,
Shahzad

Just to recall after a long break of couple of years..... Pls check out if not wrong.
First of all you need to embeed the chart object on your layout window and make it visible = FALSE. This is a design time work. In the button press event, show the chart object by setting the visible property = TRUE.
Note, i could not paste u the sample code as i don't have forms installation on my PC. The above states is a logic you can apply.

Error -- No Such Trigger('when-button-pressed')

Hi,
I am getting the error ""No Such Trigger('when-button-pressed')"",
when I am executing the code EXECUTE_TRIGGER( 'WHEN-BUTTON-PRESSED' );
on some item(Key-Next-Item), although WHEN-BUTTON-PRESSED trigger exists.
What could be the problem ?. It worked till yesterday, giving error from today, I havent
changed any thing.
Thanks in Advance
Devender

Steve's tip is the only good solution for this case.
The problem in your case for example is:
Let's say you have a block-trigger, which fires after your execute-trigger.
Now a colleague of you, which don't know your code, create a WHEN-BUTTON-PRESSED on an item, then the new code is started and not the block-trigger-code.
So, don't ever do this. Write your code in a package-function or -procedure and call it from the trigger. So you can re-user the functionality
Gerd

When-button-pressed---adding a "select statement"

Hi friends,
i have a select statement:
select count(*) from employees
where emp_no=:control.emp_no;
i would like that when i press a button, count for instance, i get the number of employees.
I need the codes used in oracle in the when-button-pressed.
Thanks.

DECLARE
RESULT NUMBER :=0;
CURSOR CUR
select count(*) from employees
where emp_no=:control.emp_no;
BEGIN
OPEN CUR;
FETCH CUR INTO RESULT;
:ITEM_NAME := RESULT;
CLOSE CUR
END;
I hope this will help
This will be shown in item, if you want to show a message then use
MESSAGE(RESULT);
Regards
Abbas
Edited by: Abbas on Jul 19, 2011 12:37 PM

FRM-40735 WHEN-BUTTON-PRESSED TRIGGER RAISED UNHANDLED EXCEPTION ORA-01843

Hi everyone
When I run My form in Microsoft Windows Melinem , and I have Button on the form WHEN I press the button it works fine ,but when I run the same form in Microsoft Windows XP and WHEN I press the button it give this message :
FRM-40735
WHEN-BUTTON-PRESSED TRIGGER RAISED UNHANDLED EXCEPTION ORA-01843
AND I RECOMPILE THE FORM IN Microsoft Windows XP BUT STILL I AM GETING THE SAME MESSAGE
WAITING FOR YOU VALUABLE ANSWER .
BEST REGARDS
JAMIL ALSHAIBANI

Forms [32 Bit] Version 6.0.8.23.2 (Production)
Oracle9i Enterprise Edition Release 9.0.1.1.1 - Production
With the Partitioning option
JServer Release 9.0.1.1.1 - Production
and the script which is used in the button as the following :
DECLARE
CURSOR C1 IS
SELECT ITEM_CODE,AVERAGE_COST,STORE_CODE,ITEM_QUANTITY,TOTAL_COST
FROM IM_GOODS_RECIEVE_DETAILS
WHERE DOC_CODE = :IM_GOODS_RECIEVE_HEADER.DOC_CODE;
LOC_DOC_CODE VARCHAR2(10);
LOC_DOC_DATE DATE;
LOC_ITEM_CODE VARCHAR2(30);
LOC_ITEM_QUANTITY NUMBER(20,3);
LOC_CART_QTY NUMBER(20,3);
LOC_UNIT_CODE VARCHAR2(10);
LOC_TOTAL_COST NUMBER(20,6);
LOC_AVERAGE_COST NUMBER(20,6);
LOC_SUM_QTY NUMBER(20,6);
LOC_BALANCE NUMBER(20,6);
LOC_PRICE NUMBER(20,6);
LOC_BALANCE_COST NUMBER(25,6);
LOC_ITEM VARCHAR2(30);
L0C_TOT_COST NUMBER(20,6);
LOC_TOT_QTY NUMBER(20,6);
LOC_NEW_AVERAGE NUMBER(20,6);
LOC_ON_HAND_QTY NUMBER(20,3);
al_id Alert;
al_button NUMBER;
LOC_SYS_DATE DATE;
BEGIN
SELECT TO_DATE(TO_CHAR(SYSDATE,'DD/MM/YYYY')) INTO LOC_SYS_DATE FROM DUAL;
FOR R IN C1
LOOP
BEGIN
     SELECT B.ITEM_CODE ,SUM(NVL(ITEM_QUANTITY,0)) INTO LOC_ITEM ,LOC_SUM_QTY
FROM IM_TRANS_ISSUE_HEADER A,IM_TRANS_ISSUE_DETAILS B
WHERE A.DOC_CODE = B.DOC_CODE
AND B.DEL_STORE = R.STORE_CODE
AND ITEM_CODE = R.ITEM_CODE
AND DOC_DATE BETWEEN :IM_GOODS_RECIEVE_HEADER.DOC_DATE
AND LOC_SYS_DATE
GROUP BY
ITEM_CODE
ORDER BY B.ITEM_CODE ;
exception
     when no_data_found then
     NULL;
     when form_trigger_failure then
show_message(sqlerrm);
     raise form_trigger_failure;
     when others then
     show_message(sqlerrm);
     raise form_trigger_failure;
END;
     BEGIN
     BEGIN
     SELECT (NVL(QUANTITY_ON_HAND,0) + (NVL(LOC_SUM_QTY,0))),NVL(ITEM_PRICE1,0),
     NVL(QUANTITY_ON_HAND,0)
     INTO LOC_TOT_QTY,LOC_PRICE,LOC_ON_HAND_QTY
     FROM IM_LOCATION A, IM_INVENTORY B
     WHERE A.ITEM_CODE = B.ITEM_CODE
     AND A.ITEM_CODE = R.ITEM_CODE
     AND A.STORE_CODE = R.STORE_CODE;
     LOC_BALANCE := (:IM_GOODS_RECIEVE_DETAILS.ITEM_QUANTITY) - (LOC_TOT_QTY);
     LOC_BALANCE := - (LOC_BALANCE);
     LOC_BALANCE_COST := ((LOC_BALANCE) * (LOC_PRICE));
     L0C_TOT_COST := LOC_BALANCE_COST + :IM_GOODS_RECIEVE_DETAILS.TOTAL_COST;
     LOC_NEW_AVERAGE := ROUND(((L0C_TOT_COST)/(LOC_TOT_QTY)),5);
     exception
     when no_data_found then
     NULL;
     when form_trigger_failure then
show_message(sqlerrm);
     raise form_trigger_failure;
     when others then
     show_message(sqlerrm);
     raise form_trigger_failure;
     END;
     BEGIN
     SELECT 1 INTO :GLOBAL.DUMMY
     FROM COST_TEMP_SUM
     WHERE S_GOODS_DOC = :IM_GOODS_RECIEVE_HEADER.DOC_CODE
     AND S_GOODS_DATE = :IM_GOODS_RECIEVE_HEADER.DOC_DATE
     AND S_ITEM_CODE = R.ITEM_CODE;
     exception
     when no_data_found then
     INSERT INTO COST_TEMP_SUM
     VALUES(:IM_GOODS_RECIEVE_HEADER.DOC_CODE,
     :IM_GOODS_RECIEVE_HEADER.DOC_DATE,LOC_SUM_QTY,LOC_ON_HAND_QTY,
     LOC_TOT_QTY,LOC_BALANCE,R.ITEM_QUANTITY,
     LOC_PRICE,LOC_BALANCE_COST,R.TOTAL_COST,
     L0C_TOT_COST,LOC_NEW_AVERAGE,R.ITEM_CODE,LOC_SYS_DATE);
     when form_trigger_failure then
show_message(sqlerrm);
     raise form_trigger_failure;
     when others then
     show_message(sqlerrm);
     raise form_trigger_failure;
     END;
     END;
IF LOC_BALANCE_COST = 0 THEN
     UPDATE IM_INVENTORY
          SET ITEM_PRICE1 = R.AVERAGE_COST
          WHERE ITEM_CODE = R.ITEM_CODE;
ELSE
     UPDATE IM_INVENTORY
          SET ITEM_PRICE1 = LOC_NEW_AVERAGE,ITEM_PRICE2 = LOC_PRICE
          WHERE ITEM_CODE = R.ITEM_CODE;
END IF;
-- THIS FOR ISSUED ITEMS QUANTITY
FOR R2 IN (
SELECT B.ITEM_CODE as LOC_ITEM_CODE, NVL(ITEM_QUANTITY,0) as LOC_ITEM_QUANTITY,
A.DOC_CODE as LOC_DOC_CODE, AVERAGE_COST as LOC_AVERAGE_COST,
TOTAL_COST as LOC_TOTAL_COST,A.DOC_DATE as LOC_DOC_DATE,
CART_QTY as LOC_CART_QTY,UNIT_CODE as LOC_UNIT_CODE
FROM IM_TRANS_ISSUE_HEADER A,IM_TRANS_ISSUE_DETAILS B
WHERE A.DOC_CODE = B.DOC_CODE
AND B.DEL_STORE = R.STORE_CODE
AND ITEM_CODE = R.ITEM_CODE
AND DOC_DATE BETWEEN :IM_GOODS_RECIEVE_HEADER.DOC_DATE
AND LOC_SYS_DATE
-- AND :EXPENSES_TAB.EXP_DATE
ORDER BY B.ITEM_CODE )
LOOP
BEGIN
SELECT 1 INTO :GLOBAL.DUMMY
     FROM COST_TEMP
     WHERE T_DOC_CODE = R2.LOC_DOC_CODE
     AND T_DATE = R2.LOC_DOC_DATE
     AND T_ITEM_CODE = R2.LOC_ITEM_CODE;
exception
     when no_data_found then
INSERT INTO COST_TEMP
VALUES(R2.LOC_DOC_CODE,R2.LOC_DOC_DATE,R2.LOC_CART_QTY,R2.LOC_ITEM_QUANTITY,
R2.LOC_AVERAGE_COST,:IM_GOODS_RECIEVE_HEADER.DOC_CODE,
:IM_GOODS_RECIEVE_HEADER.DOC_DATE,R.ITEM_CODE,R.STORE_CODE);
when form_trigger_failure then
show_message(sqlerrm);
     raise form_trigger_failure;
     when others then
     show_message(sqlerrm);
     raise form_trigger_failure;
     END;
Begin
al_id := Find_Alert('POST_DATA');
IF Id_Null(al_id) THEN
Message('User_Warning alert does not exist');
RAISE Form_Trigger_Failure;
ELSE
** Show the warning alert
-- jamil al_button := Show_Alert(al_id);
** If user pressed OK (button 1) then bring up another
** alert to confirm -- button mappings are specified
** in the alert design
-- IF R2.LOC_ITEM_QUANTITY != 0 AND al_button = ALERT_BUTTON1 THEN
     IF R2.LOC_ITEM_QUANTITY != 0 THEN
BEGIN
UPDATE IM_TRANS_ISSUE_DETAILS
SET AVERAGE_COST = LOC_NEW_AVERAGE,
TOTAL_COST = LOC_NEW_AVERAGE * R2.LOC_ITEM_QUANTITY
WHERE DOC_CODE = R2.LOC_DOC_CODE
AND ITEM_CODE = R2.LOC_ITEM_CODE ;
END;
END IF;
END IF;
END;
END LOOP;
END LOOP;
GO_BLOCK('IM_GOODS_RECIEVE_HEADER');
:IM_GOODS_RECIEVE_HEADER.FLAG_COST := 1;
COMMIT;
SET_ITEM_PROPERTY('IM_GOODS_RECIEVE_HEADER.PUSH_BUTTON152',ENABLED,PROPERTY_FALSE);
SET_ITEM_PROPERTY('EXPENSES_TAB.PUSH_BUTTON151',ENABLED,PROPERTY_FALSE);
SHOW_MESSAGE('The New Cost Price updated Successfully !!!');
END;
BEGIN
     IF nvl(:IM_GOODS_RECIEVE_HEADER.FLAG_COST,0) = 1 THEN
Make_Block_Query_Only('IM_GOODS_RECIEVE_DETAILS');
     ELSIF nvl(:IM_GOODS_RECIEVE_HEADER.FLAG_COST,0) = 0 THEN
     Make_Block_Query_Only('IM_GOODS_RECIEVE_DETAILS');
     END IF;
END;
best regards
Jamil Alshaibani

FRM-40735:when-button-pressed trigger raised unhandled exception ORA-24247

hi all
i am using form 10g release2 i am having a problem
when i use the following stored procedure in form then i am getting this
error.
FRM-40735:when-button-pressed trigger raised unhandled exception ORA-24247
but the same code working fine when i use in SQLPLUS.
CREATE OR REPLACE PROCEDURE mail_attach (dir1 VARCHAR2, filename VARCHAR2)
AS
l_output utl_file.file_type;
l_file       RAW(32767);
l_size       NUMBER;
BLOCK       NUMBER;
b          BOOLEAN;
l_start NUMBER := 1;
TYPE ARRAY IS TABLE OF VARCHAR2(255);
l_data ARRAY := ARRAY([email protected]');
BEGIN
UTL_FILE.FGETATTR(dir1, filename, b, l_size, BLOCK);
l_output := utl_file.fopen('BACKUP', 'code.txt', 'r' );
utl_file.get_raw(l_output, l_file, l_size);
utl_file.fclose( l_output );
FOR i IN l_start .. l_data.COUNT
LOOP
    UTL_MAIL.SEND_ATTACH_RAW (
        sender   => 'Mailer',
        recipients => l_data(i),
        subject   => 'Data for ' || TO_CHAR((SYSDATE-1),'DD-MON-YYYY'),
        attachment => l_file,
        message   => 'Dear User, Please find attached the upload
data for the period mentioned in the subject line.',
        att_inline => FALSE,
        att_filename => filename);
       l_start := l_start + 1;
END LOOP;
END;and this is used in form when-button-pressed trigger.
BEGIN
mail_attach('UTL_PATH','code.txt');
     message('FIle send successfully');
     message('File send successfully');
END;

hi
Mehwish now check the following code and its working fine with me in form..........
declare
     dir1 VARCHAR2(200);
      --filename VARCHAR2(200):='Logon.jpg';
       filename VARCHAR2(200);
l_output utl_file.file_type;
l_file       RAW(32767);
l_size       NUMBER;
BLOCK       NUMBER;
b          BOOLEAN;
l_start NUMBER := 1;
TYPE ARRAY IS TABLE OF VARCHAR2(255);
l_data ARRAY := ARRAY('[email protected]');
BEGIN
-- EXECUTE IMMEDIATE 'ALTER SESSION SET smtp_out_server = ''192.168.56.103:25''';-- this is IP address and port of the server
UTL_FILE.FGETATTR(dir1, :filename, b, l_size, BLOCK);
--select directory_path into :filepath from dba_directories where directory_name='BACKUP';
l_output := utl_file.fopen('BACKUP',:filename, 'r' );-- i added :filename as a text item.
utl_file.get_raw(l_output, l_file, l_size);
utl_file.fclose( l_output );
FOR i IN l_start .. l_data.COUNT
LOOP
    UTL_MAIL.SEND_ATTACH_RAW (
        sender   => 'Mailer',
        recipients => l_data(i),
        subject   => 'Data for ' || TO_CHAR((SYSDATE-1),'DD-MON-YYYY'),
        attachment => l_file,
        message   => :f,-- this is message item.
        att_inline => FALSE,
        att_filename => :filename);--this is attachment file name.
       l_start := l_start + 1;
END LOOP;
message('File Send Successfully');
message('File Send Successfully ');
END;hope this helps you.
Attachment and mail are working fine with me, i can send attachment..............
sarah

When Button Pressed: 3171265167539056707

I have a choice 3171265167539056707 listed under "When Button Pressed". What is that?

Yeah, I have seen these cases where "foreign keys" are left dangling in the App Builder.
When you delete a item, all computations based on that item are deleted
Similarly, when you delete a button, all after-submit components based on that button should be automatically deleted (or at least set to Unconditional).

When button pressed: Multiple buttons

Regarding the 'When Button pressed' condition available in various places (computations, branches, processes, etc), it offers me the option to select exactly one button.
How can I make it so that I want the thing to fire when either Button 1 or 2 or 3 is pressed?
Thanks

Martin - Whenever a page is submitted with a button, the request value is set to a property from the button, either the button name for standard buttons or the request value attribute for item buttons. In either a PL/SQL expression condition or in some of the declarative condition types that look at the request value, you can compare it to a list of values that you're interested in.
Note that the request value doesn't necessarily tell you which button was pressed. It tells you that some event set the request value. If your page can be submitted with a tab or with javascript that you put somewhere on the page, or if you've given multiple buttons the same request value, it's up to you to prevent ambiguity about the button-to-request mapping.
Scott

WHEN BUTTON PRESSED TRIGGER

Hi,
I've created a form with 4 data blocks (each of which has its' own canvas, items, and window). On my first canvas, I've created "push buttons" for the user to select which canvas (block/window) they go to next. I've attached WHEN-BUTTON-PRESSED triggers to each of these buttons (which execute a go_block command), however, when I first run the form and click on a button, nothing happens. If I execute a query BEFORE I click on a button, they all work fine and take me to the correct canvas. Could someone please tell me how I can get these buttons to work WITHOUT having to execute a query first? I've looked at all the property palettes, etc. and can't see any attribute that I can set.....any help would be greatly appreciated. Thank you. (I'm using Forms 9.0.4.0.19)

Thank you so much for your responses. I had changed the
Fire In Enter-Query Mode to No, but that didn't help, however, changing the trigger from WHEN-BUTTON-PRESSED to WHEN-MOUSE-CLICK did the trick - it works fine.
Can you suggest a good reference for determining which type of trigger you should use?
Thanks again for your responses - I really appreciate it!

When-button-pressed---trigger raised unhandled exception ORA-06502

Dear all,
I am trying to implement a hierarchical tree using the following codes on
when-button-pressed
DECLARE
htree item;
my_sql VARCHAR2 (200) := 'select 1, level, hee_name,null, to_char(hee_no)
from hrm_employee
connect by prior hee_id=hee_dirsup_id
start with hee_dirsup_id is null
order siblings by hee_name';
BEGIN
htree := FIND_ITEM ('trees.tree10');
ftree.SET_TREE_PROPERTY (htree, ftree.query_text, my_sql);
ftree.POPULATE_TREE ('htree');
END;
i am unable to see my hierarchical tree and i am having the above error message.
Can anybody please help me sort this out? Is there any chunks of codes missing resulting to this error.
I'll be very grateful for any help :)
sheetal.

Hi sheetal
trigger raised unhandled exception ORA-06502
Cause* :This error occurs when you try to assign a value to a variable, but the value is larger than the variable can handle.
or if you are trying to assign a non-numeric value to a numeric variable.
--=========================
Action*: pls change the my_sql VARCHAR2 *(200)* to my_sql VARCHAR2 *(2000)*
i am unable to see my hierarchical tree
Pls have a look here at Andreas Weiden sample code....
Hope this helps...
Regards,
Amatu Allah.

How do I execute a 'remote' when-button-pressed trigger?

I am using Forms 6 in an 8i/10g environment. I have a data block (COMPACT) which is on canvas MAIN. Compact has an item (button) called CREATE_COMPACT, with a when-button-pressed trigger. I also have an error canvas which has a button called RESTART, so they can restart the entire build after an error. The restart code is exactly the same as the create_compact code, and, after the restart, I want the focus to be the main canvas, so I would like to just have the restart when-button-pressed trigger shift focus to the CREATE_COMPACT trigger and execute it. I have tried:
go_item( 'Compact.Create_Compact' );
do_key( 'Enter' );
This switched me to CREATE_COMPACT but did not execute the trigger. I then tried:
execute_trigger( 'Compact.Create_Compact' );
and then:
execute_trigger( 'Create_Compact' );
but neither of these work. I get error FRM-40700 no such trigger. Is there any way to do this short of copying code or creating a pl/sql procedure?
thanks

do_key('ENTER') will execute the code in a KEY-ENTER trigger so I suggest you move your code into the KEY-ENTER trigger. On your when-button-pressed trigger you should also use do_key('ENTER');

Looping through a table Help needed ....Forms 10g..... When Button Pressed

Hye craig, hamid, christian and all ...........
i have a user access interface which i create where there are two fields username and password and a button,
i have also created a table USERS for users which have username and password fields ..... On useraccess interface i coded on WHEN BUTTON PRESSED like this
declare
go_block('users');
execute_query;
declare
begin
     if :useraccess.username=:users.username and
          :useraccess.password=:users.password then
          go_block('MAINPAGE');
          else
          go_block('USERACCESS');
          MESSAGE('SORRY WRONG PASSWORD OR NOT A REGISTERED USER');
          MESSAGE('SORRY WRONG PASSWORD OR NOT A REGISTERED USER');
          end if;
end;
This code works for a single user in USERS table but for multiple users there has to be some looping system
which matches the USERACCESS and USERS tables fields thoroughly ....

Hi Majid,
I can suggest you a workaround for this. raise a ON-LOGON trigger and you can use the LOGON_SCREEN builtin to flash the logon screen at runtime. And then try capturing the username and password.
DECLARE
connected BOOLEAN := FALSE;
tries     NUMBER := 3;
un        VARCHAR2(30);
pw        VARCHAR2(30);
cs        VARCHAR2(30);
BEGIN
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
WHILE connected = FALSE and tries > 0
LOOP
    LOGON_SCREEN;
    un := GET_APPLICATION_PROPERTY( USERNAME );
    pw := GET_APPLICATION_PROPERTY( PASSWORD );
    cs := GET_APPLICATION_PROPERTY( CONNECT_STRING );
    LOGON( un, pw || '@' || cs, FALSE );
    IF FORM_SUCCESS
    THEN
      connected := TRUE ;
    END IF;
    tries := tries - 1;
END LOOP;
IF NOT CONNECTED THEN
    MESSAGE('Too many tries!');
    RAISE FORM_TRIGGER_FAILURE ;
END IF;
END ;   a sample piece of coding to help you out.
Regards,
Manoj Chakravarthy

GO-ITEM - WHEN-BUTTON-PRESSED - SQLAP-10048 - You have not selected a record.

Similar Messages

Maybe you are looking for