path: root/pos.conf.pl

# 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'} = "Visa/MC";
$pos_sources{'disc'} = "Discover";
$pos_sources{'check'} = 'Check';
$pos_sources{'cash'} = 'Cash';
$pos_sources{'gcert'} = 'Gift Cert';

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

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

# FLAGS: 1 = projects, 2 = departments
$pos_config{'disable_tables'} = 3;
# 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.

%printer = ( 
    'Printer' => "utils/pos/directnet.pl $pos_config{rp_host} $pos_config{rp_proto} $pos_config{rp_port}"
);
1;