cat > script <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
create table xx
	(number1 shortinteger,
	number2 shortinteger not null,
	description char(5,1),
	date date(3),
	dollar dollar(4,1) not null);
select tab_name, attr_name, attr_dtname from sys_attrs, sys_tables
	where sys_tables.tab_name = 'xx'
	and sys_tables.tab_number = sys_attrs.attr_tabnum
	group by sys_tables.tab_name order by 1;
create xx;
drop table xx;
drop xx;
create sample set product char (10) not null, amount dollar (3);
select tab_name, attr_name, attr_dtname from sys_attrs, sys_tables
	where sys_tables.tab_name = 'sample'
	and sys_tables.tab_number = sys_attrs.attr_tabnum
	group by sys_tables.tab_name order by 1;
insert into sample set to 'wambats', 3.57;
insert into sample set amount to 0;
select from sample;
drop sample;
create fiddle (function1 char(3, 2), when_date date (8) not null);
create table wrong set not_nul integer null;
create table wrong set (not_nul integer not null);
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 755 script
cat > stdout <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
* . . . . . * . . . tab_name                          attr_name                         attr_dtname

xx                                number1                           smallint
                                  number2                           smallint
                                  description                       character
                                  date                              date
                                  dollar                            dollar
* 
*** Error: table 'xx' already exists
* * 
*** Error: table 'xx' does not exist
* * . . . tab_name                          attr_name                         attr_dtname

sample                            product                           character
                                  amount                            dollar
* * 
*** Error: not-null attribute 'product' is not included in attribute list
* product       amount

wambats        $3.57
* * * * *** Syntax Error: expecting an attribute name
Error detected near the end of:
create table wrong set (
* 
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 stdout
cat > tag <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
Test for "create TABLE" and "drop TABLE" commands
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 tag
cat > stdout.jp_euc <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
* . . . . . * . . . tab_name                          attr_name                         attr_dtname

xx                                number1                           smallint
                                  number2                           smallint
                                  description                       character
                                  date                              date
                                  dollar                            dollar
* 
*** Error: ơ֥ 'xx' ϴ¸ߤޤ
* * 
*** Error: ơ֥ 'xx' ¸ߤޤ
* * . . . tab_name                          attr_name                         attr_dtname

sample                            product                           character
                                  amount                            dollar
* * 
*** Error: ȥӥ塼ȥꥹȤˡNOT-NULL ȥӥ塼 'product' ϴޤޤƤޤ
* product       amount

wambats        $3.57
* * * * *** Syntax Error: ȥӥ塼Ȥλ꤬ɬפǤ
顼ζ᤯ǵƤޤ:
create table wrong set (
* 
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 stdout.jp_euc
