Get_record_property

Hi all.
I've a form for filling the establishment datas like, estab_cod, estab_name, estab_add, phone and so on.
If the user changes some information a window comes up when the key-commit is pressed so that the user explain why. All the informations are saved in the log table called 'estab_log' in which there's a column 'log' that is added 1 to control it.
I was working with Global Variables making comparison among them after 'key-next-item' trigger, but it is so hard.
I've tryied to use the get_record_property in the key-commit trigger in the block level so that call my 'update_log' trigger, but it didn't worked out 'cause always the cursor is in the field due to the user navigation, Forms 'understands' that the record has been changed and then it's saved again in the log table.
Is there any way to solve it?
Regards,
Anderson
Edited by: AS_Anderson on Nov 4, 2008 8:55 AM

Hi, aweiden.
Thanks for your help.
Actually, my application has already a window that forces user to provide the change reason. Although, it has been fired when forms is committed.
When I say that it does not work, it means that Forms 'understands' that field was changed even by user navigation.
For example, if user executes the query the GET_RECORD_PROPERTY built-in gets the status = 'changed' even though there's no changing. Please see below:
-- QUERY
BEGIN
ENTER_QUERY;
EXECUT_QUERY;
GO_ITEM('ESB_COD'); /* Focus on the field now.
But if I check the Record_Status in this time is Changed
due to the Focus on the field */
END;
--TRIGGER KEY-COMMIT:
BEGIN
IF GET_RECORD_PROPERTY(1,'ESB_COD',STATUS) = 'CHANGED'
THEN
GO_BLOCK('CHANGING');
GO_ITEM('CHANG_REASON');
END IF;
COMMIT;
END;
I hope to have been more clear.
Thank you, again.
Regards,
Anderson

Similar Messages

How to remove the actions of ON-ERROR trigger.

Hi to All,
I have this problem. In my form this is the code in ON-ERROR trigger:
DECLARE
Cur$Item           VARCHAR2(100) ;
Cur$NumMsg     NUMBER := MESSAGE_CODE ;
Cur$TxtMsg       VARCHAR2(80) := MESSAGE_TEXT;
BEGIN
   IF Cur$NumMsg = 40202 THEN
       Cur$Item := GET_ITEM_PROPERTY(:SYSTEM.CURSOR_ITEM, PROMPT_TEXT) ;
       Disp_Alert(5, Cur$Item) ;
   END IF ;
END ;In my Toolbar I have a Button for delete_record and in the WHEN-BUTTON-PRESSED trigger this is the code
DECLARE
btn$Ret Number ;
BEGIN
   Go_Block('MYBLOCK') ;
   IF Get_Record_Property(:system.cursor_record,'MYBLOCK',STATUS) IN('NEW','INSERT','CHANGED') THEN
       SET_RECORD_PROPERTY(:SYSTEM.CURSOR_RECORD,'MYBLOCK',STATUS,QUERY_STATUS) ;
      CLEAR_FORM(NO_VALIDATE) ;
      Go_Block('MYBLOCK')) ;
      EXECUTE_QUERY ;
ELSE
     DISP_ALERT(btn$Ret,101,'MYITEM');
     IF btn$Ret = ALERT_BUTTON1 THEN
         DO_KEY('DELETE_RECORD') ;
         commit;
     END IF ;
END IF ;
END ;The Button DELETERECORD work correctly, but (before exit) the trigger ON-ERROR is executed if the item where the cursor is located is empty.
Exit a method in order to disable the effect of this trigger when the button DELETERECORD is pressed ? If yes, how ?
I hope that someone can help me .
Thank You
Gaetano

Set a parameter or global variable in the beginning of your delete procedure. Check the value in the on-error trigger. If it is set then don't do anything in the on-error trigger. Unset the parameter or global variable just before you exit your delete procedure.
NumbNutz

Validation on unsaved records of block on oracle form.

In my oracle apps standard form i've approx 8 blocks. i want to write validation on first block(T1) on base of unsaved or saved records on second block(T2).
Data are only on oracle forms not in data base so i cannot use table.
Whenever user moved from T2 to T1 then i've check how many unsaved record are there on base need to write validation.
Its very urgent. Your immediate help would be appreciated.
Thanks

