Calculation in a Multi Reord Block

Dear
I have a problem in the multirecord block as follows
I have an Item say Code which can take values A,B,C,D
I have another Item say Value which takes number
The requirement is the default value of Code B is 40%
of A but the user can change it. Not only that after
saving the records if user changes the value of Code
A then at he same time the value of code B should be
default i.e. 40% of new value of A.
Please show me the light to solve this problem.
Thanks
Abhijit Mallick

Kevin
I also know that but the problem is as it is a multirecord block I am founding some problem
1. When Validate Item is restrickted then how to change the Code B's value
2. In which record the Code B exists
Abhijit

Similar Messages

How to do it in multi-record block

Hi all,
i have 1 text items in a multi-record block number of record displayed 10
and i have values like 100 , 50, 30 in first 3 records and in 5th record i want to put some value like
20 then i want to calculate all values like 100 + 50 + 30 +20 = 200 and i want to put the total value in a single record block.
but my problem is i cannot able to calculate all the value because for the totale value i have to
write a for loop to loop through the record
but go_block() is not working in post_change .
if any solution is there plz suggest.......

Hi zeeshan
my problem is i cannot able to calculate all the value because for the total value
put the total value in a single record block.
First pls the following...
Guidelines for Working with Calculated Items Calculated items_
1- They are display-only control items.
2-Calculated items cannot be database items.
3.While you can set a calculated item's Enabled, Mouse Navigate, and Keyboard Navigable properties to Yes,
you cannot set the Insert Allowed or Update Allowed properties to Yes
Second Keyword: TOTAL is a reserved oracle key word... pls read the Details...
go_block() is not working in post_change .well u can use timers but no need for it u can reference block item but first u have to accumulate the values per record in WHEN-VALIDATE-ITEM TRIGGER in the last calculated item which is inserted by the user and assign it to the display item in ur current multi-record block :*block_name.total_item*.. as follow...
:block_name.total_item := :item1 + .... ; Then u create a second display item > no of records property = 1 , named e.g. final_summarized_totals
In order to summarize this total values accumulated in the multi-record display item named e.g. block_name.total_item
Finally using PRE-INSERT , PRE-UPDATE,PRE-DELETE Triggers to assign the value calculated into the display item * block_name.total_item* into the db_item into the previously mentioned Trigger Block-Level Off-course.
:block_name.total_db_tem := :i:block_name.final_summarized_totals ; Hope this helps...
Regards,
Amatu Allah

Validate a Multi Record Block.

Hello every body-
Would appreciate your inputs as to how to go about doing this.
I have a multi record block like below.
SEQ # THEMES PICK
1 THEME 1
2 THEME 2
3 THEME 3
4 THEME 4
5 THEME 5
6 THEME 6
The 'PICK' field is a check box, that the user will click on if he needs to select a particular 'THEME'.
I need to do the following validations ( I will be having a button something like INSERT BUTTON) at the bottom of the multi column block.
.. Only 3 THEMES are to selected.
.. If more than 3 THEMES are selected, need to show an alert stating that only 3 THEMES can be selected, allow the user to change selections.
.. If only 3 THEMES are selected, need to insert the selected THEMES into a table.
For example, in the above sitation, if the user picks 'THEMES' with SEQ# 2,4,5; then I need to insert the SEQ #, along with the other primary key (which is STUDENT ID) into the table.
Would really appreciate if any one could let me know how to do this.
Thanks for your time..

1) Make a hidden summarized number field called mycounter in the same block. Set the summarized function to sum, block to 'myblock', field to 'mycheckbox', calculation mode to "summary"
2) Make the checked and unchecked values of the check box 1 = checked and 0 = unchecked. Set the datatype of the checkbox to a number.
3) In the when-checkbox-changed of the checkbox put this code..
if :my.mycounter >= 4 then
message('Error: May only check 3 or less.');
:myblock.mycheckbox := 0;
end if;With this code they wont be able to check more than three rows. This is one piece of your puzzle anyway.
Message was edited by:
Mark Reichman

