# Recalculates the official branch workbook with Microsoft Excel for a grid of
# nominal x tenor inputs and writes the results to tests/excel-fixtures.json.
# Usage: powershell -ExecutionPolicy Bypass -File tests\export-excel-fixtures.ps1 [-Workbook <path>]
param(
  [string]$Workbook = "$env:USERPROFILE\Downloads\CALCULATOR CASHBACK SERUB KANTOR CABANG 22092026.xlsx",
  [string]$Out = (Join-Path $PSScriptRoot 'excel-fixtures.json')
)
$ErrorActionPreference = 'Stop'

# Work on a temp copy so the original file is never touched.
$tmp = Join-Path $env:TEMP ("serubi-" + [guid]::NewGuid().ToString() + ".xlsx")
Copy-Item -LiteralPath $Workbook -Destination $tmp

$nominals = @(100000, 500000, 999999, 1000000, 10000000, 49999999, 50000000, 55000000, 99999999,
  100000000, 100000001, 150000000, 250000000, 250000001, 300000000, 499999999, 500000000,
  500000001, 750000000, 999999999, 1000000000, 1000000001, 1500000000, 1999999999,
  2000000000, 2000000001, 5000000000, 10000000000, 50000000000, 50000000001, 100000000000)
$tenors = @(1, 3, 6, 12, 24)

function V($cell) {
  $v = $cell.Value2
  if ($v -is [int] -and $v -lt -2000000000) { return $null }   # COM error codes (#VALUE!, ...)
  if ($cell.Text -like '#*') { return $null }
  if ($v -is [string] -and $v -eq '') { return $null }
  return $v
}

$xl = New-Object -ComObject Excel.Application
$xl.Visible = $false
$xl.DisplayAlerts = $false
try {
  $wb = $xl.Workbooks.Open($tmp)
  $calc = $wb.Worksheets.Item('CALCULATOR CASHBACK SERUBI')
  $cob = $wb.Worksheets.Item('COB')
  $rows = @()
  foreach ($t in $tenors) {
    foreach ($n in $nominals) {
      $calc.Range('A6').Value2 = [double]$n
      $calc.Range('B6').Value2 = [double]$t
      $xl.Calculate()
      $rows += [ordered]@{
        nominal = $n; tenor = $t
        cashbackGross = V $calc.Range('C6'); cashbackNet = V $calc.Range('D6')
        giroNet = V $calc.Range('E6'); simanjaNet = V $calc.Range('F6'); simpedaNet = V $calc.Range('G6'); depositoNet = V $calc.Range('H6')
        totalGiro = V $calc.Range('B10'); totalSimanja = V $calc.Range('B11'); totalSimpeda = V $calc.Range('B12'); totalDeposito = V $calc.Range('B13')
        rateGiro = V $calc.Range('C10'); rateSimanja = V $calc.Range('C11'); rateSimpeda = V $calc.Range('C12')
        equiv = V $calc.Range('D10')
        totalRateGiro = V $calc.Range('E10'); totalRateSimanja = V $calc.Range('E11'); totalRateSimpeda = V $calc.Range('E12')
        rateDeposito = V $calc.Range('F10')
        penaltyRefund = V $calc.Range('B19'); penaltyTax = V $calc.Range('B20'); penaltyFee = V $calc.Range('B21'); penaltyTotal = V $calc.Range('B22')
        shareNasabah = V $cob.Range('I35'); shareBank = V $cob.Range('I34')
        income = V $cob.Range('F38'); puabIncome = V $cob.Range('F31'); creditIncome = V $cob.Range('F36')
        spreadSimanja = V $cob.Range('J29'); spreadSimpeda = V $cob.Range('N28'); spreadGiro = V $cob.Range('R28')
        depositoGross = V $cob.Range('L14')
      }
    }
  }
  $wb.Close($false)
} finally {
  $xl.Quit()
  [System.Runtime.InteropServices.Marshal]::ReleaseComObject($xl) | Out-Null
  Remove-Item -LiteralPath $tmp -ErrorAction SilentlyContinue
}

$payload = [ordered]@{
  source = (Split-Path $Workbook -Leaf)
  generatedAt = (Get-Date).ToString('s')
  cases = $rows
}
$payload | ConvertTo-Json -Depth 5 | Out-File -FilePath $Out -Encoding utf8
Write-Host ("Wrote {0} cases to {1}" -f $rows.Count, $Out)