| | |
| | | //CC to DL 长春工厂到大连工厂 |
| | | iscctodl := ( originspid.StartsWith( '长春' ) or originspid.StartsWith( 'CC' ) ) and ( destinationspid.StartsWith( '大连' ) or destinationspid.StartsWith( 'DL' ) ); |
| | | //DL to CC 大连厂内库到大连发动机的长春外租库 |
| | | isdltocc := originspid.EndsWith( '厂内库' ) and ( originspid.StartsWith( '大连' ) or originspid.StartsWith( 'DL' ) ) and destinationspid = '大连发动机的长春外租库'; |
| | | isdltocc := ( originspid.StartsWith( '大连' ) or originspid.StartsWith( 'DL' ) ) and ( destinationspid.StartsWith( '长春' ) or destinationspid.StartsWith( 'CC' ) )//originspid.EndsWith( '厂内库' ) and ( originspid.StartsWith( '大连' ) or originspid.StartsWith( 'DL' ) ) and destinationspid = '大连发动机的长春外租库'; |
| | | if( iscctodl or isdltocc ){ |
| | | // info( '------iscctodl------', originspid, destinationspid, iscctodl ); |
| | | traverse( table, Column, column ){//, column.StartDate().Month() = 1 |