package myconstant;

=pod

=head1 NAME

myconstant.pm - 環境コンスタント設定ファイル

=head1 概要

環境設定用のコンスタンを登録しておくファイル

=cut

sub new {
	my $class = shift;
	my $self = bless {}, $class;
	$self->_initalize;
	return $self;
}
sub _initalize{
	my $self = shift;
	$self->{css} = 'css/';
	$self->{js} = 'js/';
	$self->{pdf} = 'pdf/';
	$self->{log} = '/sei/jnet/httpd/perl/buhin/log/';
	$self->{host} = 'localhost';
	$self->{home} = '/cgi-bin/system/';
	$self->{kin} = {-host=>'192.168.220.13',-usr=>'LNEFTP',-pass=>'sne099',
			-plc=>'/FTP用/勤怠/',
			-plc2=>'/FTP用/勤怠/',
			-plc4=>'/FTP用/組合/',
			-plc5=>'/FTP用/仕訳/',
			-plc3=>'/FTP用/経理処理関連/',
			-plc6=>'/FTP用/日次実績取込/',
			-plc7=>'/FTP用/有償支給データ/',
			-plc9=>'/FTP用/売上/',
			-plc8=>'/FTP用/R-Pics作業用/',
			-plc10=>'/FTP用/化合物見積データ/',
			-plc11=>'/FTP用/環境負荷物質/'};
	$self->{ftp} = {eco=>{-host=>'localhost',-usr=>'eco',-pass=>'eco0123',
				-plc=>''},
			kin=>{-host=>'localhost',-usr=>'kin',-pass=>'kin0123',
				-plc=>''},
			siwake=>{-host=>'localhost',-usr=>'siwake',
				-pass=>'siwake0123',-plc=>''},
			rpics=>{-host=>'localhost',-usr=>'rpics',
				-pass=>'rpics0123',-plc=>''},
			member=>{-host=>'localhost',-usr=>'member',
				-pass=>'member0123',-plc=>''}
			};
	$self->{myname} = 'シャープ新潟電子工業株式会社';
	$self->{myaddr} = '新潟県新潟市南区上八枚１３１０番地';
	$self->{mybank} = {'D'=>'第四','F'=>'みずほ'};
	$self->{mybank2} = {'D'=>'第四銀行　白根','F'=>'みずほ銀行新潟',
				'U'=>'三菱東京ＵＦＪ銀行　新潟',};
	$self->{FD} = {'code'=>'0009941341',
			'code2'=>'0009941789',
			'name'=>'ｼﾔｰﾌﾟ ﾆｲｶﾞﾀﾃﾞﾝｼｺｳｷﾞﾖｳ(ｶ)',
			'ginko'=>'0140',
			'siten'=>'333',
			'syubetu'=>'1',
			'kouza'=>'0100594',
			'kouza3'=>'0054898',
			};
	$self->{StartDD} = 16;
	$self->{StartMM} = 4;
	$self->{StartMD} = 316;
	$self->{printSetting} = <<END;
function prtSetting(){
	factory.printing.header = "";		// Header
	factory.printing.footer = "";		// footer
	factory.printing.portrait = false;	// 用紙の向き(true:縦/false:横)
	factory.printing.leftMargin = 0;	// 余白　左
	factory.printing.topMargin = 0;		// 余白　上
	factory.printing.rightMargin = 0;	// 余白　右
	factory.printing.bottomMargin = 0;	// 余白　下
}
END
	$self->{printObject} = <<END;
<object id="factory" viewastext style="display:none"
classid="clsid:1663ed61-23eb-11d2-b92f-008048fdd814"
codebase="http://www.meadroid.com/scriptx/ScriptX.cab#Version=6,1,429,14">
</object>
END
	$self->{explain} = {
	'工事設計指示書' =>{
		'取出工事有無' =>	'1:有,2:無',
				},
	'振込手数料テーブル' =>{
		'処理区分' =>	'0:振込,1:期日確定',
		'自他行区分'=>	'0:自行同,1:自行他,2:他行同,3:他行他',
		'送付区分' =>	'1:文書,2:電信,3:海外',
				},
	'科目マスタ'	=>{
		'決済有無' =>	'0:無,1:有',
		'残高作成' =>	'1:有',
		'科目区分' =>	'1:受取手形など,2:支払手形など,3:受取利息など,4:固定資産売廃却損など'
				},
	'仕訳科目'	=>{
		'決済有無' =>	'0:無,1:有',
		'残高作成' =>	'1:有',
		'科目区分' =>	'1:受取手形など,2:支払手形など,3:受取利息など,4:固定資産売廃却損など'
				},
	'支払手形累積'	=>{
		'取消区分' =>	'1:取消'
				},
	'物質含有量マスタ'	=>{
		'含有量' =>	'mg'
				},
	'環境質量マスタ'	=>{
		'質量' =>	'g',
		'判定' =>	'0:YES,1:NO,10:対象外,20:未登録',
		'入力部門' =>	'1:環境,2:技術,3:資材',
		'成分分析' =>	'0:取得済,1:未取得'
				},
	'環境物質マスタ'	=>{
		'使用区分' =>	'0:可能,1:不可',
		'使用年月日' =>	'YYYYMMDD',
		'集計区分１' =>	'0:未集計,1:集計',
		'集計区分２' =>	'0:未集計,1:集計',
		'集計区分３' =>	'0:未集計,1:集計',
		'集計区分４' =>	'0:未集計,1:集計',
		'集計区分５' =>	'0:未集計,1:集計'
				},
	'取引先マスタ'		=>{
		'通貨区分' =>	':円,0:US$',
		'連絡書要否' =>	'0:不要,1:必要',
		'ラベル要否' =>	'0:不要,1:必要',
		'ＦＤ作成' =>	'0:必要,1:定期のみ,2:セミのみ,3:不要',
		'連結区分' =>	'<br>上１桁 0:親会社,1:国内,2:海外<br>
下１桁 O:親会社,A:連結,B:非連結,C:関連会社 <br>スペース:その他'
				},
	'費用管理ファイル'	=>{
		'予算実績' =>	'1:予算,2:実績'
				},
	'製品受払明細'		=>{
		'データ区分' =>	'11:通常品,12:正規外・試作,13:ソフトウェア,14:開発費,17:金型・版代,21:売上,22:返品'
				},
	'為替レート'		=>{
		'通貨区分' =>	'0:US$',
		'日付' =>	'各月の1日に当月使用するレート（前月の平均）
を登録します',
				},
	'オプト在庫マスタ'	=>{
		'データ区分' => 'S:仕掛,T:単品,Z:試作（その他)'
				},
	'部品コードNo'	=>{
		'データ区分' => 'S:仕掛,T:単品'
				},
	'倉入伝票'	=>{
		'通貨区分' =>	':円,0:US$',
				},
	'伝票発行ファイル'	=>{
		'入金種別' =>	'1:振　込,2:現　金',
		'貸借区分' =>	'1:借方,2:貸方',
		'通貨区分' =>	'0:US$',
		'レート区分' =>	'B:TTB,S:TTS',
				},
	'計算基礎時間マスタ'	=>{
		'計算基礎時間区分' =>	'1:常勤,2:交替',
				},
	'勤務名称マスタ'	=>{
		'計算基礎時間区分' =>	'1:常勤,2:交替',
		'勤務地コード'	=>	'1:新潟,2:富山',
		'交替手当'	=>	'0:対象外,1:対象',
		'ズレ手当'	=>	'0:対象外,1:手当単価１,2:手当単価２,3:手当単価３',
		'夜勤手当'	=>	'0:対象外,1:対象',
				},
	'割増率設定マスタ'	=>{
		'身分コード' =>	'1:社員,2:定準,3:パート・アルバイト',
		'超過種類' =>	'1:残業,2:休日',
				},
	'個人別割増率設定マスタ'	=>{
		'超過種類' =>	'1:残業,2:休日',
				},
			};
}
1;

=head1 AUTHOR INFORMATION

 ;######################################################################
 ;#
 ;# myconstant.pm: 環境コンスタント設定ファイル
 ;#
 ;# Copyright (c) 2004 Masashi Hori <hori@japannet.co.jp>
 ;# JapanNet. All Rights Reserved.
 ;#
 ;#
 ;######################################################################

=cut