E-Mail Merge to Second Form?
Hello,
I'm sending my contacts a short survey that I've broken into two separate landing pages (in order to make it more accessible). When they land on the first page via the email the field merge works perfectly fine, however when they submit the that form and are redirected to the second half of the survey on another landing page the field merge option stops working? Does anyone have a solution to this issue?
You need to setCookies on first page and then getCookie on second page through JavaScript. This is the only way you can do that.
You need to put below given function according to your needs.
Below is an example of setCookie and getCookie
setCookie Example -
<!DOCTYPE html>
<html>
<head>
<script>
function setCookie(cname,cvalue,exdays) {
var d = new Date();
d.setTime(d.getTime() + (exdays*24*60*60*1000));
var expires = "expires=" + d.toGMTString();
document.cookie = cname+"="+cvalue+"; "+expires;
function getCookie(cname) {
var name = cname + "=";
var ca = document.cookie.split(';');
for(var i=0; i<ca.length; i++) {
var c = ca[i];
while (c.charAt(0)==' ') c = c.substring(1);
if (c.indexOf(name) == 0) {
return c.substring(name.length, c.length);
return "";
</script>
</head>
<body onload="checkCookie()">
</body>
</html>
Similar Messages
-
We have mail merge working from 6i forms with Word 97. We are going to Word 2003, but I am having trouble getting the mail merge to work. The example on Metalink, note 297410.1, seems to be directed at data files in row format. Our data file is in table format. Below is part of our current working code. When it is run in 2003, the merge is not performed. I do not receive any errors. Any suggestions or examples would be greatly appreciated. Thank you.
PROCEDURE create_AL01 IS
word_handle ole2.obj_type;
docs ole2.obj_type;
doc ole2.obj_type;
tables ole2.obj_type;
range ole2.obj_type;
sel ole2.obj_type;
NewMailMerge ole2.obj_type;
arglist ole2.list_type;
i number;
<cursor definition>
BEGIN
<count of letters for loop>
word_handle := ole2.create_obj('word.application');
ole2.set_property(word_handle,'Visible',1);
docs := ole2.Get_Obj_Property(word_handle,'Documents');
ole2.invoke(docs,'Add');
sel := ole2.get_obj_property(word_handle,'Selection');
range := ole2.get_obj_property(sel,'Range');
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
tables := ole2.get_obj_property(doc,'Tables');
arglist :=ole2.create_arglist;
ole2.add_arg_obj(arglist,range);
ole2.add_arg(arglist,i);
ole2.add_arg(arglist,7);
ole2.invoke(tables,'Add',arglist);
ole2.destroy_arglist(arglist);
FOR AL01_rec in AL01_cur LOOP
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.sys_date);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.name);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.mail_address);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.mail_cityst);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.salute);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.test_date);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
ole2.invoke(sel,'MoveRight');
ole2.invoke(sel,'MoveRight');
end loop;
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01SF.DOC');
ole2.invoke(doc, 'SaveAs', arglist);
ole2.destroy_arglist(arglist);
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01PRI.DOC');
ole2.invoke(docs, 'Open', arglist);
ole2.destroy_arglist(arglist);
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
arglist:=OLE2.CREATE_ARGLIST;
OLE2.INVOKE(doc, 'Activate', arglist);
OLE2.DESTROY_ARGLIST(arglist);
NewMailMerge :=OLE2.GET_OBJ_PROPERTY(doc, 'MailMerge');
arglist:=OLE2.CREATE_ARGLIST;
OLE2.INVOKE(NewMailMerge, 'Execute',arglist);
OLE2.DESTROY_ARGLIST(arglist);
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01MF.DOC');
ole2.invoke(doc, 'SaveAs', arglist);
ole2.destroy_arglist(arglist);
arglist := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(arglist,0);
OLE2.Invoke(doc, 'PrintOut', arglist);
OLE2.Destroy_Arglist(arglist);
OLE2.INVOKE(docs,'Close');
OLE2.INVOKE(word_handle,'QUIT');
END;We have mail merge working from 6i forms with Word 97. We are going to Word 2003, but I am having trouble getting the mail merge to work. The example on Metalink, note 297410.1, seems to be directed at data files in row format. Our data file is in table format. Below is part of our current working code. When it is run in 2003, the merge is not performed. I do not receive any errors. Any suggestions or examples would be greatly appreciated. Thank you.
PROCEDURE create_AL01 IS
word_handle ole2.obj_type;
docs ole2.obj_type;
doc ole2.obj_type;
tables ole2.obj_type;
range ole2.obj_type;
sel ole2.obj_type;
NewMailMerge ole2.obj_type;
arglist ole2.list_type;
i number;
<cursor definition>
BEGIN
<count of letters for loop>
word_handle := ole2.create_obj('word.application');
ole2.set_property(word_handle,'Visible',1);
docs := ole2.Get_Obj_Property(word_handle,'Documents');
ole2.invoke(docs,'Add');
sel := ole2.get_obj_property(word_handle,'Selection');
range := ole2.get_obj_property(sel,'Range');
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
tables := ole2.get_obj_property(doc,'Tables');
arglist :=ole2.create_arglist;
ole2.add_arg_obj(arglist,range);
ole2.add_arg(arglist,i);
ole2.add_arg(arglist,7);
ole2.invoke(tables,'Add',arglist);
ole2.destroy_arglist(arglist);
FOR AL01_rec in AL01_cur LOOP
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.sys_date);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.name);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.mail_address);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.mail_cityst);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.salute);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
arglist :=ole2.create_arglist;
ole2.add_arg(arglist, AL01_rec.test_date);
ole2.invoke(sel, 'TypeText', arglist);
ole2.destroy_arglist(arglist);
ole2.invoke(sel,'MoveRight');
ole2.invoke(sel,'MoveRight');
ole2.invoke(sel,'MoveRight');
end loop;
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01SF.DOC');
ole2.invoke(doc, 'SaveAs', arglist);
ole2.destroy_arglist(arglist);
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01PRI.DOC');
ole2.invoke(docs, 'Open', arglist);
ole2.destroy_arglist(arglist);
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
arglist:=OLE2.CREATE_ARGLIST;
OLE2.INVOKE(doc, 'Activate', arglist);
OLE2.DESTROY_ARGLIST(arglist);
NewMailMerge :=OLE2.GET_OBJ_PROPERTY(doc, 'MailMerge');
arglist:=OLE2.CREATE_ARGLIST;
OLE2.INVOKE(NewMailMerge, 'Execute',arglist);
OLE2.DESTROY_ARGLIST(arglist);
doc := ole2.get_obj_property(word_handle,'ActiveDocument');
arglist := ole2.create_arglist;
ole2.add_arg(arglist, 'C:\PROGRAMS\AL01MF.DOC');
ole2.invoke(doc, 'SaveAs', arglist);
ole2.destroy_arglist(arglist);
arglist := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(arglist,0);
OLE2.Invoke(doc, 'PrintOut', arglist);
OLE2.Destroy_Arglist(arglist);
OLE2.INVOKE(docs,'Close');
OLE2.INVOKE(word_handle,'QUIT');
END; -
Does anyone know the best way to create a form that you can do a mail merge with?
I have been asked to create a form that can be used to do a mail merge. At first I thought I could create it in indesign and then pdf the file and do form fields right in the pdf, but I'm not sure if you can do a mail merge with data in an excel file and a pdf file containing form fields.
The other option I know I could use is a Word file and excel, but I don't think the functionality is as good as in a pdf (like addition of percentages, or error messages, radio buttons, etc.). And I do need to be able to do a mail merge. Anybody have any suggestions?There is not built-in feature for this, but it can be done with scripting. The problem is it can be a bit complicated, and it more complicated to decribe in much detail in a forum posting. It involves creating the base form and making the pages templates. You can export from Excel to a tab delimited text file. You can then either programmatically create a template-based FDF that when loaded into Acrobat populates the PDF form, creating as many individual forms as needed, or using JavaScript in Acrobat to read the data file and generate as many individual forms as needed. Both approaches involve a similar amount of programming, but they're quite different.
You might want to look into this product, which apparently is no longer available but may be come back soon: http://www.debenu.com/products/eol/arts-pdf-variform-lite/ -
OLE2 from Forms 10g to Microsoft Word 2007 Mail Merge
We have an Oracle Form that allows the user to print off information on the Form to a Microsoft Word document via OLE2 and mail merging; Forms version is 10.1.2.0.2 as it the version of OAS (from Linux Redhat AS4). This currently works fine if the user has Microsoft Word 2000, but since a recent upgrade to Office 2003 and now in some cases 2007, this functionality doesn't work. The JInitiator Console displays the following error messages:
Oracle JInitiator: Version 1.3.1.22
Using JRE version 1.3.1.22-internal Java HotSpot(TM) Client VM
User home directory = C:\Documents and Settings\jovinc
Proxy Configuration: Manual Configuration
Proxy: stpproxy:80
Proxy Overrides: 172.27*,172.28*,10*,10.*,intranet.fnfis.com*,ljtcapd05.fnfis.com,ukbiprodlx01,ukbiprodlx01.certegy.com,ukbiprodlx02*,ukbiprodlx02.certegy.com*
JAR cache enabled
Location: C:\Documents and Settings\jovinc\Oracle Jar Cache
Maximum size: 50 MB
Compression level: 0
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://ukbiprodlx01.certegy.com:7778/forms/java/frmall_jinit.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/java/frmrwinteg.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/java/frmwebutil.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/java/jacob.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/CTYCommonLive/CommonImages.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/CTYLogonLive/LogonImages.jar from JAR cache
Loading http://ukbiprodlx01.certegy.com:7778/forms/CTYXplorerLive/XplorerImages.jar from JAR cache
proxyHost=null
proxyPort=0
connectMode=HTTP, native.
Forms Applet version is : 10.1.2.0
2009-Aug-19 11:30:43.785 ERROR>WUO-714 [OleFunctions.setExceptionValues()] Unable to get the last OLE Error details; Exception
null
2009-Aug-19 11:30:43.785 ERROR>WUO-707 [OleFunctions.invoke_obj()] Unable to invoke Method: TypeText; Exception
com.jacob.com.ComFailException: A COM exception has been encountered:
At Invoke of: TypeText
Description: Type mismatch.
2009-Aug-19 11:30:44.848 ERROR>WUO-707 [OleFunctions.invoke_obj()] Unable to invoke Method: Execute; Exception
com.jacob.com.ComFailException: Invoke of: Execute
Source: Microsoft Word
Description: This method or property is not available because the document is not a mail merge main document.
The below code is used within the Form when they invoke the 'Print' function:
PROCEDURE PR_print_invoice
IS
l_t_application CLIENT_OLE2.OBJ_TYPE;
l_t_documents CLIENT_OLE2.OBJ_TYPE;
l_t_source_doc CLIENT_OLE2.OBJ_TYPE;
l_t_letter_doc CLIENT_OLE2.OBJ_TYPE;
l_t_merge_doc CLIENT_OLE2.OBJ_TYPE;
l_t_mail_merge CLIENT_OLE2.OBJ_TYPE;
l_t_selection CLIENT_OLE2.OBJ_TYPE;
l_t_args CLIENT_OLE2.LIST_TYPE;
l_t_args_move_right CLIENT_OLE2.LIST_TYPE;
l_v_sourcefile VARCHAR2(2000);
l_v_letter VARCHAR2(2000);
l_v_mergefile VARCHAR2(2000);
l_v_destination_directory VARCHAR2(2000);
l_v_source_directory VARCHAR2(2000);
l_n_ok NUMBER;
l_n_tax NUMBER;
l_n_total_value NUMBER;
l_n_total_tax NUMBER;
l_v_country VARCHAR2(3);
l_t_bca_client_address_line1 bill_client_address.bca_client_address_line1%TYPE;
l_t_bca_client_address_line2 bill_client_address.bca_client_address_line2%TYPE;
l_t_bca_client_address_line3 bill_client_address.bca_client_address_line3%TYPE;
l_t_bca_client_address_line4 bill_client_address.bca_client_address_line4%TYPE;
l_t_bca_client_address_line5 bill_client_address.bca_client_address_line5%TYPE;
l_t_bca_client_address_line6 bill_client_address.bca_client_address_line6%TYPE;
l_t_bcl_client_name bill_client.bcl_client_name%TYPE;
l_t_bcl_client_id bill_client.bcl_client_id%TYPE;
l_t_trt_rate tax_rate.trt_rate%TYPE;
l_t_rli_description_1 reference_list.rli_description_1%TYPE;
l_n_item_count NUMBER := 0;
l_b_debug BOOLEAN;
l_b_ok BOOLEAN;
l_n_bookmark NUMBER := 0;
l_n_counter PLS_INTEGER;
CURSOR l_cur_client( p_ti_bcl_seq_num IN bill_client.bcl_seq_num%TYPE )
IS
SELECT bcl_client_id
, bcl_client_name
FROM bill_client
WHERE bcl_seq_num = p_ti_bcl_seq_num
CURSOR l_cur_client_address( p_ti_bcl_seq_num IN bill_client.bcl_seq_num%TYPE )
IS
SELECT bca_client_address_line1
, bca_client_address_line2
, bca_client_address_line3
, bca_client_address_line4
, bca_client_address_line5
, bca_client_address_line6
FROM bill_client_address bca
, role
WHERE bca_bcl_seq_num = p_ti_bcl_seq_num
AND rol_ref_type = 'INVPOINT'
AND rol_bcl_seq_num = p_ti_bcl_seq_num
AND rol_bca_seq_num = bca_seq_num
CURSOR l_cur_items( p_ti_mih_seq_num IN manual_invoice_header.mih_seq_num%TYPE )
IS
SELECT mil_tco_seq_num
, mil_value
, mil_description
, mil_quantity
, rownum
FROM manual_invoice_line mil
WHERE mil_mih_seq_num = p_ti_mih_seq_num
CURSOR l_cur_count_items( p_ti_mih_seq_num IN manual_invoice_header.mih_seq_num%TYPE )
IS
SELECT count(*)
FROM manual_invoice_line
WHERE mil_mih_seq_num = p_ti_mih_seq_num
CURSOR l_cur_tax_rate( p_ti_tco_seq_num IN tax_rate.trt_tco_seq_num%TYPE
, p_ti_mih_invoice_date manual_invoice_header.mih_invoice_date%TYPE )
IS
SELECT trt_rate
FROM tax_rate
WHERE trt_tco_seq_num = p_ti_tco_seq_num
AND p_ti_mih_invoice_date BETWEEN trt_effective_date AND NVL( trt_effective_end_date, p_ti_mih_invoice_date )
CURSOR l_cur_ref_list( p_ti_rli_code reference_list.rli_code%TYPE )
IS
SELECT rli_description_1
FROM reference_list
WHERE rli_rty_code = 'INTYP'
AND rli_bcy_seq_num = NVL( :GLOBAL.bcy_seq_num, 1 )
AND rli_code = p_ti_rli_code
CURSOR l_cur_country( p_ti_bcy_seq_num bill_country.bcy_seq_num%TYPE )
IS
SELECT bcy_short_name
FROM bill_country
WHERE bcy_seq_num = p_ti_bcy_seq_num
PROCEDURE PR_Insert_Cell( p_vi_text IN VARCHAR2 )
IS
l_n_bookmark NUMBER := 0;
BEGIN
l_n_bookmark := 1;
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG( l_t_args, p_vi_text );
CLIENT_OLE2.INVOKE( l_t_selection, 'TypeText', l_t_args);
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
EXCEPTION
WHEN FORM_TRIGGER_FAILURE
THEN
RAISE;
WHEN OTHERS
THEN
PA_lib_msg.PR_others_exception( 'PA_hci_misc.PR_print_invoice.PR_insert_cell', l_n_bookmark );
END;
BEGIN
l_n_bookmark := 1;
SYNCHRONIZE;
l_n_bookmark := 2;
OPEN l_cur_country( :GLOBAL.bcy_seq_num );
FETCH l_cur_country INTO l_v_country;
CLOSE l_cur_country;
-- Determine invoice names and locations and fetch them from the server
l_n_bookmark := 3;
l_v_sourcefile := pa_lib_security.fn_fetch_environment( 'ManualInvoiceSourceFile' );
l_v_letter := pa_lib_security.fn_fetch_environment( l_v_country || 'ManualInvoiceMergeFile' );
l_v_source_directory := pa_lib_security.fn_fetch_environment( 'SourceManualInvoiceDirectory' );
l_v_destination_directory := pa_lib_security.fn_fetch_environment( 'DestinationManualInvoiceDir' );
l_b_debug := ( pa_lib_security.fn_fetch_environment( 'ManualInvoiceDebug' ) = 'Y' );
l_b_ok := webutil_file_transfer.as_to_client( l_v_destination_directory||l_v_sourcefile, l_v_source_directory||l_v_sourcefile );
l_b_ok := webutil_file_transfer.as_to_client( l_v_destination_directory||l_v_letter, l_v_source_directory||l_v_letter );
l_n_bookmark := 4;
IF ( :SYSTEM.FORM_STATUS = 'CHANGED' )
THEN
l_n_bookmark := 5;
DO_KEY('commit_form');
END IF;
l_n_bookmark := 6;
OPEN l_cur_count_items( :blk_manual_inv_header.mih_seq_num );
FETCH l_cur_count_items INTO l_n_item_count;
CLOSE l_cur_count_items;
IF ( l_n_item_count = 0 )
THEN
pa_lib_msg.pr_message_alert( 'STB', -119 );
RETURN;
END IF;
l_n_bookmark := 7;
SET_APPLICATION_PROPERTY( CURSOR_STYLE, 'BUSY' );
-- Start Word
l_n_bookmark := 8;
l_t_application := CLIENT_OLE2.CREATE_OBJ( 'Word.Application' );
l_t_documents := CLIENT_OLE2.GET_OBJ_PROPERTY( l_t_application, 'Documents' );
IF ( l_b_debug )
THEN
CLIENT_OLE2.SET_PROPERTY( l_t_application, 'Visible', 1 );
END IF;
-- Open source file
l_n_bookmark := 9;
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG( l_t_args, l_v_destination_directory||l_v_sourcefile );
l_t_source_doc := CLIENT_OLE2.INVOKE_OBJ( l_t_documents, 'Open', l_t_args );
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
-- Populate source file with invoice items
l_n_bookmark := 10;
OPEN l_cur_client( :parameter.p_bcl_seq_num );
FETCH l_cur_client INTO l_t_bcl_client_id, l_t_bcl_client_name;
IF ( l_cur_client%NOTFOUND )
THEN
CLOSE l_cur_client;
pa_lib_msg.pr_message_alert( 'STB', -121 );
END IF;
CLOSE l_cur_client;
l_n_bookmark := 11;
OPEN l_cur_client_address( :parameter.p_bcl_seq_num );
FETCH l_cur_client_address INTO l_t_bca_client_address_line1
, l_t_bca_client_address_line2
, l_t_bca_client_address_line3
, l_t_bca_client_address_line4
, l_t_bca_client_address_line5
, l_t_bca_client_address_line6;
IF ( l_cur_client_address%NOTFOUND )
THEN
CLOSE l_cur_client_address;
pa_lib_msg.pr_message_alert( 'STB', -122 );
END IF;
CLOSE l_cur_client_address;
l_n_bookmark := 12;
OPEN l_cur_ref_list( :blk_manual_inv_header.mih_invoice_type );
FETCH l_cur_ref_list INTO l_t_rli_description_1;
IF ( l_cur_ref_list%NOTFOUND )
THEN
CLOSE l_cur_ref_list;
pa_lib_msg.pr_message_alert( 'STB', -123 );
END IF;
CLOSE l_cur_ref_list;
-- Move to first data column
l_n_bookmark := 13;
l_t_selection := CLIENT_OLE2.GET_OBJ_PROPERTY( l_t_application, 'Selection' );
l_t_args_move_right := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG( l_t_args_move_right, 12 );
CLIENT_OLE2.ADD_ARG( l_t_args_move_right, 1 );
CLIENT_OLE2.ADD_ARG( l_t_args_move_right, 0 );
FOR l_n_counter IN 1 .. 19
LOOP
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
END LOOP;
l_n_bookmark := 14;
l_n_total_value := 0;
l_n_total_tax := 0;
FOR l_r_items IN l_cur_items( :blk_manual_inv_header.mih_seq_num )
LOOP
l_n_bookmark := 15;
OPEN l_cur_tax_rate( l_r_items.mil_tco_seq_num, :blk_manual_inv_header.mih_invoice_date );
FETCH l_cur_tax_rate INTO l_t_trt_rate;
IF ( l_cur_tax_rate%NOTFOUND )
THEN
CLOSE l_cur_tax_rate;
pa_lib_msg.pr_message_alert( 'STB', -124 );
END IF;
CLOSE l_cur_tax_rate;
l_n_tax := ROUND( l_r_items.mil_value * ( l_t_trt_rate / 100 ), 2 );
l_n_total_tax := l_n_total_tax + l_n_tax;
l_n_total_value := l_n_total_value + l_r_items.mil_value;
END LOOP;
l_n_bookmark := 16;
FOR l_r_items IN l_cur_items( :blk_manual_inv_header.mih_seq_num )
LOOP
l_n_bookmark := 17;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_r_items.mil_description );
l_n_bookmark := 18;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( TO_CHAR( l_r_items.mil_quantity ) );
l_n_bookmark := 19;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( TO_CHAR( l_r_items.mil_value, '99999999.90' ) );
l_n_bookmark := 20;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
OPEN l_cur_tax_rate( l_r_items.mil_tco_seq_num, :blk_manual_inv_header.mih_invoice_date );
FETCH l_cur_tax_rate INTO l_t_trt_rate;
IF ( l_cur_tax_rate%NOTFOUND )
THEN
CLOSE l_cur_tax_rate;
pa_lib_msg.pr_message_alert( 'STB', -124 );
END IF;
CLOSE l_cur_tax_rate;
PR_insert_cell( TO_CHAR( l_t_trt_rate ) || '%' );
l_n_bookmark := 21;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
l_n_tax := ROUND( l_r_items.mil_value * ( l_t_trt_rate / 100 ), 2 );
PR_insert_cell( TO_CHAR( l_n_tax, '99999999.90' ) );
l_n_bookmark := 22;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( TO_CHAR( l_r_items.rownum ) );
l_n_bookmark := 23;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( UPPER( l_t_rli_description_1 ) );
l_n_bookmark := 24;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bcl_client_name );
l_n_bookmark := 25;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line1 );
l_n_bookmark := 26;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line2 );
l_n_bookmark := 27;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line3 );
l_n_bookmark := 28;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line4 );
l_n_bookmark := 29;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line5 );
l_n_bookmark := 30;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bca_client_address_line6 );
l_n_bookmark := 31;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( TO_CHAR( :blk_manual_inv_header.mih_invoice_date, 'DD/MM/YYYY' ) );
l_n_bookmark := 32;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
PR_insert_cell( l_t_bcl_client_id );
l_n_bookmark := 33;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
IF ( :blk_manual_inv_header.mih_invoice_prefix IS NULL )
THEN
PR_insert_cell( TO_CHAR( :blk_manual_inv_header.mih_invoice_number, '0000000009' ) || '/' ||
TO_CHAR( :blk_manual_inv_header.mih_issue_number, '09') );
ELSE
IF ( NVL( LENGTH( :blk_manual_inv_header.mih_invoice_prefix), 0 ) = 1 )
THEN
PR_insert_cell( :blk_manual_inv_header.mih_invoice_prefix ||
TO_CHAR( :blk_manual_inv_header.mih_invoice_number, '000000009' ) || '/' ||
TO_CHAR( :blk_manual_inv_header.mih_issue_number, '09' ) );
ELSE
PR_insert_cell( :blk_manual_inv_header.mih_invoice_prefix ||
TO_CHAR( :blk_manual_inv_header.mih_invoice_number, '00000009' ) || '/' ||
TO_CHAR( :blk_manual_inv_header.mih_issue_number, '09' ) );
END IF;
END IF;
l_n_bookmark := 34;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
IF ( l_r_items.rownum = 1 )
THEN
PR_insert_cell( TO_CHAR( l_n_total_value, '99999999.90') );
END IF;
l_n_bookmark := 35;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
IF ( l_r_items.rownum = 1 )
THEN
PR_insert_cell( TO_CHAR( l_n_total_tax, '99999999.90' ) );
END IF;
l_n_bookmark := 36;
CLIENT_OLE2.INVOKE( l_t_selection, 'MoveRight', l_t_args_move_right );
IF ( l_r_items.rownum = 1 )
THEN
PR_insert_cell( TO_CHAR( l_n_total_value + l_n_total_tax, '99999999.90' ) );
END IF;
END LOOP;
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args_move_right );
-- Open merge file
l_n_bookmark := 37;
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG( l_t_args, l_v_destination_directory||l_v_letter );
l_t_letter_doc := CLIENT_OLE2.INVOKE_OBJ( l_t_documents, 'Open', l_t_args );
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
-- Do mail merge
l_n_bookmark := 38;
l_t_mail_merge := CLIENT_OLE2.GET_OBJ_PROPERTY( l_t_letter_doc, 'MailMerge');
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.INVOKE( l_t_mail_merge, 'Execute', l_t_args );
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
-- Print
l_n_bookmark := 39;
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
l_t_merge_doc := CLIENT_OLE2.GET_OBJ_PROPERTY( l_t_application, 'ActiveDocument' );
CLIENT_OLE2.ADD_ARG( l_t_args, 0 );
CLIENT_OLE2.INVOKE( l_t_merge_doc, 'PrintOut', l_t_args );
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
-- Cleanup
l_n_bookmark := 40;
IF ( NOT( l_b_debug ) )
THEN
l_t_args := CLIENT_OLE2.CREATE_ARGLIST;
CLIENT_OLE2.ADD_ARG( l_t_args, 0 );
CLIENT_OLE2.INVOKE( l_t_documents, 'Close', l_t_args );
CLIENT_OLE2.DESTROY_ARGLIST( l_t_args );
CLIENT_OLE2.INVOKE( l_t_application, 'QUIT' );
END IF;
CLIENT_OLE2.RELEASE_OBJ( l_t_selection );
CLIENT_OLE2.RELEASE_OBJ( l_t_mail_merge );
CLIENT_OLE2.RELEASE_OBJ( l_t_source_doc );
CLIENT_OLE2.RELEASE_OBJ( l_t_letter_doc );
CLIENT_OLE2.RELEASE_OBJ( l_t_merge_doc );
CLIENT_OLE2.RELEASE_OBJ( l_t_documents );
CLIENT_OLE2.RELEASE_OBJ( l_t_application );
l_n_bookmark := 41;
SET_APPLICATION_PROPERTY(CURSOR_STYLE,'DEFAULT');
EXCEPTION
WHEN FORM_TRIGGER_FAILURE
THEN
SET_APPLICATION_PROPERTY(CURSOR_STYLE,'DEFAULT');
RAISE;
WHEN OTHERS
THEN
PA_lib_msg.PR_others_exception('PA_hci_misc.PR_print_invoice',l_n_bookmark);
END;
---------------------------------Some questions:
Which version of office were you using before? 2003?
Are the data files on a network, or on your local machine? If they are on a network, can you make a copy of one of them on your local machine and try again?
Can you open the files directly in Excel? What extension do they have (.xls, or something else?) I am wondering whether access to other file types has been left blocked on your machine but is allowed on your colleague's machine.
Are you just opening the mail merge main document and seeing this message? If so, do you see the same thing if you start with a new document and try to connect to one of these data sources?
Can you confirm that the message is about Access even though you are trying to connect to an Excel file?
(Also, office 2007 has some new stuff - that let's you specify that certain folders are "trusted" . I don't think that ever affected MailMerge but it may be as well to make sure that your documents and data sources are in trusted locations).
Also worth trying to start Word in "Safe mode" - see, e.g. http://office.microsoft.com/en-gb/word-help/work-with-office-safe-modes-HP010140792.aspx
Peter Jamieson -
Mail Merge embedded into Outlook Form template - Outlook 2013 - possible???
G'Day!
After some learning, I've been able to create a form outlining a few things I need the mail-out to contain....but now I need to embed the Mail-merge from .xls listing into the message box at the top of the form.
I can mail-merge and I can promote the form to the end users/recipients - but can I combine the two into one email-out to around 2000 people?
Any suggestions welcome!
Thanks!
__LEOWSKI__You can't use the default Mail Merge feature to merge to a custom form. You'll need to use VBA to automate this instead.
Robert Sparnaaij
[MVP-Outlook]
Outlook guides and more: HowTo-Outlook.com
Outlook Quick Tips: MSOutlook.info -
I have a form that has multiple fields but has 5 sections. I have used mail merge to insert information but I can't get Excel to recognize that I need different names and addresses for each section. Please help.
Thanks for your response. I do believe I have the information needed for each form on a separate line in Excel. There is a first name, middle name, last name, city, and zip column. And field is entered on a different line for all the information. I'm really stuck.
-
I've tried both creating the table using Thunderbird, as well as creating the table in Word first and the problem is the same. I've reinstalled and updated both the mail merge add on and Thunderbird.
If you do not need all the excel specific items you can just write it to a spreadsheet using the write to spreadsheet file vi's.
If you want to go the excel route you will have to use active x. you can see a lot of examples on the excel board under the breakpoint forum. please post a sample of how you want your data to look and I can maybe help explain what options you have. and also oyu do not necesarily need the report generation toolkit.
Joe.
"NOTHING IS EVER EASY" -
Hi I am trying to import an Excel spreadsheet with highlighted columns I have assigned into a working PDF document with the fields assigned so that it pulls similar to a mail merge in Microsoft Word.
Your copy and paste ability on the FormCentral community form doesn't work? You might want to fix that as well. Back to my issue:
Here is the PDF with the fields I am using as an example:
Excel:
Can't find the FDF option under the 'Save As', tried XML, tried .TXT file save as, CSV, etc. Doesn't import correctly with TXT file as Adobe suggests. Please advise as to how to fix this issue.:How does one go about saving as an FDF file that Adobe suggests? I want to pull the info from the table fields I have created in Excel to show up or populate in the PDF form pretty much like a mail merge you can do with Microsoft. It pulls part of the fields for a TXT file if I save it as that, but, does only one of the people I have have assigned and not the others. For example, pulls Mary (FIRST_NAME table), but, doesn't pull LAST_NAME for my example if you reference the second image I have included in this inquiry. So it should pull 'Clark' for LAST_NAME, but doesn't. Also, only one page it populates using the import function for a .TXT file. I have three rows of content and only pulls the middle 'dummy' Mary information and it's not complete even though I assigned the text fields to be parallel. So, if the TXT functionality doesn't work, where or how do I go about saving as a FDF file since I don't have this option in EXCEL, but, that's what Adobe is "screaming" for. I don't need a workflow, just want to pull the fields from the table names I have setup in Excel.
-
Mail Merge creates blank document
After choosing an envelope template, I create a merge text box filled with data from a Numbers document. When I select Mail merge from the Edit menu, I'm prompted to choose the mail merge source and then I choose to create a new document (in stead of printer). The new document is created and opens to reveal my, say 30 envelopes, are now 60 envelopes. There is a blank envelope in between each envelope I've created. Trying to delete every other envelope doesn't work as it appears to be linked, therefore, deleting the one I created as well as the blank one.
What is it I can do to prevent the creation of the blank envelope in between the actual document?
Thank you.Thank you for all of your help so far.
I can see that in the screenie of the merge document, there is an invisible character of some sort on the second page of the document. It shows as some sort of line ended with some sort of character.
When I look at the document in its original form with "show invisibles" on, there is nothing there.
If I start the document from scratch, I can create it without the extra pages. I beleive it is in the creation of the envelope templates. It seems to happen to each of the envelope templates.
Again, thank you for your help and continued support. -
When I tried to Mail Merge for Data is is not exporting any data.
HI,
EBS-12.1.3
DB-11gR1
OS - RHEL 5.6
[With my Login User and SysAdmin Login User] When I enter into to the "People -> Enter and Maintain" Form and then I press the "Export Button", there is error Alert
Function is not available to this responsibility. Change Responsibilities or Connect to the System Administrator
I Added the Function "HR ADI Seeded Integrator Form Functions" into the "AE HRMS Manager" Responsiblity. It is also working and Export Data icon is enable.
Problem:
But Problem is when I tried to Mail Merge for Data is is not exporting any data.
====================================================================
Steps
1.Move to the "People -> Recruirment" and then "Request Recruitment Letter" .
2. Enter the New Request. as
Letter Name "App. Letter Contract Site",
Automatic or Manual = Manual.
Select the Name from the LOVs for the Request for Detail Block.
3. Press the "Export Data" icon.
4. Integrator Page Appear with my Custom Integrator Name as "Appointment Letter - Contact Site".
5. Select the "Word 2003" from the View List. and Reporting is Checked.
6. Review the Folowing Enteries as:
Integrator Appointment Letter - Contact Site
Viewer Word 2003
Reporting Yes
Layout App. Letter Contract Site
Content XXHR_MBE_APP_LET_CONT_SITE_V
Session Date 2011/08/02
Mapping XXHR_MBE_APP_LET_CONT_SITE_V Mapping
7. Press "Create Document" Button.
8. It will open the Excel 2003 and then Word 2003. But no data down download from the Form.
9. It open the Mail Merge Letter but no Data is Display.
===========================================================
Note:
a. I am following the Steps from the Link:"http://apps2fusion.com/at/38-ss/351-generate-recruitment-letters-web-adi".
b. From the "Desktop Integrator Manager", "Oracle Web ADI", "HRMS Web ADI", it is working fine and Dowload the Data.
===========================================================
Thanks
VishwaPlease try the solution in ("Function not available to this responsibility" Error While Cliclking On Forms Personalisation [ID 1263970.1]) and see if it helps.
Thanks,
Hussein -
BP Information in a Mail Merge Spreadsheet Format
Hi Guys,
I need to run a report that I can export to excel that will allow me to export BP details (ie name and address) in a format that will allow me to mail merge the addresses into a Word Document for a mailing campaign.
I have looked through the standard B1 reports/queries and cant find anything there. As I am a little bit dumb regarding the query generator I would be very grateful if anyone has done this previously, if they could post the queries details.
Many thanks in advance
Sean MartinHi Sean,
You can achive it without using query, just follow the following steps.
Open Business Partenr master screen.
In find mode put * in code and click on find
then click on form setting
Select the fields you want to export to excel
click ok
again use find, you will find all the fields in find list, now use export to excel button
Hope it helps,
Samir Gandhi -
Anyone been able to get mail merge to work?
I have a standard form that is currently being filled out
manually, we would like to add it to our intranet so it could be
filled out and submitted electronically. I have Ben Forta's book
"Advanced Macromedia Coldfusion: Application Development Kit" and
found the section where he talks about how to achieve this, but for
some reason it just wont work on my system.
I have Coldfusion 6.1 running locally and Word 2003 loaded.
I have tried many many ways and have worked on just getting
each step to work. It seems that the page will hang if it has to
open a Mail merge main document. It will open a normal document and
then I can pull text from that document and output it to the page,
but I want to be able to open a mail merge document and have it
perform a merge using either a text file or an access database as
the data source. I am hoping that someone out there can shed some
light on my problem. Thanks for reading, sorry it is kind of a
lengthy explanation.....These release notes provide late-breaking and release information for Cisco? NAC Appliance, formerly known as Cisco Clean Access (CCA), release 4.1(1). This document describes new features, changes to existing features, limitations and restrictions ("caveats"), upgrade instructions, and related information.
http://www.cisco.com/en/US/products/ps6128/prod_release_note09186a00807bb9f3.html -
Error Mail Merge Aborted due to error in creating the Mail Merge DataSource
Dear All,
please help me with this problem (Oracle release 12.0.4.)
1. PROBLEM:
When attempting to extract data, using Web ADI in HRMS, Word is selected as the viewer, but an Excel spreadsheet is generated rather than a MS Word document containing the data. Also error "Mail Merge Aborted due to error in creating the Mail Merge Data Source." appears on screen.
We are using MS Office 2003.
2. PROBLEM:
Unable to create data source from HR form PAYWSLEE.
We are using custom integrator. This integrator is attached to form function. Form function is attached to responsibility. We also created the layout.
The next step would be to create data source from form PAYWSLEE, but we are not able to perform this...
In release 11i we used this form (PAYWSLEE) to create datasource (for mailmerge), but in R12 this is not working... Something is missing here and I need your help to determine what. I checked the most documents on Oracle Support and didn't find solution for this problem...
Please advise.
Kind Regards,
AndrejaHi all,
Thanks for visiting our forum and sharing your experience here. It'll be benefited to our communicator.
Have a good time.
Regards,
Thanks
George Zhao
Forum Support
Come back and mark the replies as answers if they help and unmark them if they provide no help.
If you have any feedback on our support, please click "[email protected]" -
I am using Adobe Acrobat 9.0 Pro to send a merged word document to a list of email receipents.
I have created two word files, the first works fine but the second I always get the error message that "Acrobat PDFMaker was not able to mail merge the document".
The only difference between the two files is that the second has some additional merge feilds. Although it doesnt appear to relate to any specific additional field (no matter which field I add, as soon as there is a new field the merge fails).
Does anyone have any suggestions about what might be causing the merge to PDF to fail?
FYI, I can complete the mail merge in word no problem, and I can mail merge and email to receipents in word no problem. (The end result I am after is to send out to the email receipents a PDF file rather than an editable word doc).
Thanks ShaneThis thread may have your answer:
http://forums.adobe.com/message/1924439
(Paul_Kuczmierczyk) writes:
6. Dec 18, 2008 10:09 AM in response to: (Ray_Whitfield)
Re: PDF Maker Mail Merge error
I've had this same problem with one word document and I think I figured out what is going on, at least in my case. I'm using Word 2003. I tried a test of one merge record, and it worked, but when I tried to complete the entire merge, it failed. After trying several times to no avail, I noticed that the first word in my document had the red spell check underline, even though the word was not spelled wrong. When I placed my mouse cursor in front of the first letter of the word, the font information said "ZWAdobeF" and the size was 1. After I deleted this and tried the merge to e-mail through the Adobe plugin, it worked flawlessly. After the merge was completed however, that font reappeared in front of the first word in my document.
I hope this helps some people out there.
Also, I'm using Adobe Acrobat 8 Professional, Windows XP SP3. -
Mail Merge in Acrobat 9 Professional?
Hi, All!
I have been told that I can perform a mail merge similar to MS Word from within Acrobat Pro 9. The main document (with merge type fields) needs to be an Acrobat .pdf. The data source can come from an external file. The key is that the merge is performed in Acrobat, not Word.
I have searched throughout Acrobat Pro 9 but have found no functionality that matches my needs. Can anyone help me with this?
Thanks for any help on this!
ChristinaJust figured out how to merge Excel data into an Adobe Acrobat PDF with form fields! This will only works for 1 document at a time though, so it's not really a mail merge, but still better than nothing.
1. Create PDF from Word, Indesign or whatever you prefer to use.
2. Create you form fields as you normally would.
3. In the appropriate form field, type the name that corresponds with your Excel heading <Form Field Name>
4. Save your Excel spreadsheet as a 'Tab Delimited Text (.txt)' file.
5. Back to Acrobat, Forms Menu, Manage Form Data, Import Data, Select 'Text Files', Select your file, highlight data group and hit OK.
Maybe you are looking for
-
Is my iPod Touch 4th Gen broken?
I usually have my iPod on my table and it somehow fell on my bed or someone might have put it on the bed. I was asleep by the way. Anyways, I didn't notice it was on my bed because I was really asleep and when I woke up, the iPod was nowhere to be fo
-
How do I Move iTunes to a new PC?
This relates to the thread at http://discussions.apple.com/thread.jspa?threadID=895833. I posted there, didn't receive a reply, and thought others might be able to help. It would probably help if you scanned the first two postings to the thread... I
-
Which software I should install to view video file AVI format on my Imac?
Which software I should install to view video file AVI format on my Imac?
-
Hi, Here's a detail description of issue we are facing with UWL substitution. 1. When User A assigns User B on his behalf, User B is only able to see a few items and not all items. Ideally the expectation is that the User B should be able to see all
-
how can we attach development objects (reports, scripts, bdc) to our email?