lazhen
2024-09-03 94861b664bc8ed851c047a013d3be239ea0c46dc
换型设置导入数量不是整数
已修改6个文件
已添加1个文件
已删除1个文件
38 ■■■■ 文件已修改
_Main/BL/EDI/Broker_MP_ExportChangeLossSettingsBroker.qbl 6 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/EDI/Broker_MP_ImportChangeLossSettingsBroker.qbl 6 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_ChangeLossSettingExcel/Attribute_ChangeLossNr.qbl 8 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_ChangeLossSettingExcel/Attribute_ChangeLossNumber.qbl 8 ●●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_CheckImport.qbl 4 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl 2 ●●● 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_Import.qbl 4 ●●●● 补丁 | 查看 | 原始文档 | blame | 历史
_var/_Main/Data/MP_ChangeoverLossSetting.xlsx 补丁 | 查看 | 原始文档 | blame | 历史
_Main/BL/EDI/Broker_MP_ExportChangeLossSettingsBroker.qbl
@@ -10,7 +10,7 @@
    EDIMLTable ChangeLossSettingExcel
    {
      TargetType: ChangeLossSettingExcel
      EDIMLColumn ChangeLossNr { Attribute: ChangeLossNr ValueType: Number }
      EDIMLColumn ChangeLossNumber { Attribute: ChangeLossNumber ValueType: String }
      EDIMLColumn Product1 { Attribute: Product1 ValueType: String }
      EDIMLColumn Product2 { Attribute: Product2 ValueType: String }
      EDIMLColumn Unit { Attribute: Unit ValueType: String }
@@ -22,7 +22,7 @@
    {
      InputTable: ChangeLossSettingExcel
      OutputTable: ChangeoverLossSetting
      EDIColumnMatch { InputColumn: ChangeLossNr OutputColumn: ChangeLossNr }
      EDIColumnMatch { InputColumn: ChangeLossNumber OutputColumn: ChangeLossNumber }
      EDIColumnMatch { InputColumn: Product1 OutputColumn: Product1 }
      EDIColumnMatch { InputColumn: Product2 OutputColumn: Product2 }
      EDIColumnMatch { InputColumn: Unit OutputColumn: Unit }
@@ -35,10 +35,10 @@
    {
      Columns:
      [
        EDIXLSLinkColumn ChangeLossNr { ValueType: Number }
        EDIXLSLinkColumn Product1 { ValueType: String }
        EDIXLSLinkColumn Product2 { ValueType: String }
        EDIXLSLinkColumn Unit { ValueType: String }
        EDIXLSLinkColumn ChangeLossNumber { ValueType: String }
      ]
    }
  }
_Main/BL/EDI/Broker_MP_ImportChangeLossSettingsBroker.qbl
@@ -14,7 +14,7 @@
      PrimaryKeyColumns: Unit
      TargetType: ChangeLossSettingExcel
      TypeIndex: ChangeLossSettingTypeIndex
      EDIMLColumn ChangeLossNr { Attribute: ChangeLossNr ValueType: Number }
      EDIMLColumn ChangeLossNumber { Attribute: ChangeLossNumber ValueType: String }
      EDIMLColumn Product1 { Attribute: Product1 ValueType: String }
      EDIMLColumn Product2 { Attribute: Product2 ValueType: String }
      EDIMLColumn Unit { Attribute: Unit ValueType: String }
@@ -26,7 +26,7 @@
    {
      InputTable: ChangeoverLossSetting
      OutputTable: ChangeLossSettingExcel
      EDIColumnMatch { InputColumn: ChangeLossNr OutputColumn: ChangeLossNr }
      EDIColumnMatch { InputColumn: ChangeLossNumber OutputColumn: ChangeLossNumber }
      EDIColumnMatch { InputColumn: Product1 OutputColumn: Product1 }
      EDIColumnMatch { InputColumn: Product2 OutputColumn: Product2 }
      EDIColumnMatch { InputColumn: Unit OutputColumn: Unit }
@@ -39,10 +39,10 @@
    {
      Columns:
      [
        EDIXLSLinkColumn ChangeLossNr { ValueType: Number }
        EDIXLSLinkColumn Product1 { ValueType: String }
        EDIXLSLinkColumn Product2 { ValueType: String }
        EDIXLSLinkColumn Unit { ValueType: String }
        EDIXLSLinkColumn ChangeLossNumber { ValueType: String }
      ]
    }
  }
_Main/BL/Type_ChangeLossSettingExcel/Attribute_ChangeLossNr.qbl
ÎļþÒÑɾ³ý
_Main/BL/Type_ChangeLossSettingExcel/Attribute_ChangeLossNumber.qbl
¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,8 @@
Quintiq file version 2.0
#parent: #root
Attribute ChangeLossNumber
{
  #keys: '3[415136.0.1105920061][415136.0.1105920060][415136.0.1105920062]'
  Description: '换型损失(台)'
  ValueType: String
}
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_CheckImport.qbl
@@ -10,11 +10,11 @@
    if( exists( macroplan, ChangeLossSettingExcel, excel, excel.Product1() = '' 
                or excel.Product2() = '' 
                or excel.Unit() = '' 
                or excel.ChangeLossNr() = 0 ) ){
                or excel.ChangeLossNumber() = '' ) ){
      error( Translations::MP_ChangeLossSettingExcel_Import_NullInputRequiredField() );
    }
    //导入的数量小于0
    if( exists( macroplan, ChangeLossSettingExcel, excel, excel.ChangeLossNr() < 0 ) ){
    if( exists( macroplan, ChangeLossSettingExcel, excel, [Real]excel.ChangeLossNumber() > 0 and ceil( [Real]excel.ChangeLossNumber() ) <> floor( [Real]excel.ChangeLossNumber() ) ) ){
      error( Translations::MP_ChangeLossSettingExcel_Import_PositiveInteger() );
    }
    //导入产品是否存在
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_ExportTemplate.qbl
@@ -9,7 +9,7 @@
  [*
    // ç”„兰鸽 Aug-22-2024 (created)
    traverse( macroplan, ChangeLossSetting, cls ){
      macroplan.ChangeLossSettingExcel( relnew, Product1 := cls.ProductFirst().ID(), Product2 := cls.ProductSecond().ID(), Unit := cls.Unit().ID(), ChangeLossNr := cls.ChangeLossNr() );
      macroplan.ChangeLossSettingExcel( relnew, Product1 := cls.ProductFirst().ID(), Product2 := cls.ProductSecond().ID(), Unit := cls.Unit().ID(), ChangeLossNumber := [String]cls.ChangeLossNr() );
    }
    value := macroplan.MP_ExportChangeLossSettingsBroker().ExecuteToXLS( isxlsxformat ).AsBinaryValue();
    macroplan.ChangeLossSettingExcel( relflush );
_Main/BL/Type_ChangeLossSettingExcel/StaticMethod_Import.qbl
@@ -26,7 +26,7 @@
                                          and cls.ProductSecond().ID() = excel.Product2()
                                          and cls.Unit().ID() = excel.Unit() );
      if( isnull( cls ) ){
        cls             := macroplan.ChangeLossSetting( relnew, ChangeLossNr := excel.ChangeLossNr() );
        cls             := macroplan.ChangeLossSetting( relnew, ChangeLossNr := [Number]excel.ChangeLossNumber() );
        product1        := selectobject( macroplan, Product_MP, product, product.ID() = excel.Product1() );
        product2        := selectobject( macroplan, Product_MP, product, product.ID() = excel.Product2() );
        unit            := selectobject( macroplan, Unit, unit, unit.ID() = excel.Unit() );
@@ -34,7 +34,7 @@
        cls.ProductSecond( relset, product2 );
        cls.Unit( relset, unit );
      }else {
        cls.ChangeLossNr( excel.ChangeLossNr() );
        cls.ChangeLossNr( [Number]excel.ChangeLossNumber() );
      }
      excel.Delete();
    }
_var/_Main/Data/MP_ChangeoverLossSetting.xlsx
Binary files differ