Answer / fahad

declare

rec_grp recordgroup;
col1 groupcolumn;
col2 groupcolumn;
col3 groupcolumn;
col4 groupcolumn;
col5 groupcolumn;
col6 groupcolumn;
col7 groupcolumn;
col8 groupcolumn;

pl_id paramlist;
i number :=1;
begin
rec_grp := find_group('emp_rec');
if not id_null(rec_grp) then
delete_group(rec_grp);
end if;
rec_grp := create_group('emp_rec');
col1 := add_group_column('emp_rec','Empno',CHAR_COLUMN,100);
col2 := add_group_column('emp_rec','Ename',CHAR_COLUMN,300);
col3 := add_group_column('emp_rec','job',CHAR_COLUMN,300);
col4 := add_group_column('emp_rec','Mgr',CHAR_COLUMN,100);
col5 := add_group_column('emp_rec','Hiredate',DATE_COLUMN,100);
col6 := add_group_column('emp_rec','Sal',CHAR_COLUMN,100);
col7 := add_group_column('emp_rec','comm',CHAR_COLUMN,100);
col8 := add_group_column('emp_rec','Deptno',CHAR_COLUMN,100);


loop
go_block('emp_r');
go_record(i);

add_group_row(rec_grp,i);

set_group_char_cell('emp_rec.empno',i,:emp_r.empno);

set_group_char_cell('emp_rec.ename',i,:emp_r.ename);
set_group_char_cell('emp_rec.job',i,:emp_r.job);
set_group_char_cell('emp_rec.mgr',i,:emp_r.mgr);

set_group_date_cell('emp_rec.Hiredate',i,:emp_r.Hiredate);
set_group_char_cell('emp_rec.sal',i,:emp_r.sal);

set_group_char_cell('emp_rec.comm',i,:emp_r.comm);

set_group_char_cell('emp_rec.deptno',i,:emp_r.deptno);

i := i + 1;
exit when :system.last_record='TRUE';

end loop;

pl_id := get_parameter_list('para1');

if not id_null(pl_id) then

destroy_parameter_list(pl_id);
end if;
pl_id := create_parameter_list('para1');

add_parameter(pl_id,'Q_EMP',DATA_PARAMETER,'emp_rec');
add_parameter(pl_id,'paramform',text_parameter,'no');

run_product(REPORTS,'D:\ora\daily.RDF',synchronous,runtime,filesystem,pl_id,NULL);


end;

What is the difference between OLE Server & Ole Container?

1 Answers  

---

What package procedure used for invoke sql plus from sql forms ?

1 Answers  

---

What is a Text_io Package?

4 Answers  

---

in user parameter property we have list of values.can we write select query for binding? for example:: select empno from emp where deptno=:deptnum :deptnum is first parameter it displays distinct dept nos. if i do like this it is giving error:: bind variables are not allowed in the select statement

0 Answers  

---

what u write in Ctl file

2 Answers  

---

Can you truncate a table in a procedure in Oracle Forms?

2 Answers  

---

all steps of bitmap report?

0 Answers   Convergys,

---

What is the difference between restricted and unrestricted package procedure ?

3 Answers  

---

What are the two ways by which data can be generated for a parameter's Using static values?

1 Answers  

---

what are the new features introduced in oracle form services in 11g release 2?

0 Answers  

---

What is the content view and stacked view?

2 Answers  

---

HI Friends I m new dev(forms & report). can anyone tell me how we upload a document on form 11g.??

0 Answers   Access Info,

---