Re: %mseconds BIF -- RPG400-L

I think the input to that BIF has to be a TIMESTAMP value and the outputis an integer.


So...

"Microsec6 = %MSECONDS(utime@hms);" fails because the input is a 6 byteschar."Microsec6 = %MSECONDS(timestamp);" fails because the input is 14 byteszoned."Microsec6 = %MSECONDS(time());" fails because the input is a TIME fieldand not TIMESTAMP. (I'm assuming you meant %time() BIF, right? If notthen what does the time() procedure return?)"Microsec = %MSECONDS(track@06);" fails because the input is 6 byteschar and the output is also 6 bytes char."Microsec = %MSECONDS(timestamp);" fails because the input is 14 byteszoned and the output is 6 bytes char.


HTH

Charlie Randall wrote:

* -- 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 theattributes 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