sff_GetTime()

subroutine sff_GetTime	(	character	wid2line,
		character, dimension(*)	time
	)

Definition at line 50 of file fapid_sff_getwid2values.f.

c
c  extract time (hh:mm:ss.sss)
c
      character wid2line*132, time*(*)
cE
      character wid2decoded*132
c
      call sff_helper_decode_wid2(wid2line, wid2decoded)
      time = wid2decoded(17:28)
      return