Rev 4561 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4561 | Rev 13460 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | # PutCSV |
1 | # PutCSV |
2 | # Envoie le listing |
2 | # Envoie le listing place en $data1 dans la classe $qclass |
- | 3 | !! putCSV is at very early draft state. Do not use it yet (WIP). |
|
- | 4 | ||
3 | 5 | ||
4 | !bound format within csv, tsv default csv |
6 | !bound format within csv, tsv default csv |
5 | 7 | ||
6 | !read scripts/check.class |
8 | !read scripts/check.class |
7 | !if $error!=$empty |
9 | !if $error!=$empty |
Line 9... | Line 11... | ||
9 | !endif |
11 | !endif |
10 | 12 | ||
11 | !readdef $classdeffile |
13 | !readdef $classdeffile |
12 | !writefile wimshome/$wims_sesdir/user-deposit $data1 |
14 | !writefile wimshome/$wims_sesdir/user-deposit $data1 |
13 | 15 | ||
14 | !read |
16 | !read scripts/putcsv |
15 | 17 |