PML语言学习之分批数据库整理

漂流瓶537

var !all coll all db
!merge = ARRAY()
do !x index !all
        !id = projid of $!all[$!x]

        !name = name of $!all[$!x]
       
        !numbdb = numbdb of $!all[$!x]
  if !id.Size() eq 0 and !numbdb.real() gt 10000  then
          $p $!name
          !merge.append('MERGE CHANGES ' & !name.replace('/*', ''))
  endif
enddo

do !x index !merge
        $!merge[$!x]
  handle any
  endhandle
enddo

来自安卓APP客户端

afei

学习中..................