| | |
|---|
| | | originisdl := originsp.ID() = dlunit or originunit.ID() = dlunit or exists( originparentunits, Elements, punit, punit.ID() = dlunit ); |
|---|
| | | //目的地是否是长春外租库 |
|---|
| | | destisp := selectobject( owner, StockingPoint_MP, sp, sp.ID() = tprow.TargetStockpoingPointID() ); |
|---|
| | | destiunit := originsp.Unit(); |
|---|
| | | destiunit := destisp.Unit(); |
|---|
| | | destiparentunits := destiunit.GetAllParent(); |
|---|
| | | destiiscc := destisp.ID() = ccunit or destiunit.ID() = ccunit or exists( destiparentunits, Elements, punit, punit.ID() = ccunit ); |
|---|
| | | destiisdl := destisp.ID() = dlunit or destiunit.ID() = dlunit or exists( destiparentunits, Elements, punit, punit.ID() = dlunit ); |
|---|
| | | if( ( originiscc and destiisdl ) or ( originisdl and destiiscc ) ){ |
|---|
| | | row := selectobject( table, Row, row, row.Name() = tprow.Name() ); |
|---|
| | | traverse( tprow, TransferPlanCell, tpcell ){ |
|---|
| | | traverse( tprow, TransferPlanCell, tpcell, tpcell.TransferPlanColumn().ColumnDate() <> Date::MinDate() ){ |
|---|
| | | //天 |
|---|
| | | daycolumn := table.GetColumnByUnit( Translations::MP_GlobalParameters_Day(), tpcell.TransferPlanColumn().ColumnDate() ); |
|---|
| | | //周 |
|---|
