C11/System/OPTIMA/IQD/Belege/GuV_8_O21_STK_hist.sql

select T1."ACCT_NR" as "Acct Nr_ori",
	   T1."LEDGER_ACCTS_NAME" as "Ledger Accts Name",
	   T1."LEDGER_ACCTS_NAME2" as "Ledger Accts Name2",
	   T1."HANDLER" as "Handler_2",
	   T1."DEPT_SPLIT" as "Dept Split",
	   T1."TYPE_ACCTT" as "Type Acctt_ori",
	   T2."ACCT_NO" as "Acct No",
	   T2."BOOKKEEP_DATE" as "Bookkeep Date",
	   T2."BOOKKEEP_PERIOD" as "Bookkeep Period",
	   T2."DOCUMENT_NO" as "Document No",
	   T2."ORIGIN" as "Origin",
	   T2."STATUS" as "Status",
	   T2."DEBIT_AMOUNT" as "Debit Amount",
	   T2."CREDIT_AMOUNT" as "Credit Amount",
	   T2."DEBIT_QUANTITY" as "Debit Quantity",
	   T2."CREDIT_QUANTITY" as "Credit Quantity",
	   T2."AA_TRTYPE" as "Aa Trtype",
	   T2."DEPARTMENT" as "Department",
	   T2."STOCK" as "Stock",
	   T2."MAKE_FAMILY" as "Make Family",
	   T2."MAKE" as "Make",
	   T2."VEHICLE_TYPE" as "Vehicle Type",
	   T2."MODEL_LINE" as "Model Line",
	   T2."FACTORY_MODEL" as "Factory Model",
	   T2."WORKSHOP_MODEL" as "Workshop Model",
	   T2."PRODUCT_GROUP" as "Product Group",
	   T2."REPAIR_GROUP" as "Repair Group",
	   T2."KIT_GROUP" as "Kit Group",
	   T2."TIME_CODE" as "Time Code",
	   T2."INT_VOUCHER_NO" as "Int Voucher No",
	   T2."BALANCING_MARK" as "Balancing Mark",
	   T2."USED_VEH_DEST_CODE" as "Used Veh Dest Code",
	   T2."USE_OF_VEHICLE" as "Use Of Vehicle",
	   T2."ACCT_NO_NEXT_CHART" as "Acct No Next Chart",
	   T3."REFERENCE_IDENT" as "Reference Ident",
	   T3."TRANSACT_DATE" as "Transact Date",
	   T3."HANDLER" as "Handler",
	   T3."PROGRAM" as "Program",
	   T3."FUNCTION_CODE" as "Function Code",
	   T3."MODUL" as "Modul",
	   T3."DOCUMENT_KEY" as "Document Key",
	   T3."COMMENT" as "Comment",
	   T4."DEPARTMENT_TYPE_ID" as "Department Type Id",
	   T4."DESCRIPTION" as "Description_2",
	   T4."DEPARTMENT_GROUP" as "Department Group",
	   T5."AA_TRTYPE_ID" as "Aa Trtype Id",
	   T5."DESCRIPTION" as "Description",
	   T5."OWN_DESCRIPTION" as "Own Description",
	   '1' as "Rechtseinheit",
	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((substring(T4."DEPARTMENT_TYPE_ID", 1, 2))) END as "Betrieb",
	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = '')) THEN ('1') ELSE ((substring(T4."DEPARTMENT_TYPE_ID", 3, 1))) END as "Marke_alt",
	   CASE WHEN (((T1."ACCT_NR" LIKE '8%') or (T1."ACCT_NR" LIKE '9%')) or (T1."ACCT_NR" = '29930000')) THEN ((T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT") * -1) ELSE (T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT") END as "Betrag_ori",
	   (db_name()) as "Mandant",
	   T6."MAKE_TIME_UNIT" as "Make Time Unit",
	   T6."INV_TIME" as "Inv Time",
	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as "Betrag",
	   T6."ORDER_NUMBER" as "Order Number",
	   T6."LINE_NUMBER" as "Line Number",
	   (rtrim(T1."ACCT_NR")) + '_STK' as "Acct Nr",
	   CASE WHEN ((-1 * datediff(day, (getdate()), T2."BOOKKEEP_DATE")) <= 90) THEN ((substring((convert(varchar(50), T2."DOCUMENT_NO")), 1, 7)) + ' - ' + T3."COMMENT") ELSE null END as "Text",
	   'STK' as "Susa",
	   'STK' as "Type Acctt",
	   T6."USED_TIME" as "Used Time",
	   T6."USED_TIME_INT" as "Used Time Int",
	   '1' as "Rechtseinheit_ID",
	   'Auto Jacob' as "Rechtseinheit_Name",
	   CASE WHEN ((CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((substring(T4."DEPARTMENT_TYPE_ID", 1, 2))) END) = '02') THEN ((CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((substring(T4."DEPARTMENT_TYPE_ID", 1, 2))) END)) ELSE ('01') END as "Betrieb_ID",
	   CASE WHEN ((CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((substring(T4."DEPARTMENT_TYPE_ID", 1, 2))) END) = '02') THEN ('Groß-Gerau') ELSE ('Rüsselsheim') END as "Betrieb_Name",
	   'Opel' as "Marke",
	   '1' as "Fabrikat_Order_By"
from "OPTIMA"."dbo"."ACCOUNT_INFO" T1,
	(("OPTIMA"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "OPTIMA"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "OPTIMA"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
	(("OPTIMA"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "OPTIMA"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "OPTIMA"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
where (T2."ACCT_NO" = T1."ACCT_NR") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
and ((((T1."TYPE_ACCTT" = '2') and (T1."ACCT_NR" LIKE '8%')) and ((T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") <> 0)) and (T2."BOOKKEEP_DATE" >= convert(datetime, '2016-01-01 00:00:00.000')))