...
ERROR(Text004,TABLECAPTION,"Line No.");
TaxonomyNode := TaxonomyDocument.documentElement;
IF NOT TaxonomyNode.hasChildNodes THEN
ERROR(Text005,TABLECAPTION,"Line No.");
targetNamespace := GetAttribute('targetNamespace',TaxonomyNode);
"xmlns:xbrli" := GetAttribute('xmlns:xbrli',TaxonomyNode);
IF "xmlns:xbrli" = '' THEN
"xmlns:xbrli" := GetAttribute('xmlns:xbrl',TaxonomyNode);
...
...
ERROR(Text004,TABLECAPTION,"Line No.");
TaxonomyNode := TaxonomyDocument.documentElement;
IF NOT TaxonomyNode.hasChildNodes THEN
ERROR(Text005,TABLECAPTION,"Line No.");
// Add the following lines.
i := STRPOS(TaxonomyNode.nodeName,':');
IF i > 1 THEN
DocumentPrefix := COPYSTR(TaxonomyNode.nodeName,1,i);
// End of the lines.
targetNamespace := GetAttribute('targetNamespace',TaxonomyNode);
"xmlns:xbrli" := GetAttribute('xmlns:xbrli',TaxonomyNode);
IF "xmlns:xbrli" = '' THEN
"xmlns:xbrli" := GetAttribute('xmlns:xbrl',TaxonomyNode);
...