Duplicate item value in a Multi-Record Block

Is there a way to chek duplicate value entered in multi record block?
I have seen some solutions in this forum however nothing has worked for me till now. (using the formula, creating hidden items & creating group etc)
Thanks in advance,

To see if there are any other records in the block with the same value, use Kevin Clark's famous function to trap duplicates. You can find Kevin's function write up here:
Re: checking for same rows in a tabular
From Kevin's post:
Create a field PK_COPY in a control block.
Create program unit function COMPARE to compare two input params returning 1 if they match else 0.
Create a field in the datablock PK_MATCH, calculation property formula, formula COMPARE(:DATA_PK, :PK_COPY)
Create a field in the control block NO_OF_MATCHES, calculation property summary, summary type SUM, summarised
item PK_MATCH.
Also, your control block requires the Single Record property set to yes, and the base table block requires the Query All Records property set to yes.
WHEN-VALIDATE-ITEM on DATA_PK
:CONTROL.PK_COPY := :DATA_PK;
if :NO_OF_MATCHES > 1 then
message('You have already used that one');
Raise form_trigger_failure;
end if;

Updating a value of a text item in a multi record block based on a change

Hi,
I need to change the value of a text item in a multi record block based on a change to another item's value in the same block.
Suppose there's a text item in a multi record block called dt1 which is of type date, which is changed in a particular record. I want to change the values of the another item in the same multi record block, for all other records by running a loop through all the records in multi record block. I dont want to do it on the press of a button, it should do automatically on change. Help me resolve this issue.

Hi,
I need to change the value of a text item in a multi record block based on a change to another item's value in the same block.
Suppose there's a text item in a multi record block called dt1 which is of type date, which is changed in a particular record. I want to change the values of the another item in the same multi record block, for all other records by running a loop through all the records in multi record block. I dont want to do it on the press of a button, it should do automatically on change. Help me resolve this issue.

How can I handle data in a multi row block?

Hi all,
I have a form which contain a multi row block.
I put data in that block. Suppose that in the second column of
that block data no changes.I want to fill only the first cell of
the column and all the cells below first cell ( header) inherits
that value.
Example :
Block1
ITEM1 ITEM2
rec1 1 1999
rec2 2
rec3 3
When I insert in the table rec2 I want :
INSERT INTO(col1,col2) VALUES)(2,1999)!!!.
Best Regards !
null

vali (guest) wrote:
: Hi all,
: I have a form which contain a multi row block.
: I put data in that block. Suppose that in the second column of
: that block data no changes.I want to fill only the first cell
of
: the column and all the cells below first cell ( header)
inherits
: that value.
: Example :
: Block1
: ITEM1 ITEM2
: rec1 1 1999
: rec2 2
: rec3 3
: When I insert in the table rec2 I want :
: INSERT INTO(col1,col2) VALUES)(2,1999)!!!.
: Best Regards !
Mr. Vali,
I suppose you want to enter ITEM2 value only in first record and
duplicate that value in subsequent records automatically. There
are couple of methods to accomplish this and the following is one
of them:
Add this code in WHEN-NEW-RECORD-INSTANCE trigger for block1.
IF :SYSTEM.RECORD_STATUS ='NEW' AND :SYSTEM.CURSOR_RECORD > 1
THEN
IF :ITEM2 IS NULL THEN
GO_ITEM('ITEM2');
DUPLICATE_ITEM;
GO_ITEM('ITEM1');
END IF;
END IF;
good luck
null

How can I create a loop in a multi-record block (on the background)

I have a multi-record block.
In one item I change a value.
Upon this change, in the when-validate-item I would like to
change other records in the same block.
I planned to loop the block with go_record and to do my things
in each record. Unfortunately the go_record built-in is
restricted and cannot be used in a wvi-trigger.
Another approach can be to update the records in the database
and to perform an execute_query after this change. Also this
procedure cannot be used in a wvi.
How can I easily loop in a multi-record block???

