Re: Sequencer time string

[kozubal@javelin.LANL.GOV (Andy Kozubal)]

Tom, the following program takes the time stamp from a PV and
puts it into a string.  The program requires Sequencer Version 1.9.
The function tsStampToText() is part of EPICS core.

Andy

> In a IOC sequencer program I would like to
> get a PV time stamp and the curent time
> into an ascii string.  How can this be done?
> 
> Tom Coleman
> 


program tsGen
/* This program monitors the "ShotCounter" PV and generates a string
 * containing the time stamp in the "ShotTime" PV */

%{TS_STAMP	ts;}%

long		shotNum;
assign		shotNum to "ShotCounter";
monitor		shotNum;

string		shotTime;
assign		shotTime to "ShotTime";

long		prevShotNum;

ss getTs {
  state one {
    when (shotNum != prevShotNum) {
	prevShotNum = shotNum;

	/* get time stamp */
	ts = pvTimeStamp (shotNum);

	/* convert to string */
	tsStampToText (&ts, TS_TEXT_MMDDYY, shotTime);
	pvPut(shotTime);
    } state one
  }
}

|=======================================================================|
| Andy Kozubal   (DX-7)			| Digital: akozubal@lanl.gov	|
| Mail Stop P947			|				|
| Los Alamos National Laboratory	| Analog: (505) 667-6508	|
| Los Alamos, New Mexico 87545		|				|
|=======================================================================|