| | |
|---|
| | | traverse ( u, Lane.LaneLeg.Trip, t ) { |
|---|
| | | traverse ( t, ProductInTrip, pit, pit.Quantity() > 0.0 ) { |
|---|
| | | // 找行 |
|---|
| | | tpr := TransferPlanRow::FindTransferPlanRowTypeIndex( t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP().Name(), |
|---|
| | | t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP().Name(), |
|---|
| | | tpr := TransferPlanRow::FindTransferPlanRowTypeIndex( TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | pit.Product_MP().ID() ); |
|---|
| | | if ( isnull( tpr ) ) { |
|---|
| | | tpr := macroPlan.TransferPlanRow( relnew, |
|---|
| | | RowNr := rowNr, |
|---|
| | | SourceStockpoingPointID := t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP().Name(), |
|---|
| | | TargetStockpoingPointID := t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP().Name(), |
|---|
| | | SourceStockpoingPointID := TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsOriginStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | TargetStockpoingPointID := TransferPlanRow::IdentifyTheFactory( t.LaneLeg().AsDestinationStockingPointLeg().StockingPoint_MP() ), |
|---|
| | | ProductID := pit.Product_MP().ID() ); |
|---|
| | | } |
|---|
| | | |
|---|
