$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};