sqlserver移植到oracle的问题

Question

DDLStr := 'begin ' +　DDLStr + '; end;'

Answer 1

DDLStr := 'Delete from QQUser Where MyQQNo='+LogoutQQNo+'';
  +' ;Delete from DenyList Where DenyValue='+LogoutQQNo+' and DenyType='+IntToStr(0)+''
  +' ;Delete from QQTime Where MyQQNo='+LogoutQQNo+''
 +' ;Delete from QQFriend Where MyQQNo='+LogoutQQNo+''
  +' ;Delete from QQRecord Where MyQQNo='+LogoutQQNo+''
 +' ;Delete from QQBBSList Where QQNo='+LogoutQQNo+'';
DDLStr := 'begin ' +　DDLStr + '; end;'