You can try to put loop with go_record in KEY-NEXT-ITEM on that
field.
Or if you change something and then press KEY-COMMIT you can
update another records in database and after commit do again
execute_query. Something like :
on KEY-COMMIT:
update_another_records;
commit_form;
execute_query;

Get next value in a Multi Record Block

Hi,
I've a Multi Record block with 2 items like below.
pos width
1 7
8 5
13 5
18 2
ie pos in next item is sum of pos and width of previous item.I've already implemented this.
The problem is if the user changes width in a particular record,I want to change next records pos automatically.
To achieve this,I wrote a when-new-record -instance-trigger as follws:
if :system.cursor_record=1 then
:pos:=1;
elsif :system.record_status='changed' then
:pos:=:pos+:width;
end if;
but even Though I change column width of block,:system.record_status still remain 'INSERT'.
Pls can u pls tell me how can I acheive this?
Prashanth Deshmukh

You cannot use Record Status like that.
You need to create a procedure that loops through your entire block, keeping track of the pos and width of the prior record to calculate the new pos of each record.
Your procedure would need to do something like this:
Declare
    v_Pos pls_integer := 1;
Begin
Go_block('B1');
First_Record;
Loop
    Exit when :System.record_status='NEW';
    :B1.pos := v_Pos;
    v_Pos := v_Pos + :B1.width;
    Exit when :System.last_record = 'TRUE';
    Next_Record;
End Loop;
First_Record;
End;

How to call a report with a bind variable from a multi-record block

Hi,
I have created a report using the BI Publisher functionality. I did all the integration, created the SQL Query and uploaded the template. Up till here everythings fine!
My SQL Query has 2 bind variables.
I will call my report from a multi record block, at the end of each record an icon is shown which the user can click to open the report.
I created a column link for this item (PRINT_REPORT=Inschrijvingsformulier) but I do not manage to pass the parameters to my report. The parameters I want to pass are 2 columns in this Multi Record block.
I created 2 hidden fields on the page P9_PARAMETER1, P9_PARAMETER2 with the same names as my bind variables and fill this in with the values #PARAMETER1#, #PARAMETER2# from the multi record block.
It seems it does not work as my report stays empty. (also XML file stays empty).
Am I trying the wrong way?
Thanks for any advice,
Kris

hi khadeer,
create one report program and write the required code,and call this function module 'SSF_FUNCTION_MODULE_NAME' and give your smartform name and also when u activate ur smart form u will get one function module call that function module also and specify any tables used...
i think this solves ur problem...
any queries revert back..
pls reward points if helpful,
shylaja

How to do validation on multi record block at run time...

Dear Friends,
I have to do validation at run time on multi record block.
If user tries to enter and save two or more records in same multi record block with same data at run time, it should not allow it and display a message like, " error : Records are having same(duplicate) values. "
I already did validation with the data coming from database table using cursor. But confused about how to do at run time(on one screen only) ??
Please, give details about how to check duplicate records on form block before saving it to the table ????
Regarding details would be greatly helpful.
thanks,

Hi...Pankaj
thanx for your reply..
I already did validation for the data coming from table....
but I need to do it on form only...at run time...
exa...
In one multi record block
record no : column 1 : column 2 : column 3
1 abc 123 hi
2 abc 123 hi
so it should check on the form itself, here I m not getting data from table...I am just
navigating from first record to second using down arrow.
so, may be 2 possibilities.
1) when user navigates using tab to third record, it should say like two duplicate records.(may be like when validate record or item)
2) or when user tries to save, it should say two duplicate records.
so, everyting should take place on form screen only.....
waiting for your reply,
thanx...

Dynamically Changing Labels for Multi Row Block Buttons

