The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
template: info-contact.tt

vars:
  contact_id: not-found-id
  pw:

input_assertions:
  class: SRS::EPP::Command::Info::Contact

SRS:
  - assertions:
      count:
        - [ '//HandleIdFilter', 1, 'SRS: Check for only one HandleIdFilter' ]
      match:
        - [ '//HandleIdFilter', 'not-found-id', 'SRS: Check the first HandleIdFilter' ]
      match_all:
      attr_is:

    fake_response: |-
      <NZSRSResponse VerMajor="5" VerMinor="0">
        <Response Action="HandleDetailsQry" FeId="8" FeSeq="4717426" OrigRegistrarId="1" RecipientRegistrarId="1" Rows="1">
          <FeTimeStamp Day="17" Hour="12" Minute="39" Month="6" Second="44" TimeZoneOffset="+12:00" Year="2010"/>
        </Response>
      </NZSRSResponse>

# <epp xmlns="urn:ietf:params:xml:ns:epp-1.0">
#   <response>
#     <result code="2307">
#       <msg lang="en">Unimplemented object service</msg>
#     </result>
#     <trID>
#       <clTRID>brause</clTRID>
#       <svTRID>sep.4c1ed6ef.0262.001</svTRID>
#     </trID>
#   </response>
# </epp>

output_assertions:
  count:
    - [ '//epp:resData', 0, 'EPP: No resData in the response' ]
  match:
  match_all:
  attr_is:
    - [ '//epp:result', 'code', 2303, 'EPP: Failure = Object does not exist' ]