1#===================================================================== 2# LedgerSMB Small Medium Business Accounting 3# http://www.ledgersmb.org/ 4# 5 6# Copyright (C) 2006 7# This work contains copyrighted information from a number of sources all used 8# with permission. 9# 10# This file contains source code included with or based on SQL-Ledger which 11# is Copyright Dieter Simader and DWS Systems Inc. 2000-2005 and licensed 12# under the GNU General Public License version 2 or, at your option, any later 13# version. For a full list including contact information of contributors, 14# maintainers, and copyright holders, see the CONTRIBUTORS file. 15# 16# Original Copyright Notice from SQL-Ledger 2.6.17 (before the fork): 17# Copyright (c) 2000 18# 19# Author: DWS Systems Inc. 20# Web: http://www.sql-ledger.org 21# 22# Contributors: 23# 24# 25# This program is free software; you can redistribute it and/or modify 26# it under the terms of the GNU General Public License as published by 27# the Free Software Foundation; either version 2 of the License, or 28# (at your option) any later version. 29# 30# This program is distributed in the hope that it will be useful, 31# but WITHOUT ANY WARRANTY; without even the implied warranty of 32# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 33# GNU General Public License for more details. 34# You should have received a copy of the GNU General Public License 35# along with this program; if not, write to the Free Software 36# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 37#====================================================================== 38# 39# Accounts Receivable 40# 41#====================================================================== 42 43use LedgerSMB::PE; 44use LedgerSMB::IS; 45 46require "bin/arap.pl"; 47require "bin/arapprn.pl"; 48require "bin/aa.pl"; 49 50$form->{vc} = 'customer'; 51$form->{ARAP} = 'AR'; 52 531; 54 55# end of main 56 57