 
 	(println (render-exp-script input))
 
-	(render-subqueries-datafilter nil "PERGO" {
-																						 "BOOKING_SETTER" "WHERE POINT_OF_SALE in ('2001', '200')"
-																						 "BOOKING_DELTA"  "WHERE Pth = 231"
-																						 })
+	(render-subqueries-datafilter "PERGO" {
+																				 "BOOKING_SETTER" "WHERE POINT_OF_SALE in ('2001', '200')"
+																				 "BOOKING_DELTA"  "WHERE Pth = 231"
+																				 })
 
-	(render-schema-metadatafilter nil (:schemas input)))
+	(render-schema-metadatafilter (:schemas input)))

							 "begin"
							 (str "handle := dbms_datapump.open('EXPORT', 'SCHEMA'"
										(if (nil? remote-link) "" (str ", remote_link => " (single-quote remote-link))) ");")
							 (render-add-file ctx directory :dump-file file-basename)
							 (render-add-file ctx directory :log-file (str file-basename "_exp"))
							 ])))

(defn validate [exp-data]

(s/defn render-exp-script
	([exp-data :- ExpData]
		(validate exp-data)
		(str/join "\n"
							[(render-header exp-data)
							 (render-schemas exp-data)
							 (c/render-footer)]))
	([file exp-data :- ExpData]
		(let [script (render-exp-script exp-data)]
			(spit file script))))
