Credit note type code MUST be set according to the profile.
cbc:CreditNoteTypeCode
$profile != '01' or (some $code in tokenize('381 396 81 83 532', '\s') satisfies normalize-space(text()) = $code)