NAME

FedIncome

SYNOPSIS

  use Business::Payroll::US::FedIncome;
  my $fedIncome = Business::Payroll::US::FedIncome->new();
  if ($fedIncome->error())
  {
    die $fedIncome->errorMessage();
  }

DESCRIPTION

This module will calculate Federal Income Taxes for the US based on internal tables when given a gross amount

Exported FUNCTIONS

scalar new()

        Creates a new instance of the object.

integer isValidArg( gross => $gross)

        gross - floating point > 0
        date -  YYYYMMDD
        method -
        allowances - integer > 0
        period - annual, semiannual, quarterly, monthly, semimonthly, biweekly, weekly, daily
        marital - single | married
        periodDays -
        round - yes, no
  )

        This method will check an argument sent in for validity.  returns 0 for no, 1 for yes .
        NOTE:  Only send one argument at a time.  If you send all you will not know which one is invalid

integer calculate( gross - total amount of pay date - date to be paid on. affects tax rates format YYYYMMDD method - the method to use for calculation (currently only percentage ) allowances - federal allowances period - annual, semiannual, quarterly, monthly, semimonthly, biweekly, weekly, daily marital - single or married round - yes, no - defaults to yes - or should user sprintf the result. seems that would be more efficient )

bool generateTable( period, marital, date )

string lookupDate (date)

        Returns the date closest to the given date that is less than or equal to it

string firstDate()

        This method will return the earliest date in the datatables.
        Combined with the lastDate method, you can find the date range of the data

string lastDate()

        This method will return the earliest date in the datatables.
        Combined with the firstDate method, you can find the date range of the data

NOTE

All data fields are accessible by specifying the object and pointing to the data member to be modified on the left-hand side of the assignment. Ex. $obj->variable($newValue); or $value = $obj->variable;

AUTHOR

JT Moree

SEE ALSO

perl