path: root/pos.conf.pl

use LedgerSMB::Sysconfig;
# This sets up the settings for the POS hardware.  You can use it to override
# printing commands etc. as well.

# Chris Travers
# Chris@metatrontech.com
# 2004-02-07

# Begin Editing Here

$pos_config{'rem_host'}=$ENV{'REMOTE_ADDR'};

$pos_config{'pd_host'} = $pos_config{'rem_host'};
$pos_config{'pd_port'} = 6601;
$pos_config{'pd_proto'} = 'tcp';

require "drivers/pd3000.pl"; # Use the PD3000 driver

# Some businesses may want to Override this for custom apps
$pos_config{'pd_host'} = $pos_config{'rem_host'}; 

$pos_config{'rp_port'} = 6602;
$pos_config{'rp_proto'} = 'tcp';

$pos_config{'rp_netdirect'} = 'yes';

# Some businesses may want to Override this for custom apps
$pos_config{'rp_host'} = $pos_config{'rem_host'}; 
$pos_config{'rp_cash_open'} = pack("CCCCC",27,112,0,25,250);

$pos_config{'coa_prefix'} = 1300;

$pos_config{'close_cash_accno'} = 1060;
$pos_config{till_cash} = 200;
# Add your sources here.

$pos_sources{'visa'} = $locale->text("Visa/MC");
$pos_sources{'disc'} = $locale->text("Discover");
$pos_sources{'check'} = $locale->text('Check');
$pos_sources{'cash'} = $locale->text('Cash');
$pos_sources{'gcert'} = $locale->text('Gift Cert');

$pos_source_default = 'cash';

# 1 for source = memo
# 2 for credit card handling
%pos_source_type = {
    visa => 2,
    cash => 1,
    check => 1,
    disc => 2
};

${$pos_config{'source_accno_override'}{'gcert'}} = '2105';
# Define your till accno scheme here.  Current supported values are 'terminal'
# and 'cashier'

$pos_config{'till_type'} = 'cashier';

# FLAGS: 1 = projects, 2 = departments
$pos_config{'disable_tables'} = 3;

# HTML for the appropriate currency symbol for your tills
$pos_config{'curren'} = '$';

# Number format to use
$pos_config{'numberformat'} = '1,000.00';

# Units of currency to use in the till closing cash breakdown relative to
# your base unit of currency, formatted in your chosen format
@{$pos_config{'breakdown'}} = (
  '100', '50', '20', '10', '5', '2', '1', '0.25', '0.10', '0.05', '0.01');

# Stop Editing Here

if (lc($pos_config{'till_type'}) eq 'terminal'){
  $pos_config{'till'} = (split(/\./, $pos_config{'rem_host'}))[3];
}
elsif (lc($pos_config{'till_type'}) eq 'cashier'){
  use LedgerSMB::User;
  $pos_config{'till'} = $form->get_my_emp_num(\%myconfig, \%$form);
}
else { 
  $form->error("No till type defined in pos.conf.pl!");
}
$pos_config{till_accno} = "$pos_config{coa_prefix}.$pos_config{till}";
$pos_config{'pd_dest'}=pack(
    's n a4 x8', 2, $pos_config{'pd_port'}, 
    pack('CCCC', split(/\./, $pos_config{'pd_host'}))
);

$form->{pos_config} = \%pos_config;
$form->{pos_sources} = \%pos_sources;

# Due to the architecture of SL, we need to use netcat to print.
# Otherwise the document gets spooled twice and this interferes with timeliness.

${LedgerSMB::Sysconfig::printer}{'Printer'} = "utils/pos/directnet.pl $pos_config{rp_host} $pos_config{rp_proto} $pos_config{rp_port}";

1;