From dfa7a011f47399b1a083d020d9460f6801c9c98c Mon Sep 17 00:00:00 2001 From: hongji.li <hongji.a.li@capgemini.com> Date: 星期三, 01 十一月 2023 15:25:05 +0800 Subject: [PATCH] pegging结果分析优化 --- _Main/BL/Type_PeggingResult/StaticMethod_SetAllChildRelation.qbl | 5 ++--- 1 files changed, 2 insertions(+), 3 deletions(-) diff --git a/_Main/BL/Type_PeggingResult/StaticMethod_SetAllChildRelation.qbl b/_Main/BL/Type_PeggingResult/StaticMethod_SetAllChildRelation.qbl index 95fa4b3..caee0aa 100644 --- a/_Main/BL/Type_PeggingResult/StaticMethod_SetAllChildRelation.qbl +++ b/_Main/BL/Type_PeggingResult/StaticMethod_SetAllChildRelation.qbl @@ -8,9 +8,8 @@ { TextBody: [* - if ( isnull( parentPeggingResult ) and isnull( childPeggingResult ) ) { - parentPeggingResult := select( peggingProductInSalesDemandBase, PeggingResult, tempPR, tempPR.NumberOfPlies() = 0 ); - childPeggingResult := select( peggingProductInSalesDemandBase, PeggingResult, tempPR, tempPR.NumberOfPlies() = 0 ); + if ( childPeggingResult.Child( relsize ) = 0 ) { + childPeggingResult.AllParent( relset, parentPeggingResult ); } traverse ( childPeggingResult, Child, pr ) { -- Gitblit v1.9.3