'----------------------------------------------------------------
'SCRIPT:    avu-ScriptSaverCaller
'PROJECT:   gavos.apr, avcsus 
'DATE:      02-16-96
'AUTHOR:    John Ganter, Sandia National Labs, jganter@sandia.gov
'DESC:      gets Scripts and save dir, and calls avu-ScriptSaver
'DESC2:
'CALLED BY: Project/ScriptSaver button
'CALL AS:    
'ARG01:      
'RETURNS:
'EXPECTS:        
'CALLS TO:  avu-DirectoryGet, avu-DocList
''''2----------------------------------------------------------------

'get the selected Script documents
  listScripts = av.Run("avu-DocList","Script")

'get the destination directory  
   strDirStart = "c:\a\gavos"
   strDirSave = av.Run("avu-DirectoryGet", strDirStart)

'call the saver 
   dicParam = Dictionary.Make(3)
   dicParam.Add("strDirSave", strDirSave)             
   dicParam.Add("listScripts", listScripts)
   av.Run("avu-ScriptSaver", dicParam)