|
var !ftubs coll all ftub for CE
do !y index !ftubs
$!ftubs[$!y]
!spre = SPREF of $!ftubs[$!y]
--q var !spre
if mat(!spre.string() ,'=17045/31859') gt 0 then
SPRE /SPRE-FBL355-07
elseif mat(!spre.string() ,'=17045/31871') gt 0 then
SPRE /SPRE-FBL555-07
elseif mat(!spre.string() ,'=17045/31827') gt 0 then
SPRE /SPRE-SFL30-10
elseif mat(!spre.string() ,'=17045/31845') gt 0 then
SPRE /SPRE-FBL330-05
elseif mat(!spre.string() ,'=17045/31861') gt 0 then
SPRE /SPRE-FBL530-07
elseif mat(!spre.string() ,'=17045/31847') gt 0 then
SPRE /SPRE-FBL330-07
elseif mat(!spre.string() ,'=17045/31825') gt 0 then
SPRE /SPRE-SFL30-07
elseif mat(!spre.string() ,'=17045/31843') gt 0 then
SPRE /SPRE-SFL50-13
elseif mat(!spre.string() ,'=17045/31831') gt 0 then
SPRE /SPRE-SFL30-13
elseif mat(!spre.string() ,'=17045/31855') gt 0 then
SPRE /SPRE-FBL355-05
elseif mat(!spre.string() ,'=17045/31839') gt 0 then
SPRE /SPRE-SFL50-07
elseif mat(!spre.string() ,'=17045/31873') gt 0 then
SPRE /SPRE-FBL555-10
elseif mat(!spre.string() ,'=17045/31841') gt 0 then
SPRE /SPRE-SFL50-10
elseif mat(!spre.string() ,'=17045/31877') gt 0 then
SPRE /SPRE-FBL555-13
elseif mat(!spre.string() ,'=17045/31829') gt 0 then
SPRE /SPRE-SFL30-15
elseif mat(!spre.string() ,'=17045/31851') gt 0 then
SPRE /SPRE-FBL330-13
elseif mat(!spre.string() ,'=17045/31887') gt 0 then
SPRE /SPRE-FBL355-13
elseif mat(!spre.string() ,'=17045/31849') gt 0 then
SPRE /SPRE-FBL330-10
elseif mat(!spre.string() ,'=17045/34241') gt 0 then
SPRE /SPRE-AP1-50
endif
enddo
|
|