package contact_info;
require Exporter;

our @ISA = qw( Exporter );
our @EXPORT = qw( get_contact_info );

use lib ".";


# START HERE
# If we want the index page, then just call to the index mod
# If we want something else, then open call and close
sub get_contact_info{
  
    my $self = shift;
    my $chpt = shift;
    my $page = shift;
    
    if($chpt ne "index"){
        contact_info_opens( $self );
    }

    contact_info_calls( $self, $chpt, $page );

    if($chpt ne "index"){
        contact_info_closes( $self );
    }
}




#
#
# SETS OPENING PAGE TAGS ETC
sub contact_info_opens{

    my $self = shift;

# INSERT TITLE HERE
    my $title = "Contact Info ";

# INSERT HEADER HTML BETWEEN EOF1'S
my $head =<<EOF1;
EOF1

# INSERT SCRIPT HTML BETWEEN EOF2'S
my $script =<<EOF2;
EOF2
   
# INSERT BODY HTML FROM BETWEEN EOF3'S
my $body=<<EOF3;

  <td class="bottomRight" valign="top"> <h1 align="center"><br>
          <font size="+3"><u> Contact Info</u></font></h1>
        		
        <h1 align="center"><font size="+3"><u> <img src="raised216x162001.jpg" width="216" height="162"></u></font></h1>
        <p align="center"><font size="5">Grills By Design Inc.</font><br>
          1089 Atlantic Blvd.<br>
          Suite 12<br>
          Atlantic Beach, Fl. 32233</p>
        <p align="center">904.249.3339 (office)<br>
          904.249.3329 (fax)</p>
        <table width="500" border="0" align="center" cellpadding="5">
          <tr> 
            <td align="center" valign="top"> 
              <table width="175" border="0">
                <tr> 
                  <td height="100" align="center" valign="top"><font size="5"><u>Bill 
                    Orban</u></font><br>
                    President<br>
                    Custom Grill Designer<br>
                    Sales/Service </td>
                </tr>
                <tr> 
                  <td height="59" align="center" valign="top"><p>904.994.7843<br>
                      904.545.9883</p>
                    </td>
                </tr>
              </table>
              
            </td>
            <td align="center" valign="top"> 
              <table width="175" border="0">
                <tr> 
                  <td height="100" align="center" valign="top"> 
                    <p><font size="5"><u>Katalin Jordan</u></font><br>
                      V. President<br>
                      Custom Grill Designer<br>
                      Sales</p>
                    </td>
                </tr>
                <tr> 
                  <td align="center" valign="top"><p>904.502.1213<br>
                      <font size="2">904.220.5171</font></p>
                    </td>
                </tr>
              </table>
              
            </td>
            <td align="center" valign="top"> 
              <table width="175" border="0">
                <tr> 
                  <td height="100" align="center" valign="top"> 
                    <p><font size="5"><u>Mark Allen</u></font><br>
                      Marketing Director<br>
                      Custom Grill Designer<br>
                      Sales</p>
                    </td>
                </tr>
                <tr> 
                  <td align="center" valign="top"><p>904.993.1002<br>
                      <font size="2">904.704.8080 (cl)<br>
                      904.778.9379 (fx)</font><br>
                    </p>
                    </td>
                </tr>
              </table>
              
            </td>
          </tr>
        </table>
        <br>
        <table width="500" border="0" align="center" cellpadding="5">
          <tr> 
            <td align="center" valign="top"> <table width="175" border="0">
                <tr> 
                  <td height="100" align="center" valign="top"><font size="5"><u>Tom 
                    Ewell </u></font><br>
                    Executive Sales Representative</td>
                </tr>
                <tr> 
                  <td height="59" align="center" valign="top"><p>904.525.5841</p></td>
                </tr>
              </table></td>
            <td align="center" valign="top"><table width="175" border="0">
                <tr> 
                  <td height="100" align="center" valign="top"><font size="5"><u>Stephen 
                    Becker</u></font><br>
                    Executive Sales Representative </u></font></td>
                </tr>
                <tr> 
                  <td height="59" align="center" valign="top"><p>904.563.4241</p></td>
                </tr>
              </table> </td>
          </tr>
        </table>
        <p align="center">&nbsp;</p>
        <p align="center">&nbsp;</p>
        <p align="center">&nbsp;</p>
        </td>

EOF3
# TO HERE

$self->setTitle( $title );
$self->setHead( $head );
$self->setBody( $body );
}



#
#
# CALLS INNER-PAGE MODULES
sub contact_info_calls{

    my $self = shift;
    my $chpt = shift;
    my $page = shift;

}


#
#
# LOAD CLOSING TAGS
sub contact_info_closes{

    my $self = shift;

my $body =<<EOFCLOSE;
EOFCLOSE

    $self->setBody( $body );

}
