function Start-FSVScanDPS {

    Clear-Host
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""


    while($true) {

        $servers = @"
REJK-P-DPS001
REJK-P-DPS003
REJK-P-DPS005
"@.split("`r`n")

        for($i = 0; $i -lt $servers.Count; $i++) {
            Write-Progress -Activity "Scanning DPS" -Status $servers[$i] -PercentComplete ($i / $servers.Count * 100) 

            $files = @(Get-ChildItem -Path "\\$($servers[$i])\D-Drive\IFSBOData\FSV\Outgoing\REJK-P-MDL003V\DCP_ud\2015\" -Recurse -File)
            Write-Host "$($servers[$i]) Outgoing\DCP_ud\2015: $($files.Count)"
        }

        Write-Host "-----"
    }
}

function Start-FSVScanSPS {
    Clear-Host
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""

    while($true) {

        

        $servers = @"
REJK-P-SPS001
REJK-P-SPS002
REJK-P-SPS003
REJK-P-SPS004
REJK-P-SPS005
REJK-P-SPS006
REJK-P-SPS007
REJK-P-SPS008
REJK-P-SPS009
REJK-P-SPS010
"@.split("`r`n")

        for($i = 0; $i -lt $servers.Count; $i++) {
            Write-Progress -Activity "Scanning SPS" -Status $servers[$i] -PercentComplete ($i / $servers.Count * 100) 

            $files = @(Get-ChildItem -Path "\\$($servers[$i])\D-Drive\IFSBOData\FSV\Outgoing\REJK-P-MDL003V\DCP_ud\2015\" -Recurse -File)
            Write-Host "$($servers[$i]) Outgoing\DCP_ud\2015: $($files.Count)"

            $files = @(Get-ChildItem -Path "\\$($servers[$i])\D-Drive\IFSBOData\FSV\Incoming\DCP_ud\2015\" -Recurse -File)
            Write-Host "$($servers[$i]) Incoming\DCP_ud\2015: $($files.Count)"

            $files = @(Get-ChildItem -Path "\\$($servers[$i])\D-Drive\IFSBOData\FSV\Incoming\DCP_ud\" -File)
            Write-Host "$($servers[$i]) Incoming\DCP_ud\:     $($files.Count)"
        }

        Write-Host "-----"
    }
}

function Start-FSVScanMDL {

    Clear-Host
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""

    $server = "REJK-P-MDL001"

    while($true) {

        Write-Progress -Activity "Scanning MDL" -Status $server

        $files = @(Get-ChildItem -Path "\\$server\D-Drive\IFSBOData\FSV\Incoming\DCP_ud\2015\" -Recurse -File)
        Write-Host "$server Incoming\DCP_ud\2015: $($files.Count)"

        $files = @(Get-ChildItem -Path "\\$server\D-Drive\IFSBOData\FSV\Incoming\DCP_ud\" -File)
        Write-Host "$server Incoming\DCP_ud\:     $($files.Count)"

        sleep -Seconds 10

        Write-Host "-----"
    }
}

function Start-FSVScanTCS {
    Clear-Host
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""
    Write-Host ""

    while($true) {

        $servers = @"
REJK-P-TCS001
REJK-P-TCS003
REJK-P-TCS005
REJK-P-TCS007
REJK-P-TCS009
REJK-P-TCS011
REJK-P-TCS013
REJK-P-TCS015
REJK-P-TCS017
"@.split("`r`n")

        for($i = 0; $i -lt $servers.Count; $i++) {
            Write-Progress -Activity "Scanning TCS" -Status $servers[$i] -PercentComplete ($i / $servers.Count * 100) 

            $files = @(Get-ChildItem -Path "\\$($servers[$i])\D-Drive\IFSBOData\FSV\Outgoing\REJK-P-MDL003V\DCP_ud\2015\" -Recurse -File)
            Write-Host "$($servers[$i]) Outgoing\DCP_ud\2015: $($files.Count)"
        }

        sleep -Seconds 10

        Write-Host "-----"
    }
}