<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">package myconstant;

=pod

=head1 NAME

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

=head1 概要

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

=cut

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

=head1 AUTHOR INFORMATION

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

=cut

</pre></body></html>