RDFUSER@orcl> !cat test_real_rdf_r2rml_nt_load.ctl UNRECOVERABLE LOAD DATA TRUNCATE into table r2rmlview_nt_staging_tab when (1) <> '#' ( RDF$STC_sub CHAR(4000) terminated by whitespace "( CASE WHEN substr(:RDF$STC_sub,1,1)='<' AND substr(:RDF$STC_sub,-1,1)='>' AND length(:RDF$STC_sub)>2 THEN :RDF$STC_sub WHEN substr(:RDF$STC_sub,1,2)='_:' AND REGEXP_LIKE(:RDF$STC_sub,'^(_:)[[:alpha:]][[:alnum:]]*$') THEN :RDF$STC_sub WHEN substr(:RDF$STC_sub,1,1) NOT IN ('\"','<','#') AND substr(:RDF$STC_sub,-1,1) NOT IN ('\"','>') THEN ('<' || SDO_RDF.replace_rdf_prefix(:RDF$STC_sub) || '>') WHEN substr(:RDF$STC_sub,1,1)='#' THEN SDO_RDF.raise_parse_error( 'Ignored Comment Line starting with ', :RDF$STC_sub) ELSE SDO_RDF.raise_parse_error('Invalid Subject', :RDF$STC_sub) END )", RDF$STC_pred CHAR(4000) terminated by whitespace "( CASE WHEN substr(:RDF$STC_pred,1,1)='<' AND substr(:RDF$STC_pred,-1,1)='>' AND length(:RDF$STC_pred)>2 THEN :RDF$STC_pred WHEN substr(:RDF$STC_pred,1,2) != '_:' AND substr(:RDF$STC_pred,1,1) NOT IN ('\"','<') AND substr(:RDF$STC_pred,-1,1) NOT IN ('\"','>') THEN ('<' || SDO_RDF.replace_rdf_prefix(:RDF$STC_pred) || '>') ELSE SDO_RDF.raise_parse_error('Invalid Predicate', :RDF$STC_pred) END )", -- -- right-trimming of WHITESPACEs is reqd for "RDF$STC_obj" -- (due to absence of "TERMINATED BY WHITESPACE") -- -- For ease of editing below replace -- "rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13))" with ":xy". -- and then replace back -- RDF$STC_obj CHAR(4000) "( CASE WHEN substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,1)='<' AND substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),-1,1)='>' AND length(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)))>2 THEN rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)) WHEN substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,1)='\"' AND substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),-1,1)='\"' AND length(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)))>1 THEN rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)) WHEN substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,2)='_:' AND REGEXP_LIKE(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)), '^(_:)[[:alpha:]][[:alnum:]]*$') THEN rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)) WHEN substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,1) NOT IN ('\"','<') AND substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),-1,1) NOT IN ('\"','>') THEN ('<' || SDO_RDF.replace_rdf_prefix( rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13))) || '>') WHEN substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,1)='\"' AND substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),-1,1) NOT IN ('\"','>') AND instr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),'\"\@',-1)>1 AND REGEXP_LIKE(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)), '^\"[[:print:]]*\"\@[[:alpha:]]+(-[[:alnum:]]+)*$') THEN rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)) WHEN (substr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),1,1)='\"' AND instr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),'\"^^',-1)>1 AND (length(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)))- (instr(rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13)),'\"^^',-1)+4) )>0) THEN SDO_RDF.pov_typed_literal( rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13))) ELSE SDO_RDF.raise_parse_error( 'Invalid Object', rtrim(:RDF$STC_obj,'. '||CHR(9)||CHR(10)||CHR(13))) END )" )
RDFUSER@orcl> exit
|
最近のコメント