www.pudn.com > mapl.rar > sbfppmsg.pl

#!/usr/local/bin/perl 
# 
# Error Message Includes. 
# 
# Copyright(C) 1998, SES, Inc. 
# All Rights reserved. 
# 
# Programmed by J.Adachi. 
#  
# History  : 1998/08/28 J.Adachi	Create English Version. 
# 
# 
# 
 
# Error 4000 - 4399 
$ERRMSG{"ARG_INVAL"} = "SBF4001E(%s) Invalid arguments\n"; 
$ERRMSG{"FILE_OPEN"} = "SBF4002E(%s) Cannot open file (%s)\n"; 
$ERRMSG{"COM_NOEND"} = "SBF4003E(%s) Cannot find end of comments in %s\n"; 
$ERRMSG{"NKF_NOEXT"} = "SBF4004E(%s) Cannot convert char. code\n"; 
 
# Warning 4400 - 4799 
$ERRMSG{"DEF_USE"}   = "SBF4401W(%s) Define (%s) is already used\n"; 
 
# Information 4800 - 4999 
$ERRMSG{"ADD_HIST"}  = "SBF4801I(%s) Add history And Converted char. code\n"; 
$ERRMSG{"KANJI_CV"}  = "SBF4802I(%s) Converted char. code\n"; 
 
# for require-use 
1;