MyFirstUDRKit/test/testudrkit-tests.dml

53 lines
1.1 KiB
Plaintext

set stats on;
set bail off;
select * from test_div;
set stats off;
set bail on;
select FLAGGED (190, 0) from rdb$database;
select FLAGGED (191, 0) from rdb$database;
commit;
execute procedure load_blob(1);
execute procedure load_blob(2);
execute procedure load_blob(3);
execute procedure load_blob(4);
commit;
select cast ( description as varchar(16) ) as DESCRIPTION
, file_type
, cast (left(source_file,32) as varchar(32)) as source_file
, source_status
, cast (left(target_file,32) as varchar(32)) as target_file
, target_status
, target_bytes
from test_blobs;
commit;
set term ^;
shell
mkdir --verbose /tmp/testudrkit
ls /tmp/testudrkit
^
set term ;^
execute procedure save_blob(1, '/tmp/testudrkit/fb.conf' );
execute procedure save_blob(2, '/tmp/testudrkit/fb.log' );
commit;
select cast ( description as varchar(16) ) as DESCRIPTION
, file_type
, cast (left(source_file,32) as varchar(32)) as source_file
, source_status
, cast (left(target_file,32) as varchar(32)) as target_file
, target_status
, cast (target_bytes as varchar(16) ) as target_bytes
from test_blobs;
commit;