编程中的出错信息二

返回

当社の許可なく第三者へ開示することを禁ずる Machinery Service Corporation Proprietary & Confidential Information
DBD::mysql::db do failed: Data truncated for column 'gname_id' at row 1 at inser t_tables.pl line 65. INSERT INTO main_type1 (id,name,series,gname_id,maker_id,GR,DWG,memo) VALUES("27 9","SJ 30G","XXXSERIES","603066-0.5.7=6031421=6031548=1140786","256","94","","XX XDWG=265905A-C2=A10011F=206346=206346=206352A=FIG,2-32 BOWL ASSEMBLY =FIG.2-53 W ATER SUPPLYING DEVICE ASS`Y =FIG.2-63 GEAR PUMP ASSEMBLY=BOWL ASSEMBLY=BOWL ASSE MBLY 206346=BOWL ASSEMBLY 206346=VERTICAL SHAFT ASSEMBLY,206348=HORIZONTAL SHAFT ASSEMBLY,206349A=NK 00B175P=BOWL ASSEMBLY ,D/N 206346=FIG 2-32") ===>seriesがおかし! DBD::mysql::db do failed: Incorrect integer value: '=1' for column 'gname_id' at row 1 at insert_tables.pl line 65. INSERT INTO main_type1 (id,name,series,gname_id,maker_id,GR,DWG,memo) VALUES("18 82","test","XXXSERIES","=1","1","","XXXDWG","") ===>seriesがおかし!
enq1-ID 4592, 9071405のparts顺序问题,已解决(重新选择即可) 8082603 零件修改 に入れない。 ==>零件表a000339的部分零件price1,price2存在NULL. ==>为了解决这个问题,编一个程序对所有的price1和price2赋值 8090111 メーカー値段入力すると、8090110 の場面に変わる。 猜想:可能在生成"複数仕入先"のとき,enq2のenq1idに間違った番号をつけた?
mscenq1_start.pl [Tue Aug 19 16:28:33 2008] [error] [client 192.168.116.5] DBD::mysql::db selectrow_array failed: Table 'msc.a000519' doesn't exist at ./pro/mscenq1_start.pl line 291, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==>增加a000519表格 [Tue Aug 19 16:28:33 2008] [error] [client 192.168.116.5] Use of uninitialized value in string eq at ./pro/mscenq1_start.pl line 38, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{mode} eq 'new' or $t{mode} eq 'copy' ) {,所有到mscenq1_start画面的都要指定mode参数(检查所有相关的SUB) [Tue Aug 19 16:28:33 2008] [error] [client 192.168.116.5] Use of uninitialized value in numeric gt (>) at ./pro/mscenq1_start.pl line 292, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{count1} > 0 ) {, 需要考虑$t{count1} = 0的情况 [Tue Aug 19 16:28:33 2008] [error] [client 192.168.116.5] Use of uninitialized value in concatenation (.) or string at ./pro/mscenq1_start.pl line 327, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> $t{name1} .= ' ' . $rec[0] . ' ' . $rec[2] . ' ' . $rec[4]; 需要考虑$rec[4] = 0 的情况. mscenq1.pl [Tue Aug 19 16:10:53 2008] [error] [client 192.168.116.5] Argument "C" isn't numeric in numeric eq (==) at ./pro/mscenq1.pl line 912, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi [Tue Aug 19 16:41:43 2008] [error] [client 192.168.116.5] Argument "C" isn't numeric in numeric eq (==) at ./pro/mscenq1.pl line 914, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{sid0} == $t{sid1} ) {, 注意$t{sid1}="C"的情况 [Tue Aug 19 16:43:37 2008] [error] [client 192.168.116.4] Use of uninitialized value in concatenation (.) or string at ./pro/mscenq1.pl line 1674, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi [Tue Aug 19 16:43:37 2008] [error] [client 192.168.116.4] Use of uninitialized value in concatenation (.) or string at ./pro/mscenq1.pl line 1688, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> $t{maker} = 'MAKER: ' . $t{maker}; 注意$t{maker}不存在的情况 [Tue Aug 19 16:43:37 2008] [error] [client 192.168.116.4] Argument "C" isn't numeric in numeric gt (>) at ./pro/mscenq1.pl line 1693, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{seri2} > 1 ) { 注意$t{seri2} = "C"的情况 mscquo2.pl [Tue Aug 19 17:00:05 2008] [error] [client 192.168.116.5] Argument "" isn't numeric in numeric ne (!=) at ./pro/mscquo2.pl line 498, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{A1} != 0 ) { 注意$t{A1}不是数字的情况 [Tue Aug 19 17:00:05 2008] [error] [client 192.168.116.5] Argument "" isn't numeric in numeric ne (!=) at ./pro/mscquo2.pl line 531, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{pl1}[$n] != 0 ) { 注意$t{pl1}[$n]不是数字的情况 [Tue Aug 19 16:28:37 2008] [error] [client 192.168.116.5] Use of uninitialized value in split at ./pro/mscquo2.pl line 644, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> @{ $t{p11} } = split(/=/,$$pref{price10}); 注意$$pref{price10}不存在的情况 [Tue Aug 19 16:28:37 2008] [error] [client 192.168.116.5] Use of uninitialized value in split at ./pro/mscquo2.pl line 799, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> @{ $t{p11} } = split(/=/,$$pref{price10}); 注意$$pref{price10}不存在的情况 [Tue Aug 19 17:00:05 2008] [error] [client 192.168.116.5] Argument "" isn't numeric in numeric ne (!=) at ./pro/mscquo2.pl line 498, <CONFIG> line 12., referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==> if ( $t{A1} != 0 ) { 注意$t{A1}不是数字的情况 [Thu Aug 28 11:06:19 2008] [error] [client 127.0.0.1] Argument "C" isn't numeric in numeric ne (!=) at ./pro/mscquo2.pl line 498, <CONFIG> line 11., referer: http://localhost/cgi-bin/msc_start.cgi sub get_length { my ($pref) = @_; my (%t,$n); @{ $t{As} } = split(/=/,$$pref{A}); $$pref{leng} = 0; if ( $t{As}[0] eq 'C' ) { # ==>增加这个循环 return ($pref); } for $n ( 0 .. $#{ $t{As} } ) { $t{A1} = $t{As}[$n]; if ( $t{A1} != 0 ) { $$pref{leng}++; } } return ($pref); } mscupdate.pl [Tue Aug 19 17:08:46 2008] [error] [client 192.168.116.5] "my" variable $n masks earlier declaration in same statement at ./pro/mscupdate.pl line 12.\r, referer: http://192.168.116.100/cgi-bin/msc_start.cgi ==>解决
返回