getWasScanDetail :: (MonadIO m, MonadThrow m) => Int ->
                    QualysT m (Maybe WasScan)
getWasScanDetail x = do
    res <- processV3With V3v30 ("get/was/wasscan/" <> show x) Nothing parseWasScan
    return . join $ snd res

-- | Given a scan ID return the status of the scan.
getWasScanDetail :: (MonadIO m, MonadThrow m) => Int ->
                    QualysT m (Maybe WasScan)
getWasScanDetail x = do
    res <- processV3With V3v30 ("get/was/wasscan/" <> show x) Nothing parseWasScan
    return . join $ snd res

-- | Given a scan ID return the status of the scan.
getWasScanDetail x = do
    res <- processV3With V3v30 ("get/was/wasscan/" <> show x) Nothing parseWasScan
    return . join $ snd res

-- | Given a scan ID return the status of the scan.