class AIA_RESPONSE_ENUM
Instant Access response codes with corresponding names accessible as message. Accessible via {AIA_SHARED_ENUMERATIONS}.Response_enum. See also class AIA_PURCHASE_REQUEST.
note
description: "[
Instant Access response codes with corresponding names accessible as `message'.
Accessible via ${AIA_SHARED_ENUMERATIONS}.Response_enum.
See also class ${AIA_PURCHASE_REQUEST}.
]"
author: "Finnian Reilly"
copyright: "Copyright (c) 2001-2022 Finnian Reilly"
contact: "finnian at eiffel hyphen loop dot com"
license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
date: "2024-08-28 6:41:12 GMT (Wednesday 28th August 2024)"
revision: "14"
class
AIA_RESPONSE_ENUM
inherit
EL_ENUMERATION_NATURAL_8
rename
description_table as No_descriptions,
foreign_naming as snake_case_upper
end
create
make
feature -- Access
fail_account_invalid: NATURAL_8
fail_invalid_purchase_token: NATURAL_8
fail_other: NATURAL_8
fail_user_invalid: NATURAL_8
fail_user_not_eligible: NATURAL_8
ok: NATURAL_8
feature {NONE} -- Implementation
snake_case_upper: EL_NAME_TRANSLATER
do
Result := snake_case_translater ({EL_CASE}.Upper)
end
end