Forms [32 Bit] Version 9.0.4.1.0 (Production)
Oracle Database 10g Enterprise Edition Release 10.2.0.5.0 - 64bit Production
On my local: Windows 7 OS
I am having a difficult time in doing the following in forms, and not sure if it can be done?
I have a multi row block,based on DB table, which displays filename and another column from the table.
It also has a push button on each row, which opens and displays the physical file from its source, when clicked. The filename thus can have 3 diff statuses depending on its sources and accordingly corresponding button should display appropriate label:
a) View Image (its is in content server and successfully imaged. In this case I display the file in the browser, from the content server, when the button is clicked)
b) View File (Display the file from file system)
c) View Error (Display imaging error message from the table, as file failed to make it to the imaging server)
I have this logic currently coded in the post query trigger, at the block level, and tried using set_item_property(button_id, label, <button_lable>), where I programmatically set the button lable, based on the file status (imaged, not imaged or has error) in that row. This wroks well, only if all the files in the multi row block have the same status. If each of them have diff statuses, then only last processed files's status gets reflected into the button label. For eg: The file in the first row of the block is imaged, and one in the second row has an imaging error. The button label for the first row should say 'View Image' and button for the second row should say 'View Error'. But now buttons for both the rows display 'View Error', as thats what got processed last!
I __can not use set_item_instance property for 'label'__ (which lets us dynamically change the label on the push buttons).
Is there any way to do this for ORacle forms? I am now playing with having 3 diff button items in that block, laying them on top of each other and showing only those that are appropriate and hiding the others... But I am not sure it is going to give me what I need? I think I am going to end up facing the same issues as in above case!!
Any expert advice is highly appreciated.
Thanks in advance for your time:
Libran_Girl
Edited by: libran on Aug 30, 2011 8:04 AM
Edited by: libran on Aug 30, 2011 8:05 AM

<p>I have just updated this existing PJC, that was originally constructed to handle Text Fields. You can, now, also handle buttons with it.
Set the Button's Implementation Class property to : oracle.forms.fd.MultiButton.
</p>
This is the code you have to put one triggers of your based block:
When-New-Record-Instance trigger: (based on the EMP table)
declare
     LN$Pos pls_integer ;
     LN$Rec pls_integer := Get_Block_Property('EMP', CURRENT_RECORD) ;
     LN$Max pls_integer := Get_Block_Property('EMP', RECORDS_DISPLAYED) ;
     LC$C    Varchar2(15) ;
Begin
     LN$Pos := LN$Rec - (trunc(LN$Rec/LN$Max) * LN$Max) ;
     If LN$Pos = 0 Then LN$Pos := LN$Max ; End if ;
     If LN$Pos > 0 Then
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_LOG', 'true' );
          -- Add the new item --
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_NEW_REC', to_char(LN$Rec) );
          -- Set some properties --
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_LABEL', to_char(LN$Rec) || ',' || :EMP.ENAME );
          If :EMP.JOB = 'MANAGER' Then
            Set_Custom_Property('EMP.BT', LN$Pos, 'SET_FONT', to_char(LN$Rec) || ',Arial,bold,14' );
            Set_Custom_Property('EMP.BT', LN$Pos, 'SET_FGCOLOR', to_char(LN$Rec) || ',0,0,255' );
          End if ;
          If :GLOBAL.I > 250 Then :GLOBAL.I := 5 ;
          Else :GLOBAL.I := :GLOBAL.I + 5 ;
          End if ;
          LC$C := To_Char(LN$Rec) || ','
               || To_Char(255) || ','
               || To_Char(255-:GLOBAL.I) || ','
               || To_Char(255-:GLOBAL.I) ;
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_BGCOLOR', LC$C );
          Synchronize;
     End if ;
end;When-Create-Record trigger:
declare
     LN$N    pls_integer ;
     LN$Rec pls_integer := :system.cursor_record ;
     LC$C    Varchar2(15) ;
Begin
     if get_block_property('EMP',TOP_RECORD) > 1 Then
          LN$n := :system.cursor_record - get_block_property('EMP',TOP_RECORD) + 1 ;
     else
          LN$N := :system.cursor_record ;
     end if;
     If LN$N > 0 Then
          Set_Custom_Property('EMP.BT', LN$n, 'SET_LOG', 'true' );
          -- Add the new item --
          Set_Custom_Property('EMP.BT', LN$n, 'SET_NEW_REC', to_char(LN$Rec) );
     End if ;
