if ($answer eq "y") { #--Run DB2LDIF Before Changes--# $b4_after_status = $db2ldif_after_ext
 Db2Ldif
 ValidUserArray
 ExtractUsers
 PrintSummary
 }