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 | ||