Thanks for replying.
I've checked with GET_RECORD_PROPERTY but i'm getting status like NEW,CHANGED,QUERY.
My questions is i wanna to make validation on T2 block un saved data.
i want data values in T1 block.
Regards,

Bean Not Found (Invalid Property name oracle.forms.webutil.clientinfo....)

Hi All
i have configured the
WebUtil V:106
Jacob v:18
On My Middle Tire
Application Server: V:9.0.4
Connecting To Database: V:8.1.7
"i did recreate the packages for 8i like dbms_lob and ...etc"
my WebUtil Form Work's Fine
as
it displays me the versions for all webUtil Functions 1.0.6
Also when i try to get the Current Browser IP Address it get me successfully .
when i submet this statment to get current browser userinfo like :
webutil_clientinfo.GET_SYSTEM_PROPERTY('user.home')
it workes fine .
The Problem IS:
When is issu this statment :
webutil_clientinfo.GET_SYSTEM_PROPERTY('oracle.forms.webutil.clientinfo.GetClientInfo')
it gives me the error "in jinit":
webutil_clientinfo.GET_SYSTEM_PROPERTY('oracle.forms.webutil.clientinfo.GetClientInfo')2008-فبر-04 15:00:26.984 ERROR>WUI-304 [getSystemProperty()] Invalid Property name oracle.forms.webutil.clientinfo.GetClientInfo supplied
Also When I Try this to Open A Browes Dialog:
DECLARE
FILENAME VARCHAR2(3000);
BEGIN
IF GET_RECORD_PROPERTY(:SYSTEM.CURSOR_RECORD,:SYSTEM.CURRENT_BLOCK,STATUS)IN ('NEW','INSERT') THEN
filename := webutil_file.file_selection_dialog('C:\Temp','*.*','all files (*.*)|*.*|PDF files (*.pdf)|*.pdf|','Select your file ...');
END IF;
END;
it gives me this Error:
WebUtil Error: oracle.forms.webutil.file.filefunctions bean not found. WEBUTIL_FILE.FILE_SELECTION_DIALOG_INT will not work
And My Java Console Contain :
Oracle JInitiator: Version 1.3.1.17
Using JRE version 1.3.1.17-internal Java HotSpot(TM) Client VM
User home directory = C:\Documents and Settings\Speed
Proxy Configuration: Manual Configuration
Proxy: 10.0.0.1
Proxy Overrides: *.mydomain.com<local>
JAR cache enabled
Location: C:\Documents and Settings\speed\Oracle Jar Cache
Maximum size: unlimited
Compression level: 1
c: clear console window
f: finalize objects on finalization queue
g: garbage collect
h: display this help message
l: dump classloader list
m: print memory usage
q: hide console
s: dump system properties
t: dump thread list
x: clear classloader cache
0-5: set trace level to <n>
Loading http://myserv.mydomain.com/forms90/java/f90all_jinit.jar from JAR cache
Loading http://myserv.mydomain.com/forms90/java/frmwebutil.jar from JAR cache
Loading http://myserv.mydomain.com/forms90/java/jacob.jar from JAR cache
proxyHost=null
proxyPort=0
connectMode=HTTP, native.
إصدار بريمج Forms هو : 9.0.4.0
2008-فبر-04 15:40:19.511 ERROR>WUI-304 [getSystemProperty()] Invalid Property name oracle.forms.webutil.clientinfo.GetClientInfo supplied
Message was edited by:
IGBSpeed

Check whether your webutil.olb is subclassed properly or whether the olb file is available in runtime environment..

When-validate-record trigger only if a non database item is changed

Hi,
I am trying a code in the when-vaidate-record trigger in the BLOCK level.
The trigger should fire only if a checkbox item value is ticked(Value ='Y) for the present record(i.e, if already existing other records have a value ticked (='Y), it doesnt matter and trigger shouldnt fire)
Please help me achieve this :
The code I have tried in when-vaidate-trigger, which does not work as what I want :
DECLARE
X NUMBER;
BEGIN
if
nvl ( :DEFLOC.to_be_defaulted, 'N' ) = 'Y' and :DEFLOC.COMMENTS is NULL
and :SYSTEM.RECORD_STATUS ='CHANGED'
     then
    set_alert_property(
         'err_alert',
         alert_message_text,
         'You must enter a comment when defaulting localities.');
          x := show_alert('err_alert');
          RAISE FORM_TRIGGER_FAILURE;
          end if;
