[YuS_2]

solonenko, сделайте тестовые файлы, с реальной структурой, прикрепите их сюда...

[solonenko]

Приношу извинения, данные АТС выгружает в csv, а не xls

[YuS_2]

solonenko,
Количество звонков по одному исходящему и одному входящему? Т.е. номера телефонов, в каждом списке - уникальные данные или нет?
seen/undelivered - на что-нибудь влияют?
В общем, пока маловато данных...

[solonenko]

YuS_2,
в рамках 1 дня мы звоним 1 раз, т.о. в out.txt - уникальные номера.
клиент может звонить и несколько раз, т.о. в in.csv могут быть повторения номера, однако достаточно поймать 1-й входящий по времени. Следующие входящие от этого клиента это уже не реакция на бота.
seen/undelivered - статус звонка - в данной задаче не влияет

[Iska]

solonenko, осталось рассказать, как из:

Код:

seen;16.03.2020;13:06:26;79000000001

и:

Код:

16.03.2020 16:57;79000000001

получается:

Код:

79000000001;30

[YuS_2]

в out.txt - уникальные номера. клиент может звонить и несколько раз, т.о. в in.csv могут быть повторения номера, однако достаточно поймать 1-й входящий по времени. Следующие входящие от этого клиента это уже не реакция на бота. seen/undelivered - статус звонка - в данной задаче не влияет »

Получается, что входящие без соответствующего исходящего, просто игнорируем.
Тогда, примерно так:

Код:

$outsrc = 'out.txt'
$insrc = 'in.csv'
$result = 'res.csv'

$out = ipcsv $outsrc -d ';' -h 'Status','Date','Time','Phone'|
select Phone,@{n='Date';e={get-date($_.date+' '+$_.time)}} |sort phone -uni

$in = ipcsv $insrc -d ';'|
select @{n='Phone';e={$_.src}},@{n='Date';e={get-date $_.calldate}} |sort phone,date

$out|%{
	[pscustomobject]@{
		'Phone' = $_.phone
		'CallBackDiff' = if(($i=[array]::indexof($in.phone,$_.phone)) -ne -1){
			($in[$i].date - $_.date).totalseconds
		} else {$null}
	}
}|?{$_.callbackdiff -ne $null}|export-csv $result -d ';' -notype

[solonenko]

YuS_2, большое спасибо! Все отлично работает.
данным пример кода подстегивает меня развиваться дальше в направлении изучения PowerShell

[solonenko]

Код:

$in = ipcsv $insrc -d ';'|
select @{n='Phone';e={$_.src}},@{n='Date';e={get-date $_.calldate}} |sort phone,date

Тут все ок сейчас.
При сравнения номеров телефонов столкнулся с проблемой:
в файле out.txt все номера тел. имеют префикс 7
в in.csv - многие 8.
Для корректного сравнения нужно поменять первую цифру 8 на 7

Код:

$in = Import-Csv $insrc -d ';' 
foreach ($bird in $in) {$bird.src = $bird.src -replace('^8','7')}

Но тогда как передать дальше по конвейеру измененный массив, чтобы выполнить
select @{n='Phone';e={$_.src}},@{n='Date';e={get-date $_.calldate}} |sort phone,date

[DJ Mogarych]

Так, наверное:

Код:

select @{n='Phone';e={$_.src -replace "^8","7"}},@{n='Date';e={get-date $_.calldate}} |sort phone,date