ГОСТ Р ИСО/МЭК 8824-2-2001
ПРИЛОЖЕНИЕ D
(справочное)
11римеры
AD.
D.1 Пример нсполыования упрошенного класса OPERATION
CDD
Применим следующее упрощенное определение классов информационных объектов OPERATION н
OPERATION :: = CLASS
{
&Argument Гурт OPI IONAL,
&ResuHTvpc OPTIONAL,
&Errors ERROR OPTIONAL,
&Linked OPERATION OPTIONAL.
&rcsultRctumed BOOLEAN DEFAULT TRUE.
&operationOodc INTEGER UNIQUE
}
WITH SYNTAX
{
IARGUMENT &AigumentType|
1RESULT&ResullTypcJ
IRETURN RESULT &rcsultRctumed|
|ERRORS&Errorel
ILINKED&Linked|
CODE&орт nationCodc
}
ERROR : : - CLASS
I
&ParamctcrTvpc OPTIONAL
«SiciTorCodc INTEGER UNIQUE
1
WITH SYNTAX
)
|PARAMETER &ParamctcrTypc|
CODE «SterroiCodc
}
Можно определить следующее множсспю объектов, которое содержит два объекта OPERATION:
Му-Ореrations OPERATION : : = (opcrationA | operationB}
opcrutionA OPERATION : : ” (
ARGUMENT INTEGER
ERRORS {{PARAMETER INTEGER CODE 1000} | {CODE 1001}}
CODE I
)
operationB OPERATION : : = {
ARGUMETN lASString
RESULTBOOLEAN
ERRORS{{CODE 1002} | (PARAMETER IA5String CODE 1003}}
CODE2
)
Извлечение множестваобъектов ERROR изприведенною выше множестваобъектов проводят следующим
образом:
My-OperalionEriors ERROR :: = {My-Opcraliom.&Errors}
Результирующее множество объектов есть:
Mv-OperationErron» ERROR : : =• {
( PARAMETER INTEGER CODE 1000} |
{ CODE 1001} |
( CODE 1002} |
{ PARAMETER lASString CODE 1003}
Извлечение множества кодов ошибок операций проводят следующим образом:
My-OperationErrorCodes INTEGER : : ™{My-Operjtions.&Errors.&crrorC’cxle}
22