Subversion Repositories wimsdev

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1969 guerimand 1 
!! ce fichier permet d'afficher le source de la feuille
1971 guerimand 2 
!!!### langage independant
1969 guerimand 3 
 
4 
 
23 reyssat 5 
!if $exocnt<=0
1969 guerimand 6 
 !let error=srcnoexo
7 
 !read msg.phtml
23 reyssat 8 
 !goto end
9 
!endif
10 
 
1969 guerimand 11 
$name_getsource <p>
23 reyssat 12 
******************************************************************
13 
!read wimshome/$wims_sesdir/home_sheet.src
14 
******************************************************************
15 
:end
1533 guerimand 16 
<p>
1969 guerimand 17 
!let wims_menu_items=!append line sheetadmin,1,cmd=resume to $wims_menu_items
23 reyssat 18