method ConnectionValid

Description

database connection still valid ?

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

BLF

method Progress.MainBlock

program code (program2/progress.p)

/* ================================================================= */
/* If a sequence with name 'InstanceNumber' is available,            */
/* we can assume that all database connections are valid.            */
/* ================================================================= */
assign viFcCount1 = <M-1 GetCurrentValue
   (input  'InstanceNumber':U (icSequence)) in Progress>.
if viFcCount1 = ?
then assign oiReturnStatus = -1.