Power Builder - Compobar conexión

Hola a todos:
Espero alguien me pueda ayudar con lo siguiente.
Necesito comprobar desde power si hay conexión con Internet mediante algún valor que retorne y de la misma forma si estoy conectado a la base de datos

Para la DB:

connect using sqlca;
if sqlca.sqlcode=-1 then
MessageBox("ERROR", "No logro conectarse")
end if

Para Internet:
// NO he necesitado hacerlo es sólo una idea:

GetContextService("Internet", iinet_base)
li_return = iinet_base.HyperlinkToURL(sle_url.text)
IF li_return = -1 THEN
// Fallo
ELSE
// Abre el URL
END IF

Espero te sea de utilidad. Saludos!

te agradesco muchísimo ricardo me fue de gran utilidad en lo de internet resultó casi como lo planteaste solo que utilicé un standard Class InternetResult.

Enhorabuena por tu logro; puedes compartirnos el método con el Standard Class InternetResult ?

Saludos!