SELE 1
Use d:\gycw\xs\xs_ substitution table.
Count to DDD
SELE 2
Use d:\gycw\xs\xs_ZD_ product model.
ZZ= 1
Doing ZZ & lt=DDD
SELE 1
Go to ZZ
TTT = SUBSTR (product model, 1, 12)
SELE 2
Specification positioning = TTT
BA 1= product model
SELE 1
Come on ZZ
The model of REPL product is BA 1
ZZ = ZZ+ 1
Endor
SELE 1
use
SELE 2
use
return