summaryrefslogtreecommitdiff
path: root/texmf-dist/tex/latex/eq2db/eqemail.def
diff options
context:
space:
mode:
Diffstat (limited to 'texmf-dist/tex/latex/eq2db/eqemail.def')
-rw-r--r--texmf-dist/tex/latex/eq2db/eqemail.def69
1 files changed, 69 insertions, 0 deletions
diff --git a/texmf-dist/tex/latex/eq2db/eqemail.def b/texmf-dist/tex/latex/eq2db/eqemail.def
new file mode 100644
index 00000000..4c276184
--- /dev/null
+++ b/texmf-dist/tex/latex/eq2db/eqemail.def
@@ -0,0 +1,69 @@
+%%
+%% This is file `eqemail.def',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% eq2db.dtx (with options: `copyright,eqemail')
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%% Eq2DB.sty package, 2001-9-01 %%
+%% Copyright (C) 2014 D. P. Story %%
+%% dpstory@uakron.edu %%
+%% %%
+%% This program can redistributed and/or modified under %%
+%% the terms of the LaTeX Project Public License %%
+%% Distributed from CTAN archives in directory %%
+%% macros/latex/base/lppl.txt; either version 1 of the %%
+%% License, or (at your option) any later version. %%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\def\htmlSubmitType{HTML}
+\def\insertHTMLs{,"pdfFileName","rtnURL"}
+\def\eq@insertHiddenFields{%
+ \ifx\basicFieldsSet\eqdb@NO
+ \addHiddenTextField{mailTo}{}%
+ \addHiddenTextField{courseName}{}%
+ \addHiddenTextField{quizName}{}%
+ \ifx\eqdb@submitType\htmlSubmitType
+ \addHiddenTextField{pdfFileName}{}
+ \addHiddenTextField{rtnURL}{\thisRtnURL}\fi
+ \global\let\basicFieldsSet\eqdb@YES
+ \fi
+ \addHiddenTextField{\curr@quiz.ptScore}{}
+ \addHiddenTextField{\curr@quiz.nPointTotal}{\theeqpointvalue}
+ \addHiddenTextField{\curr@quiz.numQuestions}{\thequestionno}%
+ \addHiddenTextField{\curr@quiz.numCorrect}{}%
+ \addHiddenTextField{\curr@quiz.Responses}{}%
+ \eq@addHiddenTextFields
+ \eq@clearHiddenFields
+}
+\def\eq@submitURL{%
+ this.getField("mailTo").value="\db@Name";\jsR\jsT\jsT
+ this.getField("courseName").value="\db@Table";\jsR\jsT\jsT
+ this.getField("quizName").value="\curr@quiz";\jsR\jsT\jsT
+ this.getField("\curr@quiz.numCorrect").value=Score;\jsR\jsT\jsT
+ this.getField("\curr@quiz.ptScore").value=ptScore;\jsR\jsT\jsT
+\ifx\eqdb@submitType\htmlSubmitType
+ this.getField("pdfFileName").value=%
+ this.documentFileName;\jsR\jsT\jsT
+\fi
+ var aPointType=new Array(\aPointType);\jsR\jsT\jsT
+\ifx\eqdb@tagged\eqdb@YES
+ var cResponses=gatherTaggedQuizData("\currQuiz",%
+ this.documentFileName,\thequestionno);\jsR\jsT\jsT
+\else
+ var cResponses=Responses.toString().substr(1);\jsR\jsT\jsT
+\fi
+ this.getField("\curr@quiz.Responses").value=cResponses;\jsR\jsT\jsT
+ \eq@populateHiddenFields
+ var aSubmitFields=new Array("\curr@quiz","IdInfo",%
+ "mailTo","courseName","quizName"%
+\ifx\eqdb@submitType\htmlSubmitType\insertHTMLs\fi);\jsR\jsT\jsT
+ \priorSubmitQuiz
+ this.submitForm({cURL: \eq@CGI,bEmpty: false,%
+ aFields: aSubmitFields,%
+ cSubmitAs: "\eqdb@submitType" });\jsR\jsT\jsT
+}
+\endinput
+%%
+%% End of file `eqemail.def'.