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

if ($ENV{'REMOTE_ADDR'} =~ /^(127\.0\.0\.1|10\.0\.0\.8)$/){
$ENV{'REMOTE_ADDR'} = '10.0.0.15';
}


$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;