ada_qualified_type_spec

ada_qualified_type_spec 
      ::= 
      "sql_standard.char" [ "character" "set" 
      [ "is" ] char_set_spec ] 
      "(" "1" double_period length ")" 
      | "sql_standard.bit" 
      "(" "1" double_period length ")" 
      | "sql_standard.smallint" 
      | "sql_standard.int" 
      | "sql_standard.real" 
      | "sql_standard.double_precision" 
      | "sql_standard.sqlcode_type" 
      | "sql_standard.sqlstate_type" 
      | "sql_standard.indicator_type" 

This rule is called by

-> ada_type_spec