Message

Value MUST be part of code list 'Currency codes (ISO 4217)'.

Context
/ubl:Order/cbc:DocumentCurrencyCode
Test
(some $code in $clISO4217 satisfies $code = normalize-space(text()))
Code lists
Currency codes (ISO 4217)
Usage
/ ubl:Order / cbc:DocumentCurrencyCode