C11/System/OPTIMA/IQD/Belege/GuV_8_O21_csv_hist.iqd

COGNOS QUERY
STRUCTURE,1,1
DATABASE,O21
DATASOURCENAME,C:\GlobalCube\SYSTEM\OPTIMA\IQD\belege\GuV_8_O21_csv_hist.imr
TITLE,GuV_8_O21_csv_hist.imr
BEGIN SQL
select T1."ACCT_NR" as c1,
	   T1."LEDGER_ACCTS_NAME" as c2,
	   T1."LEDGER_ACCTS_NAME2" as c3,
	   T1."HANDLER" as c4,
	   T1."DEPT_SPLIT" as c5,
	   T1."TYPE_ACCTT" as c6,
	   T2."ACCT_NO" as c7,
	   T2."BOOKKEEP_DATE" as c8,
	   T2."BOOKKEEP_PERIOD" as c9,
	   T2."DOCUMENT_NO" as c10,
	   T2."ORIGIN" as c11,
	   T2."STATUS" as c12,
	   T2."DEBIT_AMOUNT" as c13,
	   T2."CREDIT_AMOUNT" as c14,
	   T2."DEBIT_QUANTITY" as c15,
	   T2."CREDIT_QUANTITY" as c16,
	   T2."AA_TRTYPE" as c17,
	   T2."DEPARTMENT" as c18,
	   T2."STOCK" as c19,
	   T2."MAKE_FAMILY" as c20,
	   T2."MAKE" as c21,
	   T2."VEHICLE_TYPE" as c22,
	   T2."MODEL_LINE" as c23,
	   T2."FACTORY_MODEL" as c24,
	   T2."WORKSHOP_MODEL" as c25,
	   T2."PRODUCT_GROUP" as c26,
	   T3."REPAIR_GROUP" as c27,
	   T3."KIT_GROUP" as c28,
	   T3."TIME_CODE" as c29,
	   T3."INT_VOUCHER_NO" as c30,
	   T3."BALANCING_MARK" as c31,
	   T3."USED_VEH_DEST_CODE" as c32,
	   T3."USE_OF_VEHICLE" as c33,
	   T3."ACCT_NO_NEXT_CHART" as c34,
	   T4."REFERENCE_IDENT" as c35,
	   T4."TRANSACT_DATE" as c36,
	   T4."HANDLER" as c37,
	   T4."PROGRAM" as c38,
	   T4."FUNCTION_CODE" as c39,
	   T4."MODUL" as c40,
	   T4."DOCUMENT_KEY" as c41,
	   T4."COMMENT" as c42,
	   T5."DEPARTMENT_TYPE_ID" as c43,
	   T5."DESCRIPTION" as c44,
	   T5."DEPARTMENT_GROUP" as c45,
	   T6."AA_TRTYPE_ID" as c46,
	   T6."DESCRIPTION" as c47,
	   T6."OWN_DESCRIPTION" as c48,
	   T1."CLIENT_DB" as c49,
	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((substring(T5."DEPARTMENT_TYPE_ID" from 1 for 2))) END as c50,
	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c51,
	   (db_name()) as c52,
	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
	   CASE WHEN (((extract(DAY FROM (getdate()) - T2."BOOKKEEP_DATE")) <= 365) and (T1."ACCT_NR" LIKE '4%')) THEN ((substring((ascii(T2."DOCUMENT_NO")) from 1 for 7)) || ' - ' || T4."COMMENT") WHEN (((extract(DAY FROM (getdate()) - T2."BOOKKEEP_DATE")) <= 90) and (not T1."ACCT_NR" LIKE '4%')) THEN ((substring((ascii(T2."DOCUMENT_NO")) from 1 for 7)) || ' - ' || T4."COMMENT") ELSE ('Summe Belege älter 90/365 Tage') END as c54,
	   (substring(T1."ACCT_NR" from 1 for 1)) as c55,
	   T7."ORDER_NUMBER" as c56,
	   T7."LINE_NUMBER" as c57,
	   T7."INV_TIME" as c58,
	   T7."INV_TIME_INT" as c59,
	   T7."MAKE_TIME_UNIT" as c60,
	   CASE WHEN (T8."Hauptbetrieb_ID" IS NULL) THEN ('1') ELSE (T8."Hauptbetrieb_ID") END as c61,
	   'Bergneustadt Ley' as c62,
	   CASE WHEN ((T8."Standort_ID" IS NULL) and (T3."CLIENT_DB" = '1')) THEN ('01') WHEN ((T8."Standort_ID" IS NULL) and (T3."CLIENT_DB" = '2')) THEN ('02') ELSE (T8."Standort_ID") END as c63,
	   CASE WHEN ((T8."Standort_Name" IS NULL) and (T3."CLIENT_DB" IN ('1'))) THEN ('Bergneustadt') WHEN ((T8."Standort_Name" IS NULL) and (T3."CLIENT_DB" IN ('2'))) THEN ('Verwaltung') ELSE (T8."Standort_Name") END as c64,
	   'Opel' as c65,
	   'Opel' as c66,
	   '1' as c67