END;The above code does not fire at all..
If I remove the part,
and :SYSTEM.RECORD_STATUS ='CHANGED'
it fires for "all records"(not just the currently changed records) where nvl ( :DEFLOC.to_be_defaulted, 'N' ) = 'Y' and :DEFLOC.COMMENTS is NULL
Please help !!
Note: :DEFLOC.to_be_defaulted is a non database item ; :DEFLOC.COMMENTS is a database item

Hi kriti,
There is one more way,
In the when-checkbox-changed trigger,
if :your_chk_box = 'Y' then
set_Record_property(:system.cursor_Record, 'your_blk',status,changed_Status);
else
set_Record_property(:system.cursor_Record, 'your_blk',status,Query_Status);
end if;
Then it is easy for you to find out the changed records using get_Record_property((:system.cursor_Record, 'your_blk',status)
Hey let me ask you one Question, is that check_box item is database item ???
If so,
it is easier..the fol. code will work for that
if   nvl ( :DEFLOC.to_be_defaulted, 'N' ) = 'Y' and :DEFLOC.COMMENTS is NULL
and nvl(get_item_property('DEFLOC.to_be_defaulted',database_value),'N') = 'N'      then
                  set_alert_property(
         'err_alert',
         alert_message_text,
         'You must enter a comment when defaulting localities.');
          x := show_alert('err_alert');
          RAISE FORM_TRIGGER_FAILURE;
          end if;otherwise
If your are creating that temp. item, it should be in the same block as non-db item.
I will explain this... You are setting the status of to_be_defaulted check box of some queried record to Y based on some conditions, right?
These records anyways are not updateable. Now your requirement is to find out the newly checked check boxes.
So in the post query or the place where you set to_be_defaulted as 'Y, we will default the new item with value Y, so that in the when validate trigger, you
know which record needs to attacked, It is those records with nvl( new item ,'N') = 'N' and to_be_defaulted = 'Y'...
Regards
Dora...

DELETE_RECORD changes the Record_status to 'NEW' HELP ME

Hi Gurus,
I have only one record in my block.
I am trying to delete it and it executed all the Triggers like PRE-DELETE, KEY-DEL-RECORD succesfully. But when I save it, it gives FRM-40202.
This only happens when I try to delete the last record in the bloc, because, the DELETE-RECORD built in in the KEY-DEL-REC changes the record status in the block to NEW and when I try to save the form there is a required filed, which causes the Save to faile.
But if there are more than 1 record in the block this is not a problem.
Gurus, please help me as I have to promote this code ASAP to production.
Thanks in advance.

check there is any assignment stmts to the db columns in triggers other than when-create-record and when-validate item
If yes, try to bring those assignments to other triggers so as the record-status is not changed.
Actually, after deletion, the status should be NEW
Else
check in your save trigger the get_record_property('blk',status) when you press save ..just chk its status before and after commit; in the form........
this problem comes only if record status is changed...
find out what is the reason for record status change
If you have mul.records, this prob. will not come as cursor is in the previous rec. with all values filled...

I: Patch 6.5.3.1 for 9i available via Supplement Option

On headstart patch 6.5.3.0 (patch version ONLY for Oracle 9i Forms), there is a bug introduced in library qmslib65.pll
How to reproduce
================
- Start the headstart demo
- From the menu open form Forms --> Project Business Rules
- Press F8 (execute query)
- Now you see project 1, without detail records(no employees)
- Click on the item 'Employee' (first empty record)
- Click on the item 'Name' of the Project in the master
- Now message 'FRM-40202 Field must be entered' appears
Location of the problem
=======================
QMSLIB65.pll qms$context package body
contains the following code:
. -- fix 6.5.3.0
. if get_record_property(name_in('system.cursor_record')
. ,name_in('system.cursor_block'),STATUS) = 'NEW'
. then
. set_record_property(name_in('system.cursor_record')
. ,name_in('system.cursor_block'),STATUS,INSERT_STATUS);
. end if;
. -- end fix 6.5.3.0
This piece of code should be deleted completely
Fix
===
This problem has been fixed in patch 6.5.3.1 for Headstart for Oracle 9i Forms. This patch is downloadable from the Supplement Option web site.
Kind Regards, Marc Vahsen
Headstart Team

I think I've found a bug in this release: If you have an LOV defined on a report parameter (with value and description), the when-validate-item trigger of the field will validate the description against the LOV. It adds the following code to the validation query: ||l_where_and || l_description_column || ' = ' || '''' || name_in (qms0012f.get_param_description_item(p_block_name))||''''
Th descriptor column in this case is the alias (= "description"). However, you cannot use column aliases in a where-clause. This will never work!!
Is there a fix for this problem?

Handling oracle forms errors (frm-nnnnn) locally

is there a way to handle an oracle form error (e.g. frm-40508) locally in a way similar to handle oracle database errors.
e.g.
procedure insert_something is
insert_error exception;
pragma exception_init(insert_error,-40508);
begin
:c1.a := 1;
:c1.b := 2;
commit_form;
exception
when insert_error then
<handle insert error on c1 block>;
end;
Edited by: mojo on Oct 7, 2008 4:34 AM

by locally i mean within the pl/sql block that will have raised the error.
an example i encoutnered recently, but by no means the only occasion i have wished such things:
function mseRecStatus returnvarchar2 is
rtnChar varchar2(32);
begin
rtnChar := get_record_property(mouseRec,mouseBlock,status);
return rtnChar;
end;
This is called from a pre-pop-menu trigger. mouseRec and block are calculated previously. A right-click on a record item below the last record raises error frm-40741 (unable to locate record on block). it would be nice to be able to do something like the following without incolving an on-error trigger:
function mseRecStatus returnvarchar2 is
rtnChar varchar2(32);
non_record_clicked exception;
pragma exception_init(non_record_clicked,-40741);
begin
rtnChar := get_record_property(mouseRec,mouseBlock,status);
return rtnChar;
exception
when non_record_clicked then
return null;
end;

Dynamic Record Creation

Hello Friends,
In my form i am populating three rows R1 R2 R3.in the new record if the :new.R1 is Greater then old.R2 then the new record will be splitted into two parts.and in that sense i want to create a record dynamically.and i also want to insert some of the old.R3 value to be inserted to :new.R3(dynamically created). is it possible?i m using forms 6i.
and after that i save those things to a table.
Regards,
Sourav

Here are some of the built-ins for handling records. These are described in the help documentation.:
new_record;
next_record;
previous_record;
first_record;
last_record;
delete record;
clear_record;
duplicate_record;
SYSTEM.CURSOR_RECORD
SYSTEM.TRIGGER_RECORD
get_record_property()
go_record();

Poor memory or poor documentation?

This might be no more than a failure of my memory, but I can't figure out what the up statement in the following does:
     IF :System.Record_Status = 'NEW' THEN
          vRecNum := :System.Cursor_Record;
               up;
     END IF;
I can't seem to find any documentation of this as a valid PL/SQL statement, but it obviously is-this compiles without error (although the form as a whole generates an error, possibly caused by whatever this statement does).
thanks.

:System.Record_Status and :System.Cursor_RecordThese are Oracle Forms internal system variables. A search of the Forms Help system would have given you all the information you need about these variables. For example; Start the Forms Help system, Click on the Index tab and type "System" in the search field...
SYSTEM.RECORD_STATUS System Variable
Syntax
SYSTEM.RECORD_STATUS
Description
SYSTEM.RECORD_STATUS represents the status of the record where the cursor is located. The value can be one of four character strings:
CHANGED - Indicates that a queried record's validation status is Changed.
INSERT - Indicates that the record's validation status is Changed and that the record does not exist in the database.
NEW - Indicates that the record's validation status is New.
QUERY - Indicates that the record's validation status is Valid and that it was retrieved from the database.
Usage Notes
Both SYSTEM.RECORD_STATUS and the GET_RECORD_PROPERTY built-in return the status of a record in a given block, and in most cases, they return the same status. However, there are specific cases in which the results may differ.
SYSTEM.RECORD_STATUS can in certain cases return a value of NULL, because SYSTEM.RECORD_STATUS is undefined when there is no current record in the system. For example, in a When-Clear-Block trigger, Oracle Forms is at the block level in its processing sequence, so there is no current record to report on, and the value of SYSTEM.RECORD_STATUS is NULL.
GET_RECORD_PROPERTY, on the other hand, always has a value of NEW, CHANGED, QUERY, or INSERT, because it returns the status of a specific record without regard to the processing sequence or whether the record is the current record.
SYSTEM.RECORD_STATUS Examples
Assume that you want to create a trigger that performs a commit before clearing a Changed record. The following Key-CLRREC trigger performs this function.
IF :System.Record_Status IN ('CHANGED', 'INSERT') THEN
   Commi t_Form;
END IF;
Clear_Record;Related topics
GET_RECORD_PROPERTY built-in
SET_RECORD_PROPERTY built-in
SYSTEM.BLOCK_STATUS examples
Craig B-)
If someone's response is helpful or correct, please mark it accordingly.
Edited by: CraigB on Jan 7, 2011 2:24 PM

