|  |  |  | 
|---|
|  |  |  | //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 | 
|---|