 					"value => '" (filter-type-operator filter-type) " (" table-names ")', "
 					"object_type => 'TABLE'"
 					");")))
-	([ctx schemas]
+	([schemas]
 		;; if we come here, we have the guarantee of a single schema mode. see validate.
 	 (let [filter-types [:include-tables :exclude-tables]
 				 tables ((apply juxt filter-types) (get schemas (-> schemas keys first)))
-				 tables (map #(when (not (nil? %2)) (render-table-metadatafile ctx %1 %2)) filter-types tables)
+				 tables (map #(when (not (nil? %2)) (render-table-metadatafile %1 %2)) filter-types tables)
 				 tables (filter (comp not nil?) tables)]
 		 (str/join "\n" tables))))
 
-(defn render-subquery-datafilter [ctx schema-name table-name subquery]
+(defn render-subquery-datafilter [schema-name table-name subquery]
 	(str "dbms_datapump.data_filter("
 			 "handle => handle, "
 			 "name => 'SUBQUERY', "

		:log-file "dbms_datapump.KU$_FILE_TYPE_LOG_FILE"
		:dump-file "dbms_datapump.KU$_FILE_TYPE_DUMP_FILE"))

(defn render-add-file [ctx directory file-type file-basename]
	(str "dbms_datapump.add_file("
			 "handle => handle, "
			 "filename => '" (str file-basename (file-type-suffix file-type)) "', "


	(println (render-exp-script input))

	(render-subqueries-datafilter "PERGO" {
																				 "BOOKING_SETTER" "WHERE POINT_OF_SALE in ('2001', '200')"
																				 "BOOKING_DELTA"  "WHERE Pth = 231"
																				 })

	(render-schema-metadatafilter (:schemas input)))
