ODBC+ABC
Добавлено: 09 Июль 2020, 15:16
Так и делаю.gopstop2007 писал(а): ↑09 Июль 2020, 12:29 r_sql = 'Delete FROM myFile WHERE id=5 ;'
myFilel{PROP:SQL} = r_sql
IF ERRORCODE()
Message('Удаление: '& FILEERROR() &': '& ERROR())
!ROLLBACK
myFilel{PROP:SQL} = 'ROLLBACK'
END
myFilel{PROP:SQL} = 'COMMIT'
!COMMIT