Chia-liang Kao (高嘉良) > Business-TW-Invoice-U420 > Business::TW::Invoice::U420

Download:
Business-TW-Invoice-U420-0.01.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  1
Open  0
View/Report Bugs
Module Version: 0.01   Source  

NAME ^

Business::TW::Invoice::U420 - Print Taiwan Unified Invoice with U420 printer

VERSION ^

Version 0.01

SYNOPSIS ^

Business::TW::Invoice::U420->init_printer; my $u420 = Business::TW::U420->new ({ heading => [ DateTime->now->ymd, '', 'order: #232', ''], lines_total => 35, lines_available => 18, lines_stamp => 5, fh => \*STDOUT });

$u420->println("123123") for 1..30; $u420->cut;

# to actually print to the printer, run: # perl your-program.pl > COM1

DESCRIPTION ^

This module generates commands for the Epson RP-U420 invoice printer for printing the Unified Invoice in Taiwan.

You must install the driver and printer processor properly before you can use the module.

You can define multiple lines of headers that will appear on each page of the printed invoices, and when you do println the module does all the necessary paging and stamping for you.

METHODS ^

new

init_printer

feed( $lines )

Feed $lines lines, default is 1.

stamp

Make the printer stamp on the invoice. note that you generally don't want to call this method directly, due to the stamp positioning. When you call cut, the module automatically detects the correct place to stamp for the next invoice.

cut

feed the current invoice and cut, as well as stamping on the next invoice.

print

Low level print function.

println

Print a line on the invoice. Does all the paging logic here.

AUTHOR ^

Chia-liang Kao, <clkao at clkao.org>

TODO

BUGS ^

Please report any bugs or feature requests to bug-business-tw-invoice-u420 at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Business-TW-Invoice-U420. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT ^

You can find documentation for this module with the perldoc command.

    perldoc Business::TW::Invoice::U420

You can also look for information at:

ACKNOWLEDGEMENTS ^

COPYRIGHT & LICENSE ^

Copyright 2007 AIINK co., ltd, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: