'---------------------------------------------------------------------
'SCRIPT:    avu-DocList
'PROJECT:   gavos.apr, avcsus 
'DATE:      02-15-96
'AUTHOR:    John Ganter, Sandia National Labs, jganter@sandia.gov
'DESC:      prepares a List object of Docs that are active in the
'DESC2:     Project window 
'CALLED BY: typically a -Caller script
'CALL AS:   av.Run("avu-DocList","doctype") 
'ARG01:     document type: Script, View, etc.
'RETURNS:   List object
'EXPECTS:   docs(s) to be selected in the Project Window
'CALLS TO:  nothing
''''2----------------------------------------------------------------

'get the arguments
  strClassName = SELF
  
' get the docs that are currently selected. Check to make sure there
' is at least one, and that it is of the class desired

  listSelected = av.GetProject.GetActive
  numSelected = listSelected.Count
  if ( (numSelected < 1) or ( listSelected.Get(0).GetClass.GetClassName <> strClassName) ) then
    MsgBox.Error("Sorry, you must select one or more" ++ strClassName ++ "in the Project window","avu-PrintWrapper error") 
    exit
  end
  
Return listSelected