Subversion Repositories wimsdev

Rev

Rev 14297 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14297 Rev 15640
Line 43... Line 43...
43 
$blfield_
 43 
$blfield_
44 
  !endif
 44 
  !endif
45 
!next s_
 45 
!next s_
46 
!! ----- make new field
 46 
!! ----- make new field
47 
field$(update_field)_=$update_content
 47 
field$(update_field)_=$update_content
- 
 
 48 
!if $update_nbline!=$empty
- 
 
 49 
  field$(update_field)_=!line 1 to $(update_nbline) of $(update_content)\
- 
 
 50 
$blfield_
- 
 
 51 
!else
- 
 
 52 
  field$(update_field)_=$update_content
- 
 
 53 
!endif
- 
 
 54 
 
48 
!! ----- save to file
 55 
!! ----- save to file
49 
data_=$(field0_)\
 56 
data_=$(field0_)\
50 
$empty
 57 
$empty
51 
!for k_=1 to $[max($scnt_,$update_field)]
 58 
!for k_=1 to $[max($scnt_,$update_field)]
52 
  data_=$data_:$(field$(k_)_)\
 59 
  data_=$data_:$(field$(k_)_)\