Compile function CDM_LOG_EVENTS(CtrlEntId, Event, @PARAMS)

Declare function SRP_DateTime, Oconv, DateTime
Declare subroutine Set_Property

#pragma precomp SRP_PreCompiler
#window CDM_LOG

GoToEvent Event for CtrlEntId else
    // Event not implemented
end

Return EventFlow or 1

//-----------------------------------------------------------------------------
// EVENT HANDLERS
//-----------------------------------------------------------------------------

Event WINDOW.CREATE(CreateParam)
    
    EventFlow = 1
    
End Event

Event SIGN_BUTTON.CLICK()
	IF @User4 EQ 'JONATHAN_O' then debug
	Date = SRP_DateTime("Date", DateTime())
	Time = SRP_DateTime("Time", Datetime())

	iDate = OConv(Date, 'D4/H')
	iTime = OConv(Time, 'MTS')
	
	Set_Property(@Window : '.DATE_CHANGED', 'DEFPROP', iDate)
	Set_Property(@Window : '.TIME_CHANGED', 'DEFPROP', iTime)

end event


