漂流瓶537 发表于 2024-3-2 10:01

PML语言学习之批量修改规格书

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
页: [1]
查看完整版本: PML语言学习之批量修改规格书