Software development, photography, jokes, ....

Sites by me

 
tas-logoTransportation Administration System
snoezelkussen-logo-kleinstSnoezelkussens voor verstandelijk gehandicapten
ikzoekeenbegeleider-logoBegeleiders voor gehandicapten
Laat uw hond het jaarlijkse vuurwerk overwinnen
logo 50x50Hey Vos! Je eigen naam@vos.net emailadres?
Kunst in huis? Nicole Karrèr maakt echt bijzonder mooie dingen
nettylogo2Kunst in huis? Netty Franssen maakt ook bijzonder mooie dingen
Salarisadministratie en belastingadvies bij De Zaak Loont
Zutphense Bomenstichting

Hosting Favorites

 
ANU Internet Services
XelMedia .internet Services
register.com

Blogroll

 
Bomenstichting
LassoSoft
MacFreak
Quality that computes
The Economy of Motion
Wheel 2.0
IntrAktv



Website Hosting bij Xel Media

Marc's Place

E$CLCTIM - Tijdstip berekeningen uitvoeren




Aanroep
 
xcall e$clctim (fout, [tijdstip1], [tijdstip2], operatie, retval)
 
Common velden vóór aanroep
*N/A
Parameters te vullen bij aanroep
tijdstip1 (d14)
Een tijdstip in de vorm [JJ]JJMMDDUUMMSS of een aantal seconden SSSSSSSSSSSSSS.
Gebruik bij voorkeur de variabele TIMP2 uit E$DATE.H
Geef nooit numerieke literals en variabelen door met een lengte <> 14.
tijdstip2 (d14)
Een tijdstip in de vorm [JJ]JJMMDDUUMMSS, een tijdstip in de vorm DDDDDDDDUUMMSS of een aantal seconden SSSSSSSSSSSSSS.
Gebruik bij voorkeur de variabele TIMP3 uit E$DATE.H
Geef nooit numerieke literals en variabelen door met een lengte <> 14.
operatie (a2)
Een bewerkingscode. De volgende bewerkingscodes kunnen worden opgegeven:
AT Add Time

Telt een tijdstip D...DUUMMSS op bij een tijdstip1 (JJJJMMDDUUMMSS).

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

 
AS Add Seconds

Telt een aantal seconden S...S in tijdstip2 op bij een tijdstip1 (JJJJMMDDUUMMSS).

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

 
ST Subtract Time

Trekt een tijdstip D...DUUMMSS af van een tijdstip1 (JJJJMMDDUUMMSS).

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

 
SS Subtract Seconds

Trekt een aantal seconden S...S in tijdstip2 af van een tijdstip1 (JJJJMMDDUUMMSS).

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

 
DF Difference

Berekent het verschil in dagen, uren, minuten en seconden (D...DUUMMSS) tussen een oud tijdstip (JJJJMMDDUUMMSS) in tijdstip1 en een jonger tijdstip (JJJJMMDDUUMMSS) in tijdstip2. Draai je oud en jong om, dat wordt het resultaat negatief.

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

DS Difference in Seconds

Berekent het verschil in seconden (S...S) tussen een oud tijdstip (JJJJMMDDUUMMSS) in tijdstip1 en een jonger tijdstip (JJJJMMDDUUMMSS) in tijdstip2. Draai je oud en jong om, dat wordt het resultaat negatief.

Indien er enkel UUMMSS worden meegegeven in tijdstip1, wordt er intern de systeemdatum voorgeplakt.

 
SC Seconds

Converteert een tijdstip (...UUMMSS) in tijdstip1 naar het aantal verstreken seconden (S...S) sinds 00:00 uur.

 
SH Seconds to Hours

Converteert een aantal seconden (S...S) in tijdstip1 naar een eental dagen, uren, minuten en seconden DDDDDDDDUUMMSS.

 
VL Validate

Valideert tijdstip1 op een juiste datum [JJ]MMDD indien meegegeven en een juiste tijd UUMMSS, indien meegegeven. Deze actie wordt voor bijna alle voorgaande acties uitgevoerd vóórdat er een berekening plaats gaat vinden.

Gebruik bij voorkeur de variabele DATP4 uit E$DATE.H
Parameters gevuld bij terugkeer
fout (a7)
Indien er bij een validatie van de actiecode, de datums, week- en dagnummers iets niet klopt, wordt in deze parameter de berichtsleutel van een foutmelding teruggegeven:
  • DAT0001
    Parameter 1 niet gevuld.
  • DAT0002
    Onjuiste datum.
  • TIM0001
    Onjuist uur.
  • TIM0002
    Onjuiste minuut.
  • TIM0003
    Onjuiste seconde.
  • TIM0010
    Onbekende actiecode.
Gebruik bij voorkeur de variabele DATP1 uit E$DATE.H
retval (a20)
Deze waarde kan uiteenlopen van een tijdstip als JJJJMMDDUUMMS of DDDDDDDDUUMMSS of een aantal seconden SSSSSSSSSSSSSS.
Gebruik bij voorkeur de variabele DATP5 uit E$DATE.H
Common velden gevuld bij terugkeer
*N/A
Voorbeelden
 
Hier volgt één source-code voorbeeld:
 
timp2 = 19981226112345 ; 11 uur, 23 min., 45 sec.
timp3 = 20000 ; 20.000 seconden = 5,55 uur.
xcall e$clctim (datp1, timp2, timp3, 'AS', datp5)
if datp1.msgid.ne.' ' xcall e$fatal ("Onjuist tijdstip")

 

Deze en meerdere resultaten van de diverse actiecodes vindt je in de volgende afbeelding:


© 1997- Marc Vos (and others) Contact Me