EXPORT a QMF QUERY or PROC from the database

1 EXPort
2 QUERY
2 PROC
3 objectname  To  filename
4!objecttype (1)  A
4?
4 filetype
4.1! A
4 filetype fm
4?  (
4.1? 
4.1 CONfirm
4.1.1! =
4.1.2! profile (2) 
4.1.2 Yes
4.1.2 No
4.1.3? )