ENDBODY
}
@@ -1345,6 +1323,8 @@ sub upfile_store {
return $datatoken;
}
+=pod
+
=item load_tmp_file($r)
Load uploaded file from tmp, $r should be the HTTP Request object,
@@ -1366,6 +1346,8 @@ sub load_tmp_file {
$ENV{'form.upfile'}=join('',@studentdata);
}
+=pod
+
=item upfile_record_sep()
Separate uploaded file into records
@@ -1381,6 +1363,8 @@ sub upfile_record_sep {
}
}
+=pod
+
=item record_sep($record)
Separate a record into fields $record should be an item from the upfile_record_sep(), needs $ENV{'form.upfiletype'}
@@ -1431,6 +1415,8 @@ sub record_sep {
return %components;
}
+=pod
+
=item upfile_select_html()
return HTML code to select file and specify its type
@@ -1449,6 +1435,8 @@ sub upfile_select_html {
ENDUPFORM
}
+=pod
+
=item csv_print_samples($r,$records)
Prints a table of sample values from each column uploaded $r is an
@@ -1479,6 +1467,8 @@ sub csv_print_samples {
$r->print('
'."\n");
}
+=pod
+
=item csv_print_select_table($r,$records,$d)
Prints a table to create associations between values and table columns.
@@ -1511,6 +1501,8 @@ sub csv_print_select_table {
return $i;
}
+=pod
+
=item csv_samples_select_table($r,$records,$d)
Prints a table of sample values from the upload and can make associate samples to internal names.