(in-package :examples)
(use-package  :oli)
(UI::UIC-CD-HOME)

(sd-defdialog 'pkg-export_V19
  :dialog-title "PKG-Exp.19"
  :toolbox-button t
  :variables
  '((name :value-type :string
    :title "Filename"
    :prompt-text "Bitte Dateinamen eingeben."
    )
  )

  :ok-action
  '(progn
  (oli::BIN-IO-REVISION :MR-19-RELEASE)
  (save_package
  :all_at_top
  :FILENAME (FORMAT NIL "~A.pkg" name)
  (display (format nil "Das File unter der OSDM-Version 19 als ~A.pkg gespeichert." name))
  )
  )
)