File: pfclogon.scr
Size: 148
Date: Sat, 08 May 2021 23:34:22 +0200
/*  Perform databse logon  */
SQLCA.of_SetUser ( as_userid, as_password )

If SQLCA.of_Connect ( ) < 0 Then
   Return FAILURE
End If

Return SUCCESS
  •