| get direct print [message #204125] |
Sat, 18 November 2006 00:11  |
mfa786
Messages: 210
Registered: February 2006
Location: karachi
|
Senior Member |
|
|
Hi master,
Sir I have report that contain two page sir my need is I not want preview I want direct print and not want all page my requirement only page 2 not want page 1
Sir please give me idea how I get direct print and only page no 2
Thanks aamir
|
|
|
|
| Re: get direct print [message #205995 is a reply to message #204125] |
Tue, 28 November 2006 05:44  |
|
|
Dear,
Please Try this...
Make ur desformat as TXT also type a whole path of the File for eg. "C:\JAK.TXT" and DESTYPE as "File" Then apply this Code to ur Print Button this is for printing diretly with using a Batch file resides in ur Local drive the Idea behind is to Excute a Batch file for Printing All you have to do is First to make ur Report in TXT format... if you are getting problem to do so please revert me back here i am sending you that printing code Only.
--------FOR PRINTING------------------------------
str_bat_file := Text_IO.Fopen('C:\S1ESTR08.bat','w');
IF Text_IO.Is_Open(str_bat_file) THEN
TEXT_IO.PUT_LINE(str_bat_file,'TYPE C:\S1ESTR08.TXT > PRN');
TEXT_IO.PUT_LINE(str_bat_file,'EXIT');
ELSE
MESSAGE('Unable to Create / Open Batch File S1ESTR08.bat '||SQLERRM);
MESSAGE('Unable to Create / Open Batch File S1ESTR08.bat '||SQLERRM,NO_ACKNOWLEDGE);
RAISE FORM_TRIGGER_FAILURE;
END IF;
TEXT_IO.FCLOSE(str_bat_file);
MESSAGE('Tare Memo '||:boo_control.nbt_tare_memo||' Printed');
MESSAGE('Tare Memo '||:boo_control.nbt_tare_memo||' Printed',NO_ACKNOWLEDGE);
Host('C:\S1ESTR08.bat');
-------------------------------------------------------
So it will Execute a Batch from ur Local C: Drive and send a Print Request without any Preview. I am Exteamly Sorry for Your Second Requiremnt for printing the Second Page Only but as soon as i am getting any solution or Idea I will Let you know.
Thanks & Regards
Jak
|
|
|
|
] 
Blog
Search
Help
Members
Register
Login
Home