end;Post-Query trigger:
declare
     LN$Pos pls_integer ;
     LN$Rec pls_integer := Get_Block_Property('EMP', CURRENT_RECORD) ;
     LN$Max pls_integer := Get_Block_Property('EMP', RECORDS_DISPLAYED) ;
     LC$C    Varchar2(15) ;
Begin
     LN$Pos := LN$Rec - (trunc(LN$Rec/LN$Max) * LN$Max) ;
     If LN$Pos = 0 Then LN$Pos := LN$Max ; End if ;
     If LN$Pos > 0 Then
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_LOG', 'true' );
          -- Add the new item --
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_NEW_REC', to_char(LN$Rec) );
          -- Set some properties --
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_LABEL', to_char(LN$Rec) || ',' || :EMP.ENAME );
          If :EMP.JOB = 'MANAGER' Then
            Set_Custom_Property('EMP.BT', LN$Pos, 'SET_FONT', to_char(LN$Rec) || ',Arial,bold,14' );
            Set_Custom_Property('EMP.BT', LN$Pos, 'SET_FGCOLOR', to_char(LN$Rec) || ',0,0,255' );
          End if ;
          If :GLOBAL.I > 250 Then :GLOBAL.I := 5 ;
          Else :GLOBAL.I := :GLOBAL.I + 5 ;
          End if ;
          LC$C := To_Char(LN$Rec) || ','
               || To_Char(255) || ','
               || To_Char(255-:GLOBAL.I) || ','
               || To_Char(255-:GLOBAL.I) ;
          Set_Custom_Property('EMP.BT', LN$Pos, 'SET_BGCOLOR', LC$C );
          Synchronize;
     End if ;
end;Don't forget to copy the multirecord.jar file in your /forms/java folder, then add it to the archive and archive_jini tags of your /forms/server/formsweb.cfg file.
Enjoy it,
Francois

Oracle Forms - need to update multi-record block - Help needed asap

Hi,
We are using Oracle apps release 11i - Oracle forms 6i.
I have a field "project_start_date" in project_block in a custom form. There is another multi-record block called role_block in the same custom form and it has a field named start_date. Requirement is when ever I make change in the project_start_date in project_block, that should reflect in role_block.start_date. I tried different means and could update only the very first record of the multi-record block - role_block. I need to update all the records in the role_block with the same project_start_date. Used looping and several other methods. But could not achieve. Any help is really appreciated.
Thanks
Akil

Hi;
For your issue i suggest close your thread here as changing thread status to answered and move it to Forum Home » Application Development in PL/SQL » Forms which you can get more quick response
Regard
Helios

Problem in displaying records in multi record block

Hi all,
I have a problem in displaying records in a multi record block in a form.
I have 1 control block and 1 data block(multi-record block).
Control block has one item CUSTOMER-ID. Data block has many other items related to customer.
when a value is entered in customer-id text item, all the relavant details should be displayed in the data block.
but, the records are overlapping in the same line in the data block, actually they have to be displayed one record per one line.
The code is,
IF :CUST_BLOCK.CUST_ID IS NOT NULL THEN
GO_BLOCK('XBSI_CONTRACT_PRICE_FACTORS');
FOR C1 IN C
LOOP
:XBSI_CONTRACT_PRICE_FACTORS.CUST_ID:=c1.site_use_id;
:XBSI_CONTRACT_PRICE_FACTORS.CAT_ID:=c1.ipc_category_id;
:XBSI_CONTRACT_PRICE_FACTORS.MFG_ID:=c1.mfg_category_id;
:XBSI_CONTRACT_PRICE_FACTORS.INVENTORY_ITEM_ID:=c1.inventory_item_id;
:XBSI_CONTRACT_PRICE_FACTORS.PRICE_BASIS:=c1.price_basis;
:XBSI_CONTRACT_PRICE_FACTORS.PRICE_FACTOR:=c1.price_factor;
END LOOP;
Please help me out..
Thanks in advance!
Suman

