onAppStopEnd - event of the PmaRoot object
Description:
The event is triggered after halting the application (after
onAppStopBegin event).
Pma objects have already been deleted thus it is not possible to use their properties and methods in the event algorithm. The algorithm of this event is the last executed algorithm of the application.
Parameters:
pMe | (Object) Reference to the PmaRoot object where the event rises. |
pEvent | (Object) Reference to an object describing detailed information about the specific event.
The pEvent parameter is not used here because this event does not need any additional information. |
---|
Example1:
JavaScriptVBScriptSelect and copy to clipboard
var sFile = "#app:" + Pm.AppName + "_RtStop.log";
var sInfo = "AppStop: " + Pm.FormatDate(Pm.Time, 1) + "\n" + "\n";
sInfo += "-----------------------------------\n" + "Errors\n";
Pm.FileTextWrite(sFile, sInfo, "charset:utf-8;");
Pm.InfoWriteToFile("Errors", "$all", sFile, "");
sInfo = "-----------------------------------\n" + "Debug\n";
Pm.FileTextWrite(sFile, sInfo, "mode:add;");
Pm.InfoWriteToFile("Debug", "$all", sFile, "");
sInfo = "-----------------------------------\n" + "AppStopDone";
Pm.FileTextWrite(sFile, sInfo, "mode:add;");
Dim sFile, sInfo
sFile = "#app:" & Pm.AppName & "_RtStop.log"
sInfo = "AppStop: " & Pm.FormatDate(Pm.Time, 1) & vbCrLf & vbCrLf
sInfo = sInfo & "-----------------------------------" & vbCrLf & "Errors" & vbCrLf
Pm.FileTextWrite(sFile, sInfo, "charset:utf-8;")
Pm.InfoWriteToFile("Errors", "$all", sFile, "")
sInfo = "-----------------------------------" & vbCrLf & "Debug" & vbCrLf
Pm.FileTextWrite(sFile, sInfo, "mode:add;")
Pm.InfoWriteToFile("Debug", "$all", sFile, "")
sInfo = "-----------------------------------" & vbCrLf & "AppStopDone"
Pm.FileTextWrite sFile, sInfo, "mode:add;"
Example2:
Repeated launching of this application by the utility
RunLater:
JavaScriptVBScriptSelect and copy to clipboard
Pm.ShellExecute("", "c:/Promotic/Tools/RunLater/RunLater", "/t=10 /f=C:/Promotic/Pm90031/Bin32/PromoticRt32.exe /p=" + Pm.AppFullName + ".pra", "", 1);
Pm.ShellExecute "", "c:/Promotic/Tools/RunLater/RunLater", "/t=10 /f=C:/Promotic/Pm90031/Bin32/PromoticRt32.exe /p=" & Pm.AppFullName & ".pra", "", 1