Pls anyone correct my error-urgent

Question

i m working with maker-cheker screen.
i m getting FRM-40654 error Records has been updated by another user.Re-query to see change
my code is as follows.
     IF :PARAMETER.V_UTYPE = 'C' THEN
               NProdid := :Productid;
               CLEAR_FORM(NO_VALIDATE);               
               SET_BLOCK_PROPERTY('CS_TB_PRODUCTINFO',QUERY_DATA_SOURCE_NAME,'CS_TB_MKRCHKR_PRODUCTINFO');
               GO_ITEM('CS_TB_PRODUCTINFO.PRODUCTID');               
               SET_BLOCK_PROPERTY('CS_TB_PRODUCTINFO',DEFAULT_WHERE,'PRODUCTID='||Nprodid);
               NProdid := :Productid;
               CLEAR_FORM(NO_VALIDATE);          
               EXECUTE_QUERY;
               N:=GET_BLOCK_PROPERTY('CS_TB_PRODUCTINFO',QUERY_HITS);
               IF N = 0 THEN
                    Set_Alert_Property('ALR_OK_EX', ALERT_MESSAGE_TEXT,'The record has been modified by the maker');
                         IF SHOW_ALERT('ALR_OK_EX')= ALERT_BUTTON1 THEN
                              set_item_property('BLK_BUTTONS.authorize',enabled,property_false);     
                              RETURN;
                         END IF;     
               ELSE
                    set_item_property('BLK_BUTTONS.authorize',enabled,property_true);     
                    set_item_property('BLK_BUTTONS.reject',enabled,property_true);
                    SET_ITEM_PROPERTY('BLK_BUTTONS.EXIT',ENABLED, PROPERTY_TRUE);
               END IF;     
     END IF;
kindly tell me how to solve it.

Answer 1

hi,
if NProdid is a database item, you will exp this error. or if any commit is given inbetween and without requerying you to try to change the database item you will exp. this error
NProdid := :Productid;
Thx
Lakshmi