RE: %mseconds BIF

["Charlie Randall" <crandall@xxxxxxxxxxxxx>]

* -- Data Structures...
d Tracking#       ds            20
d  Track@14                     14a   inz
d  Track@06                      6a   inz
d* -- Time in Microseconds --
d Microsec        ds
d  microsec6                     6s 0 inz
d  microsec5                     5a   overlay(microsec6)
d  microsec1                     1a   overlay(microsec6:6)
 * ---- Time Stamp...
d time@stamp@a    ds
d  timestamp                    14s 0 inz
d   utime@hms                    6a   overlay(timestamp)
d    utime@sec                   1a   overlay(utime@hms:6)
d   udate@mdcy                   8a   overlay(timestamp:7)
     
 
/end-free
C                   time                    timestamp
 /free
      Track@06 = utime@hms;

      Microsec6 = %MSECONDS(utime@hms);
      Microsec6 = %MSECONDS(timestamp);
      Microsec6 = %MSECONDS(time());
      Microsec = %MSECONDS(track@06); 
      Microsec = %MSECONDS(timestamp);

I have tried each of the above 5 bif commands with one or both of the
errors
Below,  I guess I do not follow how a duration BIF is supposed to work.

Charlie



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Peter Levy
Sent: Wednesday, October 04, 2006 4:34 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: %mseconds BIF

Could you post the RPG statement that is failing along with the 
attributes of the variables used?

It would be a great help.

Charlie Randall wrote:
> Built in Function Question?
>
> Does anyone have an example of how the %mseconds BIF works.  I checked
> the archive and did not find an example nor have I had any success
with
> a example from the web.  I have tried this and just cannot get away
from
> one or both of these errors:
>
> *RNF0579 20      1 The parameter for the duration built-in function is
> not
>                    valid.
> *RNF7416 30      1 The types of the right and left hand side do not
> match in the EVAL operation.
>
> Thanks;
>
> Charlie Randall
> AAA Cooper Transportation
> Crandall@xxxxxxxxxxxxx
>
>