XAPI on a multi form

I have a j2ee application . Would like transactional APIs to encapuslate data access logic . How to perform multi record operations ( multi part form ) using XAPI ?
Apex does this on its own method .. Wonder how you have implemented this feature ?
Thanks in Advance

Thanks for your input Zakaoullah and Gerd.
After some experimentation I took a slightly different approach:
* I used POST-QUERY for setting the VA's of the fetched records
* I used a combination of WHEN-NEW-RECORD-INSTANCE and POST-RECORD for moving around within the block after the records were fetched, using GET_RECORD_PROPERTY to determine whether the record was existing or new.
It now works as requested.
Thanks again.

Searching master block based on value in detail block

I have two blocks on a form. A master block for purchase orders and a detail block for the line items. I need to provide users with the ability to search the purchase orders based on the values entered into the detail block (line items), during the query entry. I am considering to check to see which block the cursor resides by using the :SYSTEM.CURSOR_BLOCK variable, then retrieving the value from the current item and running a query, using that query. The problem is that I am not very familiar with Forms and do not know how to implement my idea. Any ideas?
null

I copied you an example from metalink. Hope it will help.
Doc ID:
Note:109583.1
Subject:
How to query a Master record from a Detail Block
Type:
BULLETIN
Status:
REVIEWED
Content Type:
TEXT/PLAIN
Creation Date:
22-MAY-2000
Last Revision Date:
03-AUG-2001
PURPOSE
------- To query a master record from a detail record. DESCRIPTION
=========== The user would like to enter a query criteria in the detail block
and then query the master record based on the above user input. SOLUTION
======== Create the master and detail blocks and the relationship in the usual
manner. We will consider here the blocks DEPT and EMP based on the
SCOTT schema. 1. Create a KEY-ENTQRY trigger at the block level of the detail block
(EMP) and add the following code in it : GO_BLOCK('dept');
CLEAR_BLOCK(no_commit);
GO_BLOCK('emp');
ENTER_QUERY; 2. Create a KEY-EXEQRY trigger for the detail block and add
this : EXECUTE_QUERY;
:global.deptno := :emp.deptno;
:global.flag := 'T';
GO_BLOCK('dept'); This will store the value of the deptno (primary key) in a global variable
:global.deptno and set another global variable :global.flag to 'T'. This
will be explained as we progress. 3. Create a WHEN-NEW-RECORD-INSTANCE trigger for the detail block
and add the following : -- This is used to populate the MASTER block with the corresponding
-- record whenever the user navigates through all the records in the
-- DETAIL block if get_record_property(:system.cursor_record,:system.cursor_block,status) = 'QUERY' then
SELECT rowid,deptno,dname,loc
INTO :dept.rowid,:dept.deptno,:dept.dname,:dept.loc
FROM dept
WHERE deptno = :emp.deptno; -- This is to set the status of the record populated
-- to QUERY and not to create a new record SET_RECORD_PROPERTY(1,'dept',status,QUERY_STATUS);
end if; 4. Create a WHEN-NEW-BLOCK-INSTANCE trigger for the master block again
and add this : if :global.flag = 'T' then -- set the variable to a different value
:global.flag := 'F';
:dept.deptno := :global.deptno; -- This will query the master table for the record based on the
-- deptno of the detail table which is stored in :global.deptno -- For ex: if an employee of department 10 has been queried in
-- the detail, then the global.deptno will have the value 10,
-- which is used in the query below to fetch the master record. SELECT rowid,deptno,dname,loc
INTO :dept.rowid,:dept.deptno,:dept.dname,:dept.loc
FROM dept
WHERE deptno = :global.deptno;
set_record_property(:system.cursor_record,'dept',status,QUERY_STATUS);
GO_BLOCK('emp'); end if; EXPLANATION
=========== Actually in the above method we are using the base table blocks as a
non-base table block when we query the master from detail. We are
displaying the master record fetched from the table based on
the query supplied in the detail. So after the fetch, if we clear the
block or form then we get a "Do you want to save the changes you have made"
alert. So in order to supress this while entering a normal master-detail
query, we have created the global variable, :global.flag. There is a limitation though, if you query detail records and then
navigate to the master block and then press the down arrow( i.e.,
navigate to the next record) and then presses the up arrow to
navigate back to the same record, then the detail records that
were originally populated will change and a new set of records will
get displayed. This is because the normal master-detail query is
taking place during MASTER record navigation. This can be controlled by creating a flag (global variable) and setting
its value and thus preventing the user from navigating to the next master
record. Do the following : 1) In the KEY-EXEQRY trigger of the detail add the following :global.control_master := 1; 2) Create a KEY-EXEQRY for the master and add this : :global.control_master := 0;
EXECUTE_QUERY; 3) Create a KEY-DOWN in the master with the following in it: IF :global.control_master <> 1 THEN
down;
END IF; Declare all the global variables before running the Form. RELATED DOCUMENTS
Note:611.1

