修复一些bug

xiaoding721

2024-11-06 28b868d1b4ce9f1488b14ed7735ad46b247dcfe0

 _Main/BL/Type_LocalColumn/Function_CalcWeekDate.qbl

@@ -11,10 +11,16 @@
      stringDate := date.Format( "Y/M2/D2");
      perSuffx := ifexpr( this.CustomDate().Week() < 10,"0"+[String]this.CustomDate().Week(),[String]this.CustomDate().Week() );
      value := "KW" + perSuffx + " - " + stringDate;
    }else if( this.TimeUnit() = "Month" ){
      us_locale := Locale::Construct( 'en_us' );
      
      date := this.CustomDate();
      stringDate := date.Format( "Y: MM / M" + "月" ,us_locale )
      value := stringDate;
    }else{
      value := this.CustomDate().Format( "Y/M2/D2" );
    }
    
    this.WeekDate( value );
    this.DisplayDate( value );
  *]
}