function WikiShForms {

   wikish_form quickform process source=WikiSh.WikiShForms-GroupRC
   if test -n ${vieweditvert}
   then
      set -s --session view = editvert
   fi
   if test -n ${viewedithoriz}
   then
      set -s --session view = edithoriz
   fi
   if test -n ${viewview}
   then
      set -s --session view = view
   fi
   cat WikiSh.PageContent#ViewChoice
   if test ${~view} == editvert
   then
      cat WikiSh.PageContent#VerticalForm
   else
      if test ${~view} == edithoriz
      then
         cat WikiSh.PageContent#HorizontalForm
      else
         # Assume view only...
         cat WikiSh.PageContent#ViewOnly
      fi
   fi
   cat WikiSh.PageContent#CreatePage
   if test -n ${submit}
   then
      writeptv WikiSh.WikiShForms-GroupRC fmt=hidden Linkname="${Linkname}" Joindate="${Joindate}" Contact="${Contact}" EL="${EL}" ELaddress="${ELaddress}" Contact2="${Contact2}" EL2="${EL2}" ELaddress2="${ELaddress2}"
   fi
   if test -n ${create}
   then
      if test -z ${newname}
      then
         echo "ERROR: You must specify a name for the new page you wish to create"
         exit
      fi
      if test -f WikiSh.${newname}
      then
         echo "ERROR: That page already exists."
         exit
      fi
      if cp WikiSh.Template WikiSh.${newname}
      then
         echo "* WikiSh.${newname}?" >>WikiSh.Trail
         wikish_form target=WikiSh.${newname} redirect
      fi
   fi

}