Hi Suman
IF :CUST_BLOCK.CUST_ID IS NOT NULL THEN
GO_BLOCK('XBSI_CONTRACT_PRICE_FACTORS');
first_record;
FOR C1 IN C
LOOP
:XBSI_CONTRACT_PRICE_FACTORS.CUST_ID:=c1.site_use_id;
:XBSI_CONTRACT_PRICE_FACTORS.CAT_ID:=c1.ipc_category_id;
:XBSI_CONTRACT_PRICE_FACTORS.MFG_ID:=c1.mfg_category_id;
:XBSI_CONTRACT_PRICE_FACTORS.INVENTORY_ITEM_ID:=c1.inventory_item_id;
:XBSI_CONTRACT_PRICE_FACTORS.PRICE_BASIS:=c1.price_basis;
:XBSI_CONTRACT_PRICE_FACTORS.PRICE_FACTOR:=c1.price_factor;
next_record;
END LOOP;
Try this. you are trying to show all the records in same line. so its overlapping.
Thankyou
[email protected]

Check box in a multi record block

I have a multi record block that has a check box. I need to be able to go to the first record on the block, go through each row and check to see if it's selected. I will then get all the rows that were selected and passed it as a parameter in a package.I have already declared a global variable in the package to get all the rows selected.
Can anyone please help.

Hi
This is my solution for your problem. If I understand correctly as you have to post the selected records from form to journal entry (a server operation). What you need to do is in your Oracle Forms multi record block construct a loop which goes from first record to last record of your data block, capture the selected records (wherever the check box is CHECKED ON) into a PL/SQL table structure (PL/SQL table is quite simillar to Oracle Forms RECORD GROUP structure, but more versatile as it can be recognized on the back end too).
Once you populate the PL/SQL table with the selected record, pass the PL/SQL table itself as parameter to your package.
Open the PL/SQL table in your destination code and do further processing with those selected records !!
Hope this will work !!
MOHAMMED R.QURASHI
<BLOCKQUOTE><font size="1" face="Verdana, Arial">quote:</font><HR>Originally posted by kay:
I CANNOT USE A RECORD GROUP. I HAVE TO EVENTUALLY POST THE SELECTED ROWS INTO JOURNAL ENTRIES. I STILL NEED TO BE ABLE TO
GET ALL THE ROWS SELECTED BY THE USER.CAN I USE A CURSOR IN THE FORM TO GET ALL THE ROWS
SELECTED?.
THANKS FOR THE REPLY GANESAN.<HR></BLOCKQUOTE>
null

Setting background color in multi record block

Hi all!
I've a table with around 150 records of colors with html-color-names and rgb codes.
I would like to have a sample item in my form 9.0.4 to display the color as a preview for
each record in a multi-record block when querying the table.
I would not like to create a visual attribute for each color. So display_item() is no choice.
(except: somebody show me how to create va's with the japi)
Somebody knows a way to accomplish this?
Thanks in advance and regards
Stauder

Here's a solution which should work :
1. Use a mirror item for the numeric item which has to
be displayed
using the format mask based on value in column1
The data type of the mirror item : Char
X and Y co-ordinates : Same as the item
on which it is
mirrored
Size and Height : Same as the item
on which it is
mirrored
2. On normal display, Mirror item is displayed
3. When Mouse-Click or Pre-Text Item trigger on the
Mirror Item :
- Use the Go_Item ('Actual Numeric Item');
This will bring up the Numeric Item and the Mirror
item goes in hiding
- A VWI trigger on Numeric Item should Then be :
If ( :col1 = 'A' ) Then
:Mirror_Item :=
To_char(:NumericItem, ',999,999.99');
Else
:Mirror_Item :=
To_char(:NumericItem, '99999999');
End If;
4. A key-Next-Item (On Numeric Item) or other trigger ??
should then
use Go_Item (:Mirror Item) to bring forward the
formatted numeric item
-- Shailender Mehta --

Calculation in a Multi Reord Block

Similar Messages

Maybe you are looking for