SQLPF1A0ZBvqSXKINULLID  0
INCLUDE SQLCA
BEGIN DECLARE SECTION
END  DECLARE SECTION
PREPARE DELETETBL FROM :sqlui_del_string
EXECUTE IMMEDIATE :sqlui_lock_table
EXECUTE IMMEDIATE :sqlui_lock_table
EXECUTE IMMEDIATE :sqlui_lock_table
PREPARE SELNAME  INTO :sqlda  FROM :sqlui_xx
PREPARE selname INTO :sqlda  FROM :sqlui_xx
EXECUTE IMMEDIATE :sqlui_del_string
PREPARE insname FROM :sqlui_xx
EXECUTE insname USING DESCRIPTOR :sqlda 
PREPARE insname FROM :sqlui_xx
EXECUTE insname USING DESCRIPTOR :sqlda 
COMMIT
ROLLBACK
sqlui_xx
deletetable
sqlui_del_string
sqlui_lock_table