Re:追伸 売上集計等について


このメッセージの投稿者: glassさん 2002/03/09 00:18:48

元メッセージ: Re:追伸 売上集計等について 投稿者: glassさん 2002/03/06 19:40:01

>>>白紙または<<<<◇>>>>が表示されなくなってしまいます。
>>>もちろん先には商品がまだ有るのですが。
>>これは解決いたしました。
>>原因は、jpgファイルが壊れていてそれが原因でした。
>>売上の乱れは今だ改善できずです。
>売上集計の乱れですが、3月3日よりなぜか突然乱れなくなりました。
>でも、何もしていないのに。。。

私の原因もこれだったんですね


 open(CSVL,"$datadir/csv.lst");
 while(<CSVL>){chomp;
  if(/^(\w+),.+,(\d+)$/){$csv++;
   $komoku=$1;$komoku=~s/_ken/ken/;
   ${"$komoku"}=$datest if($komoku eq'date');
   print CSV "${$komoku},";
  }
 }close CSVL;

ここを次のように修正してください。

 open(CSVL,"$datadir/csv.lst");
 while(<CSVL>){chomp;
  if(/^(\w+),.+,(\d+)$/){$csv++;
   $komoku=$1;$komoku=~s/_ken/ken/;
   ${"$komoku"}=$datest if($komoku eq'date');
   if(${$komoku}=~/\n/){print CSV "\"${$komoku}\","}else{print CSV "${$komoku},"}
  }
 }close CSVL;


このメッセージへの返事:

165.76.90.74/59.pool2.yokohama.att.ne.jp