ECI security

You can perform security management on servers that support Password Expiry Management. Refer to the CICS® Transaction Gateway: Administration book for your operating system, for more information on supported servers and protocols.

To use these features you must first create a connection object and invoke the Details method to associate a userid and password with the object. The two methods available are Verify Password that checks the userid and password within the connection object with the Server Security System, and ChangePassword that allows you to change the password at the server. If successful the connection object password is updated accordingly.

If either call is successful, you are returned a CclOSecAttr object. This object provides access to information such as last verified time, expiry time and last access time. If, for example, you query the last verified time, you are returned a CclOSecTime object and you may use the SecTime COM class methods to obtain the information in various formats. The following code shows the use of these various objects.
 ' Connection object already created called conn

on error goto pemhandler

Dim SecAttr as CclOSecAttr 
Dim LastVerified as CclOSecTime 
Dim lvdate as Date  

Set SecAttr = conn.VerifySecurity
Set LastVerified = SecAttr.LastVerifiedTime

lvdate = LastVerified.GetDate
strout = Format(lvdate, "hh:mm:ss, dddd, mmm d yyyy") 
Text1.Text = strout  

exit sub  

pemhandler: 

' handle a expired password here maybe  
end sub