ufpc:ClassificationCode[?CCID] ,
[?ObjectID, :hasClassificationCode, ?CCID] ,
[?ObjectID, :objectName, ?objectName] ,
[?CCID, :codeName, ?Code] ,
[?CCID, :codeDescription, ?Description] ,
[?CCID, :belongsToList, ?List]
        :- ufrd:PRODCOM_LIST(?Code, ?Description, ?Parent, ?Level) ,

        [ufu:CurrentImport, :belongsToList, ?List],
        [ufu:CurrentImport, :useDataPrefix, ?DataPrefix],

        BIND(IRI(CONCAT(STR(?DataPrefix), "Object-", SHA256(?Code))) AS ?ObjectID) ,
        BIND(IRI(CONCAT(STR(?DataPrefix), "ClassificationCode-", SHA256(?Code))) AS ?CCID) ,
        BIND(CONCAT("PRODCOM Object from Code ", ?Code) AS ?objectName) .
# if ?Parent is not "absent"
[?ParentID, :objectComposedOf, ?ObjectID]
        :- ufrd:PRODCOM_LIST(?Code, ?Description, ?Parent, ?Level) ,

        [ufu:CurrentImport, :useDataPrefix, ?DataPrefix],

        BIND(IRI(CONCAT(STR(?DataPrefix), "Object-", SHA256(?Code))) AS ?ObjectID) ,
        BIND(IRI(CONCAT(STR(?DataPrefix), "Object-", SHA256(?Parent))) AS ?ParentID) .