from "OPTIMA"."import"."ACCT_DOC_KEY_01" T2,
	"OPTIMA"."import"."ACCOUNT_INFO" T1,
	(((((("OPTIMA"."import"."ACCT_DOC_KEY" T3 left outer join "OPTIMA"."import"."ACCT_DOC_DATA" T4 on (T3."UNIQUE_IDENT" = T4."REFERENCE_IDENT") and (T3."CLIENT_DB" = T4."CLIENT_DB")) left outer join "OPTIMA"."import"."DEPARTMENT_TYPE" T5 on (T3."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") and (T3."CLIENT_DB" = T5."CLIENT_DB")) left outer join "OPTIMA"."import"."AA_TRTYPE" T6 on (T3."AA_TRTYPE" = T6."AA_TRTYPE_ID") and (T3."CLIENT_DB" = T6."CLIENT_DB")) left outer join "OPTIMA"."import"."ACCT_DOC_SALESCLAS" T9 on (T4."REFERENCE_IDENT" = T9."REFERENCE_IDENT") and (T4."CLIENT_DB" = T9."CLIENT_DB")) left outer join "OPTIMA"."import"."ORDER_LINE" T7 on ((T7."ORDER_NUMBER" = T9."ORDER_NUMBER") and (T7."LINE_NUMBER" = T9."ORDER_LINE_NUMBER")) and (T7."CLIENT_DB" = T9."CLIENT_DB")) left outer join "OPTIMA"."data"."GC_Department" T8 on ((substring(T2."DEPARTMENT" from 1 for 2)) = T8."Standort") and (T2."CLIENT_DB" = T8."Hauptbetrieb"))
where (T2."ACCT_NO" = T1."ACCT_NR") and ((T1."ACCT_NR" = T3."ACCT_NO") and (T1."CLIENT_DB" = T3."CLIENT_DB"))
and ((T1."TYPE_ACCTT" = '2') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2019-01-01 00:00:00.000'))

END SQL
COLUMN,0,Acct Nr
COLUMN,1,Ledger Accts Name
COLUMN,2,Ledger Accts Name2
COLUMN,3,Handler
COLUMN,4,Dept Split
COLUMN,5,Type Acctt
COLUMN,6,Acct No
COLUMN,7,Bookkeep Date
COLUMN,8,Bookkeep Period
COLUMN,9,Document No
COLUMN,10,Origin
COLUMN,11,Status
COLUMN,12,Debit Amount
COLUMN,13,Credit Amount
COLUMN,14,Debit Quantity
COLUMN,15,Credit Quantity
COLUMN,16,Aa Trtype
COLUMN,17,Department
COLUMN,18,Stock
COLUMN,19,Make Family
COLUMN,20,Make
COLUMN,21,Vehicle Type
COLUMN,22,Model Line
COLUMN,23,Factory Model
COLUMN,24,Workshop Model
COLUMN,25,Product Group
COLUMN,26,Repair Group
COLUMN,27,Kit Group
COLUMN,28,Time Code
COLUMN,29,Int Voucher No
COLUMN,30,Balancing Mark
COLUMN,31,Used Veh Dest Code
COLUMN,32,Use Of Vehicle
COLUMN,33,Acct No Next Chart
COLUMN,34,Reference Ident
COLUMN,35,Transact Date
COLUMN,36,Handler
COLUMN,37,Program
COLUMN,38,Function Code
COLUMN,39,Modul
COLUMN,40,Document Key
COLUMN,41,Comment
COLUMN,42,Department Type Id
COLUMN,43,Description
COLUMN,44,Department Group
COLUMN,45,Aa Trtype Id
COLUMN,46,Description
COLUMN,47,Own Description
COLUMN,48,Rechtseinheit
COLUMN,49,Betrieb
COLUMN,50,Betrag
COLUMN,51,Mandant
COLUMN,52,Menge
COLUMN,53,Text
COLUMN,54,Susa
COLUMN,55,Order Number
COLUMN,56,Line Number
COLUMN,57,Inv Time
COLUMN,58,Inv Time Int
COLUMN,59,Make Time Unit
COLUMN,60,Rechtseinheit_ID
COLUMN,61,Rechtseinheit_Name
COLUMN,62,Betrieb_ID
COLUMN,63,Betrieb_Name
COLUMN,64,Fabrikat
COLUMN,65,Marke
COLUMN,66,Fabrikat_Order_By