Open-AudIT
https://www.open-audit.org/phpBB3/

audit_custom_software.inc - Client Access Express
https://www.open-audit.org/phpBB3/viewtopic.php?f=5&t=2179
Page 1 of 1

Author:  qc_metal [ Thu Mar 01, 2007 8:35 am ]
Post subject:  audit_custom_software.inc - Client Access Express

Inventory reporting for specific versions of Client Access Express (The default info doesn't provide this):

[code]
'****************************************************************************
'CLIENT ACCESS EXPRESS
'****************************************************************************

strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion"
strValueName = "Version"
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEVersion

strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion"
strValueName = "Release"
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAERelease

strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion"
strValueName = "ModificationLevel"
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEModification

strKeyPath = "SOFTWARE\IBM\Client Access\CurrentVersion"
strValueName = "CurrentFixLevel"
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,CAEFix

If CAEFix <> "" then
CAEFix = " Service Level: " & CAEFix
Else
CAEFix = ""
End If

display_name = "Client Access V" & CAEVersion & "R" & CAERelease & "M" & CAEModification & CAEFix

If CAEVersion <> "" then
form_input = "software^^^" & display_name & "^^^" _
& "V" & CAEVersion & "R" & CAERelease & "M" & CAEModification & " " & CAEFix & "^^^" _
& "" & "^^^" _
& "" & "^^^" _
& OSInstall & "^^^" _
& "IBM^^^^^^^^^^^^^^^^^^" _
& "" & "^^^" _
& "" & "^^^" _
& "http://www.IBM.com" & "^^^ "
entry form_input,comment,objTextFile,oAdd,oComment
form_input = ""
End If
[/code]

Resultant info looks like this:
Software name: Client Access V5R1M0 Service Level: SI01907
Version: V5R1M0 Service Level: SI01907
Publisher: IBM

Author:  Mark [ Thu Mar 01, 2007 9:47 am ]
Post subject: 

What is 'Client Access Express' ?

Author:  qc_metal [ Thu Mar 01, 2007 10:51 am ]
Post subject: 

I figured someone would ask...:)

Client access is the software that IBM gives you when you purchase an AS400 fom them. Its basically a host emulation software (5250/telnet).

Its pretty widespread...

Page 1 of 1 All times are UTC + 10 hours
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/