$sSQL = qq{SELECT distinct (snickname), saccountnum, dtacctcreateddate, (nvl(dtacctenableddate,to_date('01-jan-1900')))-(nvl(dtacctdisableddate,to_date('01-jan-1900'))) as disableddiff, laccountid, sacctdisabled
FROM $gsAccountTable
WHERE SAPP = '$gsApp' AND SOWNERID = '$sOwnerID' and DTACCTCREATEDDATE IS not NULL and SACCTDISABLED <> 'DELETED'
ORDER BY SACCTDISABLED};
####
while ($sRow = $sCursor->fetchrow_hashref) {
$iCount++;
$gsaInput{'LACCOUNTID'.$iCount} = $sRow->{LACCOUNTID};
$gsaInput{'SACCTNAME'.$iCount} = $sRow->{SNICKNAME};
$gsaInput{'SACCTNUM'.$iCount} = $sRow->{SACCOUNTNUM};
$gsaInput{'SACCTDATE'.$iCount} = $sRow->{DTACCTCREATEDDATE};
$gsaInput{'SACCTDISABLED'.$iCount} = $sRow->{DISABLEDDIFF};
&TestLog ("Assigning $sRow->{DISABLEDDIFF} to $iCount.");
}
####
$sSQL = qq{SELECT distinct (snickname), saccountnum, dtacctcreateddate, dtacctenableddate-dtacctdisableddate as disableddiff, laccountid, sacctdisabled
FROM $gsAccountTable
WHERE SAPP = '$gsApp' AND SOWNERID = '$sOwnerID' and DTACCTCREATEDDATE IS not NULL and SACCTDISABLED <> 'DELETED'
ORDER BY SACCTDISABLED};