@echo off
call "C:\GlobalCube\Tasks\scripts\config2.bat"
rem ==VPP5A==
del C:\GlobalCube\System\OPTIMA\SQL\logs\VPP5A*.* /Q /F >nul 2>nul

if not "%1"=="" goto :increment

:full
  call sql_query.bat "TRUNCATE TABLE [OPTIMA].[import].[VPP5A]"
rem Nur in Quelle: VAT_RATE_CODE;ELE_VEHICLE_TRANSACTION;CASH_PAYMENT;RKSV_SIGNATURE
  call bcp_queryout.bat "VPP5A_1" "SELECT T1.[TRANSACTION_CODE], T1.[STATE_CODE_PARAM], T1.[TRANSACT_DATE], T1.[HANDLER], T1.[SPECIFY], T1.[TRANSFER_CODE], T1.[VAT_ALLOWED], T1.[PRINT5A], T1.[SALES_PRICE], T1.[EQUIPMENT], T1.[DELIVERY_COST], T1.[PURCH_PRICE], T1.[DEPRECIATION], T1.[PPCALC_BLOCK_NO], T1.[PPCALC_FIELD_NO], T1.[COUNTER_ACCOUNT], T1.[PMT_TYPE], T1.[EXTRACT_VAT], T1.[CALC_DIFF_VAT], T1.[timestamp], T1.[UNIQUE_IDENT], '1' as [Client_DB] FROM [deop01].[dbo].[vPP5A] T1  WHERE 1 = 1 ORDER BY T1.[timestamp] "
  call bcp_in.bat "VPP5A_1" "[import].[VPP5A]" "OPTIMA"
rem Nur in Quelle: VAT_RATE_CODE;ELE_VEHICLE_TRANSACTION;CASH_PAYMENT;RKSV_SIGNATURE
  call bcp_queryout.bat "VPP5A_2" "SELECT T1.[TRANSACTION_CODE], T1.[STATE_CODE_PARAM], T1.[TRANSACT_DATE], T1.[HANDLER], T1.[SPECIFY], T1.[TRANSFER_CODE], T1.[VAT_ALLOWED], T1.[PRINT5A], T1.[SALES_PRICE], T1.[EQUIPMENT], T1.[DELIVERY_COST], T1.[PURCH_PRICE], T1.[DEPRECIATION], T1.[PPCALC_BLOCK_NO], T1.[PPCALC_FIELD_NO], T1.[COUNTER_ACCOUNT], T1.[PMT_TYPE], T1.[EXTRACT_VAT], T1.[CALC_DIFF_VAT], T1.[timestamp], T1.[UNIQUE_IDENT], '2' as [Client_DB] FROM [deop02].[dbo].[vPP5A] T1  WHERE 1 = 1 ORDER BY T1.[timestamp] "
  call bcp_in.bat "VPP5A_2" "[import].[VPP5A]" "OPTIMA"
  goto :cleanup

:increment
  call sql_query.bat "TRUNCATE TABLE [OPTIMAX].[temp].[VPP5A]"

  call sql_timestamp.bat "VPP5A_1" "[OPTIMA].[import].[VPP5A]" "1"
  call bcp_queryout.bat "VPP5A_1" "SELECT T1.[TRANSACTION_CODE], T1.[STATE_CODE_PARAM], T1.[TRANSACT_DATE], T1.[HANDLER], T1.[SPECIFY], T1.[TRANSFER_CODE], T1.[VAT_ALLOWED], T1.[PRINT5A], T1.[SALES_PRICE], T1.[EQUIPMENT], T1.[DELIVERY_COST], T1.[PURCH_PRICE], T1.[DEPRECIATION], T1.[PPCALC_BLOCK_NO], T1.[PPCALC_FIELD_NO], T1.[COUNTER_ACCOUNT], T1.[PMT_TYPE], T1.[EXTRACT_VAT], T1.[CALC_DIFF_VAT], T1.[timestamp], T1.[UNIQUE_IDENT], '1' as [Client_DB] FROM [deop01].[dbo].[vPP5A] T1  WHERE T1.[timestamp] > convert(binary(8), '%TS%', 1) AND 1 = 1 ORDER BY T1.[timestamp] "
  call bcp_in.bat "VPP5A_1" "[temp].[VPP5A]" "OPTIMAX"

  call sql_timestamp.bat "VPP5A_2" "[OPTIMA].[import].[VPP5A]" "2"
  call bcp_queryout.bat "VPP5A_2" "SELECT T1.[TRANSACTION_CODE], T1.[STATE_CODE_PARAM], T1.[TRANSACT_DATE], T1.[HANDLER], T1.[SPECIFY], T1.[TRANSFER_CODE], T1.[VAT_ALLOWED], T1.[PRINT5A], T1.[SALES_PRICE], T1.[EQUIPMENT], T1.[DELIVERY_COST], T1.[PURCH_PRICE], T1.[DEPRECIATION], T1.[PPCALC_BLOCK_NO], T1.[PPCALC_FIELD_NO], T1.[COUNTER_ACCOUNT], T1.[PMT_TYPE], T1.[EXTRACT_VAT], T1.[CALC_DIFF_VAT], T1.[timestamp], T1.[UNIQUE_IDENT], '2' as [Client_DB] FROM [deop02].[dbo].[vPP5A] T1  WHERE T1.[timestamp] > convert(binary(8), '%TS%', 1) AND 1 = 1 ORDER BY T1.[timestamp] "
  call bcp_in.bat "VPP5A_2" "[temp].[VPP5A]" "OPTIMAX"

  call sql_query.bat "DELETE T1 FROM [OPTIMA].[import].[VPP5A] T1 INNER JOIN [OPTIMAX].[temp].[VPP5A] T2 ON T1.[CLIENT_DB] = T2.[CLIENT_DB] AND T1.[TRANSACTION_CODE] = T2.[TRANSACTION_CODE]"
  call sql_query.bat "INSERT INTO [OPTIMA].[import].[VPP5A] with (TABLOCK) SELECT * FROM [OPTIMAX].[temp].[VPP5A] T1"

:cleanup
  call delete.bat "C:\GlobalCube\System\OPTIMA\SQL\temp\VPP5A_1.csv"
  call delete.bat "C:\GlobalCube\System\OPTIMA\SQL\temp\VPP5A_2.csv"