| | |
| | | Description: '连续生产,移动两个周期任务' |
| | | TextBody: |
| | | [* |
| | | // vwedadmin Oct-22-2024 (created) |
| | | debuginfo( "需要填充的日期:", fillUPTB.StartDate().Format( "Y-M2-D2" ), " 目标被取数日期:", targetUPTB.StartDate().Format( "Y-M2-D2" ) ); |
| | | |
| | | // 判断可用产能是否一致 |
| | | if ( fillUPTB.BaseAvailableCapacity().HoursAsReal() = targetUPTB.BaseAvailableCapacity().HoursAsReal() ) { |
| | | traverse ( targetUPTB, PeriodTaskOperation, pto ) { |
| | | PeriodTaskOperation::Create( pto.Operation(), fillUPTB, pto.Quantity(), false ); |
| | | } |
| | | |
| | | PeriodTaskOperation::Delete( selectset( targetUPTB, PeriodTaskOperation, tempPTO, true ) ); |
| | | } |
| | | |
| | | Transaction::Transaction().Propagate(); |
| | | *] |
| | | } |