-- type creation
/*
create or replace type tp_r_ug_sportsman_invitation_result is object
(
    code              number(18),
    sportsman_name    varchar2(100),
    mobile_phone      varchar2(20),
    err_code          number,
    err_text          varchar2(4000)
);
create or replace type tp_t_ug_sportsman_invitation_result is table of tp_r_ug_sportsman_invitation_result;
*/

declare
    --records to compare
    --record 1
    v_sportsman_invitation_result  tp_t_ug_sportsman_invitation_result := tp_t_ug_sportsman_invitation_result
    (
        tp_r_ug_sportsman_invitation_result
        (
            code            => 1,
            sportsman_name  => 'sportsman_1',
            mobile_phone    => '79666666666',
            err_code        => 1,
            err_text        => null
        )
    );

    --record 2
    v_sportsman_invitation_exp  tp_t_ug_sportsman_invitation_result := tp_t_ug_sportsman_invitation_result
    (
        tp_r_ug_sportsman_invitation_result
        (
            code            => 1,
            sportsman_name  => 'sportsman_1',
            mobile_phone    => '79666666666',
            err_code        => 1,
            err_text        => null
        )
    );
begin
    --check rows in collections
    utp.ut.expect(v_sportsman_invitation_result.count, 'count collection')
          .to_equal(v_sportsman_invitation_exp.count);

    if v_sportsman_invitation_result.count = v_sportsman_invitation_exp.count then

        for i in 1..v_sportsman_invitation_result.count
        loop
            --check values of each part of a record
            utp.ut.expect(v_sportsman_invitation_result(i).sportsman_name, 'sportsman_name(' || i || ')')
                .to_equal(v_sportsman_invitation_exp(i).sportsman_name);
            utp.ut.expect(v_sportsman_invitation_result(i).mobile_phone, 'mobile_phone(' || i || ')')
                .to_equal(v_sportsman_invitation_exp(i).mobile_phone);
            utp.ut.expect(v_sportsman_invitation_result(i).err_code, 'err_code(' || i || ')')
                .to_equal(v_sportsman_invitation_exp(i).err_code);
        end loop;

        --compare 2 collections, here we get the exception
	utp.ut.expect(anydata.convertCollection(v_sportsman_invitation_result), 'Collections equal')
              .to_equal(anydata.convertCollection(v_sportsman_invitation_exp));

    end if;
end;