How to check if it is first record

hi..
i have a block with some items SL,STAFF, NAME..., of multiple record.
while entering data, i want to check whether this record is first record....
if it is firs record i have to know the SL of last entry from DB and based on that generate next SL.
" just let me know how to check whether it is my first record ..????"
thnx ..

ManiKanchan wrote:
it worked
plz tell me one more thing..
" how to get the value of a item of previous record...?"
example.. to know the value of SL of previous record , i tried
VARIABLE := Get_Record_Property( GET_BLOCK_PROPERTY('BLOCK_NAME',CURRENT_RECORD)-1, 'BLOCK_NAME', :BLOCK_NAME.SL);
But, did not work...help..!!!Why u thinking of this..
Best way for sl generation is Sequence. try to use it.
Other way write this at block-level trigger Pre-Insert
SELECT NVL(MAX(AD_ID),0)+1 INTO :CUST.AD_ID FROM ACC_DTL;but this isn't good idea.
Red this Auto generate Invoice Number
Hopes this helps
If someone response is helpful or correct, please mark it accordingly.

Populating a message when cursor leaves the current record unsaved

Hi ALL
Can any one please tell me how to do the following.
I have a Custom Form, In that if the user updates a record and does not save it and goes to the next record, it should populate an alert to the user for saving the record.
Or if putting it in different way: If the cursor leaves record not saving after update, then the alert should pop-up. However after doing update if the user directly goes and saves the record, then it should not populate any message.
I have added an alert, but not sure on which trigger to put it rather not sure how to get the record status whether saved or not, so that based on that condition I can raise the alert may be in POST-RECORD trigger.
Some sample code would be a great help.
Thanks
Madhu

Look for Get_Record_Property in the online help. The only property you can read is Status, that's the one you want.

Doubt in system variable.

hi,
i want to know what is system.record_status and value like changed,insert,new,query and where all it is used.
what is differnce between system.record_status and get_record_property.

Hi
A system variable_ is an Oracle Forms variable that keeps track of an internal Oracle Forms state. You can reference the value of a system variable to control the way an application behaves.
Oracle Forms maintains the values of system variables on a per form basis. That is, the values of all system variables correspond only to the current form.
SYSTEM.BLOCK_STATUS_ represents the status of a Data block where the cursor is located,or the current data block during trigger processing.
The value can be one of three character strings:
CHANGED     Indicates that the block contains at least one Changed record.
NEW     Indicates that the block contains only New records.
QUERY     Indicates that the block contains only Valid records that have been
retrieved from the database.Regards,
Abdetu...
Edited by: Abdetu on Jan 23, 2011 11:19 PM

Get_record_property

Similar Messages

Maybe you are looking for