Subversion Repositories wimsdev

Rev

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

Rev 14043 Rev 14300
Line 38... Line 38...
38
!else
38
!else
39
  !read $job.proc
39
  !read $job.proc
40
!endif
40
!endif
41
 
41
 
42
!if $jour_begin!=$empty
42
!if $jour_begin!=$empty
-
 
43
  jdate=$jour_begin
43
  jyear=!char 1 to 4 of $jour_begin
44
!!  jyear=!char 1 to 4 of $jour_begin
44
  jmonth=!char 5 to 6 of $jour_begin
45
!!  jmonth=!char 5 to 6 of $jour_begin
45
  jday=!char 7 to 8 of $jour_begin
46
!!  jday=!char 7 to 8 of $jour_begin
46
!endif
47
!endif
47
!if $jour_end!=$empty
48
!if $jour_end!=$empty
-
 
49
  jdate2=$jour_end
48
  jyear2=!char 1 to 4 of $jour_end
50
!!  jyear2=!char 1 to 4 of $jour_end
49
  jmonth2=!char 5 to 6 of $jour_end
51
!!  jmonth2=!char 5 to 6 of $jour_end
50
  jday2=!char 7 to 8 of $jour_end
52
!!  jday2=!char 7 to 8 of $jour_end
51
!endif
53
!endif