Russig

Portal/System/IQD/Belege/Bilanzbelege_SKR51_O21.iqd

@@ -0,0 +1,118 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanzbelege_SKR51_O21.imr
+TITLE,Bilanzbelege_SKR51_O21.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   (rtrim(T2."DESTINATION")) as c30,
+	   T6."CUSTOMER_GROUP" as c31,
+	   T6."CUST_GROUP_SPECIFY" as c32,
+	   T2."VEHICLE_TYPE" as c33,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c34,
+	   (rtrim(T2."MODEL_LINE")) as c35,
+	   T8."MAKE_CD" as c36,
+	   T8."MODEL_LINE" as c37,
+	   T8."MOD_LIN_SPECIFY" as c38,
+	   (rtrim(T2."PRODUCT_GROUP")) as c39,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c40,
+	   (rtrim(T2."REPAIR_GROUP")) as c41,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END) || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c42,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c43,
+	   T9."COMMENT" as c44,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c45,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 30) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c46,
+	   T1."TYPE_ACCTT" as c47,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c48,
+	   (database()) as c49,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c50,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c51,
+	   T9."SUB_ACCT_NO" as c52
+from "deop01"."dbo"."ACCOUNT_INFO" T1,
+	"deop01"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop01"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop01"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop01"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and (T1."TYPE_ACCTT" = '1')
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Destination
+COLUMN,30,Customer Group_pp48
+COLUMN,31,Cust Group Specify_pp48
+COLUMN,32,Vehicle Type
+COLUMN,33,KTR
+COLUMN,34,Model Line
+COLUMN,35,Make Cd_pp5q
+COLUMN,36,Model Line_pp5q
+COLUMN,37,Mod Lin Specify_pp5q
+COLUMN,38,Product Group
+COLUMN,39,Skr51 Product Group_pp65
+COLUMN,40,Repair Group
+COLUMN,41,Acct Nr
+COLUMN,42,KTR_Quelle
+COLUMN,43,Comment
+COLUMN,44,Beleg_Nr
+COLUMN,45,Text
+COLUMN,46,Susa_Kontoart
+COLUMN,47,Susa_Acct_1
+COLUMN,48,Mandant
+COLUMN,49,Betrag
+COLUMN,50,Menge
+COLUMN,51,Sub Acct No
+

Portal/System/IQD/Belege/Bilanzbelege_SKR51_O21_deop02.iqd

@@ -0,0 +1,118 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop02
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanzbelege_SKR51_O21_deop02.imr
+TITLE,Bilanzbelege_SKR51_O21_deop02.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   '02' as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   (rtrim(T2."DESTINATION")) as c30,
+	   T6."CUSTOMER_GROUP" as c31,
+	   T6."CUST_GROUP_SPECIFY" as c32,
+	   T2."VEHICLE_TYPE" as c33,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c34,
+	   (rtrim(T2."MODEL_LINE")) as c35,
+	   T8."MAKE_CD" as c36,
+	   T8."MODEL_LINE" as c37,
+	   T8."MOD_LIN_SPECIFY" as c38,
+	   (rtrim(T2."PRODUCT_GROUP")) as c39,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c40,
+	   (rtrim(T2."REPAIR_GROUP")) as c41,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || '02' || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c42,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c43,
+	   T9."COMMENT" as c44,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c45,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 30) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c46,
+	   T1."TYPE_ACCTT" as c47,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c48,
+	   (database()) as c49,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c50,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c51,
+	   T9."SUB_ACCT_NO" as c52
+from "deop02"."dbo"."ACCOUNT_INFO" T1,
+	"deop02"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop02"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop02"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop02"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop02"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop02"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop02"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop02"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and (T1."TYPE_ACCTT" = '1')
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Destination
+COLUMN,30,Customer Group_pp48
+COLUMN,31,Cust Group Specify_pp48
+COLUMN,32,Vehicle Type
+COLUMN,33,KTR
+COLUMN,34,Model Line
+COLUMN,35,Make Cd_pp5q
+COLUMN,36,Model Line_pp5q
+COLUMN,37,Mod Lin Specify_pp5q
+COLUMN,38,Product Group
+COLUMN,39,Skr51 Product Group_pp65
+COLUMN,40,Repair Group
+COLUMN,41,Acct Nr
+COLUMN,42,KTR_Quelle
+COLUMN,43,Comment
+COLUMN,44,Beleg_Nr
+COLUMN,45,Text
+COLUMN,46,Susa_Kontoart
+COLUMN,47,Susa_Acct_1
+COLUMN,48,Mandant
+COLUMN,49,Betrag
+COLUMN,50,Menge
+COLUMN,51,Sub Acct No
+

Portal/System/IQD/Belege/GuV_SKR51_O21.iqd

@@ -0,0 +1,120 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21.imr
+TITLE,GuV_SKR51_O21.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   T2."PRICE_CODE" as c30,
+	   (rtrim(T2."DESTINATION")) as c31,
+	   T6."CUSTOMER_GROUP" as c32,
+	   T6."CUST_GROUP_SPECIFY" as c33,
+	   T2."VEHICLE_TYPE" as c34,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c35,
+	   (rtrim(T2."MODEL_LINE")) as c36,
+	   T8."MAKE_CD" as c37,
+	   T8."MODEL_LINE" as c38,
+	   T8."MOD_LIN_SPECIFY" as c39,
+	   (rtrim(T2."PRODUCT_GROUP")) as c40,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c41,
+	   (rtrim(T2."REPAIR_GROUP")) as c42,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END) || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c43,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c44,
+	   T9."COMMENT" as c45,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c46,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 120) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c47,
+	   T1."TYPE_ACCTT" as c48,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c49,
+	   (database()) as c50,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c51,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53
+from "deop01"."dbo"."ACCOUNT_INFO" T1,
+	"deop01"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop01"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop01"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop01"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and (T1."TYPE_ACCTT" = '2')
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Price Code
+COLUMN,30,Destination
+COLUMN,31,Customer Group_pp48
+COLUMN,32,Cust Group Specify_pp48
+COLUMN,33,Vehicle Type
+COLUMN,34,KTR
+COLUMN,35,Model Line
+COLUMN,36,Make Cd_pp5q
+COLUMN,37,Model Line_pp5q
+COLUMN,38,Mod Lin Specify_pp5q
+COLUMN,39,Product Group
+COLUMN,40,Skr51 Product Group_pp65
+COLUMN,41,Repair Group
+COLUMN,42,Acct Nr
+COLUMN,43,KTR_Quelle
+COLUMN,44,Comment
+COLUMN,45,Beleg_Nr
+COLUMN,46,Text
+COLUMN,47,Susa_Kontoart
+COLUMN,48,Susa_Acct_1
+COLUMN,49,Mandant
+COLUMN,50,Betrag
+COLUMN,51,Menge
+COLUMN,52,Sub Acct No
+

Portal/System/IQD/Belege/GuV_SKR51_O21_STK.iqd

@@ -0,0 +1,122 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21_STK.imr
+TITLE,GuV_SKR51_O21_STK.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   (rtrim(T2."DESTINATION")) as c30,
+	   T6."CUSTOMER_GROUP" as c31,
+	   T6."CUST_GROUP_SPECIFY" as c32,
+	   T2."VEHICLE_TYPE" as c33,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c34,
+	   (rtrim(T2."MODEL_LINE")) as c35,
+	   T8."MAKE_CD" as c36,
+	   T8."MODEL_LINE" as c37,
+	   T8."MOD_LIN_SPECIFY" as c38,
+	   (rtrim(T2."PRODUCT_GROUP")) as c39,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c40,
+	   (rtrim(T2."REPAIR_GROUP")) as c41,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END) || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c42,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c43,
+	   T9."COMMENT" as c44,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c45,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 120) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c46,
+	   'STK' as c47,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c48,
+	   (database()) as c49,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c50,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c51,
+	   T9."SUB_ACCT_NO" as c52,
+	   (truncate(((CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END) || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END)))) || '_STK' as c53,
+	   T2."PRICE_CODE" as c54
+from "deop01"."dbo"."ACCOUNT_INFO" T1,
+	"deop01"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop01"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop01"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop01"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and ((T1."TYPE_ACCTT" = '2') and ((CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END) <> 0))
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Destination
+COLUMN,30,Customer Group_pp48
+COLUMN,31,Cust Group Specify_pp48
+COLUMN,32,Vehicle Type
+COLUMN,33,KTR
+COLUMN,34,Model Line
+COLUMN,35,Make Cd_pp5q
+COLUMN,36,Model Line_pp5q
+COLUMN,37,Mod Lin Specify_pp5q
+COLUMN,38,Product Group
+COLUMN,39,Skr51 Product Group_pp65
+COLUMN,40,Repair Group
+COLUMN,41,Acct Nr_ori
+COLUMN,42,KTR_Quelle
+COLUMN,43,Comment
+COLUMN,44,Beleg_Nr
+COLUMN,45,Text
+COLUMN,46,Susa_Kontoart
+COLUMN,47,Susa_Acct_1
+COLUMN,48,Mandant
+COLUMN,49,Betrag_
+COLUMN,50,Betrag
+COLUMN,51,Sub Acct No
+COLUMN,52,Acct Nr
+COLUMN,53,Price Code
+

Portal/System/IQD/Belege/GuV_SKR51_O21_STK_deop02.iqd

@@ -0,0 +1,122 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop02
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21_STK_deop02.imr
+TITLE,GuV_SKR51_O21_STK_deop02.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   '02' as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   T2."PRICE_CODE" as c30,
+	   (rtrim(T2."DESTINATION")) as c31,
+	   T6."CUSTOMER_GROUP" as c32,
+	   T6."CUST_GROUP_SPECIFY" as c33,
+	   T2."VEHICLE_TYPE" as c34,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c35,
+	   (rtrim(T2."MODEL_LINE")) as c36,
+	   T8."MAKE_CD" as c37,
+	   T8."MODEL_LINE" as c38,
+	   T8."MOD_LIN_SPECIFY" as c39,
+	   (rtrim(T2."PRODUCT_GROUP")) as c40,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c41,
+	   (rtrim(T2."REPAIR_GROUP")) as c42,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || '02' || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c43,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c44,
+	   T9."COMMENT" as c45,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c46,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 30) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c47,
+	   'STK' as c48,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c49,
+	   (database()) as c50,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c51,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53,
+	   (truncate(((CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || '02' || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END)))) || '_STK' as c54
+from "deop02"."dbo"."ACCOUNT_INFO" T1,
+	"deop02"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop02"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop02"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop02"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop02"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop02"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop02"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop02"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and ((T1."TYPE_ACCTT" = '2') and ((CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END) <> 0))
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Price Code
+COLUMN,30,Destination
+COLUMN,31,Customer Group_pp48
+COLUMN,32,Cust Group Specify_pp48
+COLUMN,33,Vehicle Type
+COLUMN,34,KTR
+COLUMN,35,Model Line
+COLUMN,36,Make Cd_pp5q
+COLUMN,37,Model Line_pp5q
+COLUMN,38,Mod Lin Specify_pp5q
+COLUMN,39,Product Group
+COLUMN,40,Skr51 Product Group_pp65
+COLUMN,41,Repair Group
+COLUMN,42,Acct Nr_ori
+COLUMN,43,KTR_Quelle
+COLUMN,44,Comment
+COLUMN,45,Beleg_Nr
+COLUMN,46,Text
+COLUMN,47,Susa_Kontoart
+COLUMN,48,Susa_Acct_1
+COLUMN,49,Mandant
+COLUMN,50,Betrag_
+COLUMN,51,Betrag
+COLUMN,52,Sub Acct No
+COLUMN,53,Acct Nr
+

Portal/System/IQD/Belege/GuV_SKR51_O21_deop02.iqd

@@ -0,0 +1,120 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop02
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21_deop02.imr
+TITLE,GuV_SKR51_O21_deop02.imr
+BEGIN SQL
+select (rtrim(T1."ACCT_NR")) as c1,
+	   T1."LEDGER_ACCTS_NAME" as c2,
+	   T1."DEPT_SPLIT" as c3,
+	   T1."TYPE_ACCTT" as c4,
+	   T2."ACCT_NO" as c5,
+	   T2."BOOKKEEP_DATE" as c6,
+	   T2."BOOKKEEP_PERIOD" as c7,
+	   T2."DOCUMENT_NO" as c8,
+	   T2."DEBIT_AMOUNT" as c9,
+	   T2."CREDIT_AMOUNT" as c10,
+	   T2."DEBIT_QUANTITY" as c11,
+	   T2."CREDIT_QUANTITY" as c12,
+	   T2."AA_TRTYPE" as c13,
+	   '1' as c14,
+	   '02' as c15,
+	   (rtrim(T2."SITE")) as c16,
+	   T3."DESCRIPTION" as c17,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END as c18,
+	   (rtrim(T2."MAKE")) as c19,
+	   (ucase((rtrim(T2."STRATEGIC_AREA")))) as c20,
+	   T4."DESCRIPTION" as c21,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c22,
+	   CASE WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '1%') THEN ('1 - NW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '2%') THEN ('2 - GW') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '3%') THEN ('3 - TZ') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '4%') THEN ('4 - KDD') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '5%') THEN ('5 - WB') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '6%') THEN ('6 - TST') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '7%') THEN ('7 - LOG') WHEN ((CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) LIKE '9%') THEN ('9 - VW') ELSE null END as c23,
+	   (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || ' - ' || T5."DESCRIPTION" as c24,
+	   (rtrim(T2."DEPARTMENT")) as c25,
+	   T5."DESCRIPTION" as c26,
+	   CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END as c27,
+	   (substring((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) from 1 for 1)) as c28,
+	   CASE WHEN ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) LIKE '0%') THEN ('00 - Absatzweg fehlt') ELSE ((CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '- ' || T6."CUST_GROUP_SPECIFY") END as c29,
+	   T2."PRICE_CODE" as c30,
+	   (rtrim(T2."DESTINATION")) as c31,
+	   T6."CUSTOMER_GROUP" as c32,
+	   T6."CUST_GROUP_SPECIFY" as c33,
+	   T2."VEHICLE_TYPE" as c34,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END as c35,
+	   (rtrim(T2."MODEL_LINE")) as c36,
+	   T8."MAKE_CD" as c37,
+	   T8."MODEL_LINE" as c38,
+	   T8."MOD_LIN_SPECIFY" as c39,
+	   (rtrim(T2."PRODUCT_GROUP")) as c40,
+	   (cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))) as c41,
+	   (rtrim(T2."REPAIR_GROUP")) as c42,
+	   (CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'DFSK') THEN ('1D') WHEN ((((ucase((rtrim(T2."STRATEGIC_AREA"))))) IS NOT NULL) and (((ucase((rtrim(T2."STRATEGIC_AREA"))))) <> '')) THEN ((od_left(((ucase((rtrim(T2."STRATEGIC_AREA"))))),2))) ELSE ('00') END) || '-' || '02' || '-' || ((rtrim(T1."ACCT_NR"))) || '-' || (CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END) || '-' || (CASE WHEN ((((T2."PRICE_CODE" = '99') and (((rtrim(T2."DESTINATION"))) = ' ')) or (((rtrim(T2."DESTINATION"))) = '00'))) THEN ('99') WHEN ((((rtrim(T2."DESTINATION"))) IS NOT NULL) and (((rtrim(T2."DESTINATION"))) <> '')) THEN (((rtrim(T2."DESTINATION")))) ELSE ('00') END) || '-' || (CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP"))))) WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN (((rtrim(T2."REPAIR_GROUP")))) ELSE ('00') END) as c43,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T7."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c44,
+	   T9."COMMENT" as c45,
+	   (cast_numberToString(cast_integer(T2."DOCUMENT_NO"))) as c46,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 120) THEN ((rtrim(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))))) || ' - ' || T9."COMMENT") ELSE ('Sammelstelle Belege') END as c47,
+	   T1."TYPE_ACCTT" as c48,
+	   (od_left(((rtrim(T1."ACCT_NR"))),1)) as c49,
+	   (database()) as c50,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c51,
+	   CASE WHEN (((rtrim(T1."ACCT_NR"))) IN ('8000','8010','8020','8100','8110','8410','8510','5701','8400')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53
+from "deop02"."dbo"."ACCOUNT_INFO" T1,
+	"deop02"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop02"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop02"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop02"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop02"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop02"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop02"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop02"."dbo"."vPP5Q" T8 on (T2."MAKE" = T8."MAKE_CD") and (T2."MODEL_LINE" = T8."MODEL_LINE"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T9."REFERENCE_IDENT")
+and (T1."TYPE_ACCTT" = '2')
+
+END SQL
+COLUMN,0,Acct Nr_kurz
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Dept Split
+COLUMN,3,Type Acctt
+COLUMN,4,Acct No
+COLUMN,5,Bookkeep Date
+COLUMN,6,Bookkeep Period
+COLUMN,7,Document No
+COLUMN,8,Debit Amount
+COLUMN,9,Credit Amount
+COLUMN,10,Debit Quantity
+COLUMN,11,Credit Quantity
+COLUMN,12,Aa Trtype
+COLUMN,13,Rechtseinheit
+COLUMN,14,Betrieb
+COLUMN,15,Site
+COLUMN,16,Site_Description
+COLUMN,17,Marke
+COLUMN,18,Make
+COLUMN,19,Strategic Area
+COLUMN,20,Strategic Area_Description
+COLUMN,21,KST
+COLUMN,22,KST_1
+COLUMN,23,KST_2
+COLUMN,24,Department
+COLUMN,25,Department_Description
+COLUMN,26,ABS
+COLUMN,27,ABS_1
+COLUMN,28,ABS_2
+COLUMN,29,Price Code
+COLUMN,30,Destination
+COLUMN,31,Customer Group_pp48
+COLUMN,32,Cust Group Specify_pp48
+COLUMN,33,Vehicle Type
+COLUMN,34,KTR
+COLUMN,35,Model Line
+COLUMN,36,Make Cd_pp5q
+COLUMN,37,Model Line_pp5q
+COLUMN,38,Mod Lin Specify_pp5q
+COLUMN,39,Product Group
+COLUMN,40,Skr51 Product Group_pp65
+COLUMN,41,Repair Group
+COLUMN,42,Acct Nr
+COLUMN,43,KTR_Quelle
+COLUMN,44,Comment
+COLUMN,45,Beleg_Nr
+COLUMN,46,Text
+COLUMN,47,Susa_Kontoart
+COLUMN,48,Susa_Acct_1
+COLUMN,49,Mandant
+COLUMN,50,Betrag
+COLUMN,51,Menge
+COLUMN,52,Sub Acct No
+

Portal/System/IQD/Belege/current_date_Prognose.iqd

@@ -31,7 +31,7 @@ from
 	   (@CURRENT_DATE) - INTERVAL '001 00:00:00.000' as c11,
 	   CASE WHEN (T1."datum" BETWEEN TIMESTAMP '2008-01-01 00:00:00.000' AND TIMESTAMP '2008-12-31 00:00:00.000') THEN (252) WHEN (T1."datum" BETWEEN TIMESTAMP '2009-01-01 00:00:00.000' AND TIMESTAMP '2009-12-31 00:00:00.000') THEN (252) WHEN (T1."datum" BETWEEN TIMESTAMP '2010-01-01 00:00:00.000' AND TIMESTAMP '2010-12-31 00:00:00.000') THEN (253) WHEN (T1."datum" BETWEEN TIMESTAMP '2011-01-01 00:00:00.000' AND TIMESTAMP '2011-12-31 00:00:00.000') THEN (250) WHEN (T1."datum" BETWEEN TIMESTAMP '2012-01-01 00:00:00.000' AND TIMESTAMP '2012-12-31 00:00:00.000') THEN (249) ELSE (250) END as c13
 from "Arbeitstage" T1
-where ((((((T1."bundeslaender_id" = '15') and (T1."arbeitstag_mofr" = 1)) and ((od_year(T1."datum")) = (extract(YEAR FROM ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) or ((((T1."bundeslaender_id" = '10') and ((od_year(T1."datum")) = (extract(YEAR FROM ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) and (T1."datum" IN (TIMESTAMP '2015-01-01 00:00:00.000',TIMESTAMP '2016-01-01 00:00:00.000',TIMESTAMP '2017-01-01 00:00:00.000',TIMESTAMP '2018-01-01 00:00:00.000',TIMESTAMP '2019-01-01 00:00:00.000'))))
+where ((((((T1."bundeslaender_id" = '13') and (T1."arbeitstag_mofr" = 1)) and ((od_year(T1."datum")) = (extract(YEAR FROM ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) or ((((T1."bundeslaender_id" = '13') and ((od_year(T1."datum")) = (extract(YEAR FROM ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))))) and (T1."datum" <= ((@CURRENT_DATE) - INTERVAL '001 00:00:00.000'))) and (T1."datum" IN (TIMESTAMP '2021-01-01 00:00:00.000',TIMESTAMP '2022-01-01 00:00:00.000',TIMESTAMP '2023-01-01 00:00:00.000',TIMESTAMP '2024-01-01 00:00:00.000'))))
 order by c1 asc,c2 asc,c3 asc,c4 asc,c5 asc,c6 asc,c7 asc,c8 asc,c9 asc,c10 asc,c13 asc
 ) D1
 

Portal/System/IQD/Belege/current_date_Prognose_operativ.iqd

@@ -31,7 +31,7 @@ from
 	   (@CURRENT_DATE) as c11,
 	   CASE WHEN (T1."datum" BETWEEN TIMESTAMP '2008-01-01 00:00:00.000' AND TIMESTAMP '2008-12-31 00:00:00.000') THEN (252) WHEN (T1."datum" BETWEEN TIMESTAMP '2009-01-01 00:00:00.000' AND TIMESTAMP '2009-12-31 00:00:00.000') THEN (252) WHEN (T1."datum" BETWEEN TIMESTAMP '2010-01-01 00:00:00.000' AND TIMESTAMP '2010-12-31 00:00:00.000') THEN (253) WHEN (T1."datum" BETWEEN TIMESTAMP '2011-01-01 00:00:00.000' AND TIMESTAMP '2011-12-31 00:00:00.000') THEN (250) WHEN (T1."datum" BETWEEN TIMESTAMP '2012-01-01 00:00:00.000' AND TIMESTAMP '2012-12-31 00:00:00.000') THEN (249) ELSE (250) END as c13
 from "Arbeitstage" T1
-where ((((T1."bundeslaender_id" = '15') and (T1."arbeitstag_mofr" = 1)) and ((od_year(T1."datum")) = (od_year(((@CURRENT_DATE)))))) and (T1."datum" <= ((@CURRENT_DATE))))
+where ((((((T1."bundeslaender_id" = '13') and (T1."arbeitstag_mofr" = 1)) and ((od_year(T1."datum")) = (od_year(((@CURRENT_DATE)))))) and (T1."datum" <= ((@CURRENT_DATE)))) and (T1."datum" <= ((@CURRENT_DATE)))) or ((((T1."bundeslaender_id" = '13') and ((od_year(T1."datum")) = (od_year(((@CURRENT_DATE)))))) and (T1."datum" <= ((@CURRENT_DATE)))) and (T1."datum" IN (TIMESTAMP '2020-01-01 00:00:00.000',TIMESTAMP '2021-01-01 00:00:00.000',TIMESTAMP '2022-01-01 00:00:00.000',TIMESTAMP '2023-01-01 00:00:00.000',TIMESTAMP '2024-01-01 00:00:00.000'))))
 order by c1 asc,c2 asc,c3 asc,c4 asc,c5 asc,c6 asc,c7 asc,c8 asc,c9 asc,c10 asc,c13 asc
 ) D1
 

Portal/System/IQD/Belege/Bilanzbelege_O21.iqd → Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanzbelege_O21.imr
-TITLE,Bilanzbelege_O21.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_deop73.imr
+TITLE,Bilanzbelege_O21_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,16 +53,16 @@ select T1."ACCT_NR" as c1,
 	   T5."DESCRIPTION" as c47,
 	   T5."OWN_DESCRIPTION" as c48,
 	   '1' as c49,
-	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '01' as c50,
 	   (substring(T4."DEPARTMENT_TYPE_ID" from 3 for 1)) as c51,
 	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
 	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
 	   (database()) as c54,
 	   (od_left(T1."ACCT_NR",1)) as c55,
 	   '' as c56
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	"deop01"."dbo"."ACCT_DOC_DATA" T3,
-	(("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	"deop73"."dbo"."ACCT_DOC_DATA" T3,
+	(("deop73"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
 where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
 and ((T1."TYPE_ACCTT" = '1') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2013-01-01 00:00:00.000'))
 order by c1 asc

Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_deop74.iqd

@@ -0,0 +1,129 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_deop74.imr
+TITLE,Bilanzbelege_O21_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
+	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
+	   (database()) as c54,
+	   (od_left(T1."ACCT_NR",1)) as c55,
+	   '' as c56,
+	   (rtrim(T1."ACCT_NR")) || '_2' as c57
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	"deop74"."dbo"."ACCT_DOC_DATA" T3,
+	(("deop74"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
+and ((T1."TYPE_ACCTT" = '1') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2013-01-01 00:00:00.000'))
+order by c1 asc
+
+END SQL
+COLUMN,0,Acct Nr_ori
+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,Marke
+COLUMN,51,Betrag
+COLUMN,52,Menge
+COLUMN,53,Mandant
+COLUMN,54,Susa
+COLUMN,55,Text
+COLUMN,56,Acct Nr
+

Portal/System/IQD/Belege/Bilanzbelege_O21_hist.iqd → Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_hist_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanzbelege_O21_hist.imr
-TITLE,Bilanzbelege_O21_hist.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_hist_deop73.imr
+TITLE,Bilanzbelege_O21_hist_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -60,9 +60,9 @@ select T1."ACCT_NR" as c1,
 	   (database()) as c54,
 	   (od_left(T1."ACCT_NR",1)) as c55,
 	   '' as c56
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	"deop01"."dbo"."ACCT_DOC_DATA_01" T3,
-	(("deop01"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	"deop73"."dbo"."ACCT_DOC_DATA_01" T3,
+	(("deop73"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
 where (T2."ACCT_NO" = T1."ACCT_NR") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
 and ((T1."TYPE_ACCTT" = '1') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2010-01-01 00:00:00.000'))
 order by c1 asc

Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_hist_deop74.iqd

@@ -0,0 +1,129 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_hist_deop74.imr
+TITLE,Bilanzbelege_O21_hist_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
+	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
+	   (database()) as c54,
+	   (od_left(T1."ACCT_NR",1)) as c55,
+	   '' as c56,
+	   (rtrim(T1."ACCT_NR")) || '_2' as c57
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	"deop74"."dbo"."ACCT_DOC_DATA_01" T3,
+	(("deop74"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID")
+where (T2."ACCT_NO" = T1."ACCT_NR") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
+and ((T1."TYPE_ACCTT" = '1') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2010-01-01 00:00:00.000'))
+order by c1 asc
+
+END SQL
+COLUMN,0,Acct Nr_ori
+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,Marke
+COLUMN,51,Betrag
+COLUMN,52,Menge
+COLUMN,53,Mandant
+COLUMN,54,Susa
+COLUMN,55,Text
+COLUMN,56,Acct Nr
+

Portal/System/IQD/Belege/GuV_8_O21_STK.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_8_O21_STK.imr
-TITLE,GuV_8_O21_STK.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_deop73.imr
+TITLE,GuV_8_O21_STK_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,11 +53,11 @@ select T1."ACCT_NR" as c1,
 	   T5."DESCRIPTION" as c47,
 	   T5."OWN_DESCRIPTION" as c48,
 	   '1' as c49,
-	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '01' as c50,
 	   CASE WHEN ((T1."ACCT_NR" LIKE '9%') and (T2."DEPARTMENT" = '')) THEN ('1') ELSE ((substring(T4."DEPARTMENT_TYPE_ID" from 3 for 1))) END as c51,
 	   (database()) as c52,
 	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
-	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE null END as c54,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE ('Summe Belege älter 90 Tage') END as c54,
 	   (od_left(T1."ACCT_NR",5)) || '_STK' as c55,
 	   'STK' as c56,
 	   T6."ORDER_NUMBER" as c57,
@@ -66,9 +66,9 @@ select T1."ACCT_NR" as c1,
 	   T6."INV_TIME_INT" as c60,
 	   T6."MAKE_TIME_UNIT" as c61,
 	   'STK' as c62
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	(("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
-	(("deop01"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop01"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop01"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	(("deop73"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop73"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop73"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop73"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
 where (T1."ACCT_NR" = T2."ACCT_NO") 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" >= TIMESTAMP '2013-01-01 00:00:00.000'))
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_deop74.iqd

@@ -0,0 +1,138 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_deop74.imr
+TITLE,GuV_8_O21_STK_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   (database()) as c52,
+	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c53,
+	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE ('Summe Belege älter 90 Tage') END as c54,
+	   (od_left(T1."ACCT_NR",5)) || '_2_STK' as c55,
+	   'STK' as c56,
+	   T6."ORDER_NUMBER" as c57,
+	   T6."LINE_NUMBER" as c58,
+	   T6."INV_TIME" as c59,
+	   T6."INV_TIME_INT" as c60,
+	   T6."MAKE_TIME_UNIT" as c61,
+	   'STK' as c62
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	(("deop74"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop74"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop74"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop74"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+where (T1."ACCT_NR" = T2."ACCT_NO") 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" >= TIMESTAMP '2013-01-01 00:00:00.000'))
+
+END SQL
+COLUMN,0,Acct Nr_ori
+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,Marke
+COLUMN,51,Mandant
+COLUMN,52,Betrag
+COLUMN,53,Text
+COLUMN,54,Acct Nr
+COLUMN,55,Susa
+COLUMN,56,Order Number
+COLUMN,57,Line Number
+COLUMN,58,Inv Time
+COLUMN,59,Inv Time Int
+COLUMN,60,Make Time Unit
+COLUMN,61,Type Acctt
+

Portal/System/IQD/Belege/GuV_8_O21_STK_hist.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_hist_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_8_O21_STK_hist.imr
-TITLE,GuV_8_O21_STK_hist.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_hist_deop73.imr
+TITLE,GuV_8_O21_STK_hist_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,7 +53,7 @@ select T1."ACCT_NR" as c1,
 	   T5."DESCRIPTION" as c47,
 	   T5."OWN_DESCRIPTION" as c48,
 	   '1' as c49,
-	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '01' as c50,
 	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = '')) THEN ('1') ELSE ((substring(T4."DEPARTMENT_TYPE_ID" from 3 for 1))) END as c51,
 	   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 c52,
 	   (database()) as c53,
@@ -63,14 +63,14 @@ select T1."ACCT_NR" as c1,
 	   T6."ORDER_NUMBER" as c57,
 	   T6."LINE_NUMBER" as c58,
 	   (rtrim(T1."ACCT_NR")) || '_STK' as c59,
-	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE null END as c60,
+	   'Summe Belege älter 90 Tage' as c60,
 	   'STK' as c61,
 	   'STK' as c62,
 	   T6."USED_TIME" as c63,
 	   T6."USED_TIME_INT" as c64
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	(("deop01"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
-	(("deop01"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop01"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop01"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	(("deop73"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop73"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop73"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop73"."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" >= TIMESTAMP '2010-01-01 00:00:00.000'))
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_hist_deop74.iqd

@@ -0,0 +1,142 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_hist_deop74.imr
+TITLE,GuV_8_O21_STK_hist_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   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 c52,
+	   (database()) as c53,
+	   T6."MAKE_TIME_UNIT" as c54,
+	   T6."INV_TIME" as c55,
+	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c56,
+	   T6."ORDER_NUMBER" as c57,
+	   T6."LINE_NUMBER" as c58,
+	   (rtrim(T1."ACCT_NR")) || '_2_STK' as c59,
+	   'Summe Belege älter 90 Tage' as c60,
+	   'STK' as c61,
+	   'STK' as c62,
+	   T6."USED_TIME" as c63,
+	   T6."USED_TIME_INT" as c64
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	(("deop74"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop74"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop74"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop74"."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" >= TIMESTAMP '2010-01-01 00:00:00.000'))
+
+END SQL
+COLUMN,0,Acct Nr_ori
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Ledger Accts Name2
+COLUMN,3,Handler
+COLUMN,4,Dept Split
+COLUMN,5,Type Acctt_ori
+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,Marke
+COLUMN,51,Betrag_ori
+COLUMN,52,Mandant
+COLUMN,53,Make Time Unit
+COLUMN,54,Inv Time
+COLUMN,55,Betrag
+COLUMN,56,Order Number
+COLUMN,57,Line Number
+COLUMN,58,Acct Nr
+COLUMN,59,Text
+COLUMN,60,Susa
+COLUMN,61,Type Acctt
+COLUMN,62,Used Time
+COLUMN,63,Used Time Int
+

Portal/System/IQD/Belege/GuV_8_O21.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_8_O21.imr
-TITLE,GuV_8_O21.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_deop73.imr
+TITLE,GuV_8_O21_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,21 +53,21 @@ select T1."ACCT_NR" as c1,
 	   T5."DESCRIPTION" as c47,
 	   T5."OWN_DESCRIPTION" as c48,
 	   '1' as c49,
-	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '01' as c50,
 	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = '')) THEN ('1') ELSE ((substring(T4."DEPARTMENT_TYPE_ID" from 3 for 1))) END as c51,
 	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
 	   (database()) as c53,
 	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c54,
-	   CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE null END as c55,
+	   CASE WHEN (T1."ACCT_NR" IN ('49201','49202')) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE (CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE ('Summe Belege älter 90 Tage') END) END as c55,
 	   (od_left(T1."ACCT_NR",1)) as c56,
 	   T6."ORDER_NUMBER" as c57,
 	   T6."LINE_NUMBER" as c58,
 	   T6."INV_TIME" as c59,
 	   T6."INV_TIME_INT" as c60,
 	   T6."MAKE_TIME_UNIT" as c61
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	(("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
-	(("deop01"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop01"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop01"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	(("deop73"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop73"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop73"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop73"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
 where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
 and ((T1."TYPE_ACCTT" = '2') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2013-01-01 00:00:00.000'))
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_deop74.iqd

@@ -0,0 +1,138 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_deop74.imr
+TITLE,GuV_8_O21_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
+	   (database()) as c53,
+	   T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY" as c54,
+	   CASE WHEN (T1."ACCT_NR" IN ('49201','49202')) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE (CASE WHEN ((extract(DAY FROM (now()) - T2."BOOKKEEP_DATE")) <= 90) THEN ((od_left((cast_numberToString(cast_integer(T2."DOCUMENT_NO"))),7)) || ' - ' || T3."COMMENT") ELSE ('Summe Belege älter 90 Tage') END) END as c55,
+	   (od_left(T1."ACCT_NR",1)) as c56,
+	   T6."ORDER_NUMBER" as c57,
+	   T6."LINE_NUMBER" as c58,
+	   T6."INV_TIME" as c59,
+	   T6."INV_TIME_INT" as c60,
+	   T6."MAKE_TIME_UNIT" as c61,
+	   (rtrim(T1."ACCT_NR")) || '_2' as c62
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	(("deop74"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop74"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop74"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop74"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+where (T1."ACCT_NR" = T2."ACCT_NO") and (T2."UNIQUE_IDENT" = T3."REFERENCE_IDENT")
+and ((T1."TYPE_ACCTT" = '2') and (T2."BOOKKEEP_DATE" >= TIMESTAMP '2013-01-01 00:00:00.000'))
+
+END SQL
+COLUMN,0,Acct Nr_ori
+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,Marke
+COLUMN,51,Betrag
+COLUMN,52,Mandant
+COLUMN,53,Menge
+COLUMN,54,Text
+COLUMN,55,Susa
+COLUMN,56,Order Number
+COLUMN,57,Line Number
+COLUMN,58,Inv Time
+COLUMN,59,Inv Time Int
+COLUMN,60,Make Time Unit
+COLUMN,61,Acct Nr
+

Portal/System/IQD/Belege/GuV_8_O21_hist.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_hist_deop73.iqd

@@ -1,8 +1,8 @@
 COGNOS QUERY
 STRUCTURE,1,1
-DATABASE,O21
-DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_8_O21_hist.imr
-TITLE,GuV_8_O21_hist.imr
+DATABASE,O21_deop73
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_hist_deop73.imr
+TITLE,GuV_8_O21_hist_deop73.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,7 +53,7 @@ select T1."ACCT_NR" as c1,
 	   T5."DESCRIPTION" as c47,
 	   T5."OWN_DESCRIPTION" as c48,
 	   '1' as c49,
-	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = ' ')) THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '01' as c50,
 	   CASE WHEN ((T1."ACCT_NR" LIKE '2%') and (T2."DEPARTMENT" = '')) THEN ('1') ELSE ((substring(T4."DEPARTMENT_TYPE_ID" from 3 for 1))) END as c51,
 	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
 	   (database()) as c53,
@@ -62,13 +62,13 @@ select T1."ACCT_NR" as c1,
 	   CASE WHEN (T1."ACCT_NR" LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c56,
 	   T6."ORDER_NUMBER" as c57,
 	   T6."LINE_NUMBER" as c58,
-	   'Belege älter 90Tage' as c59,
+	   'Summe Belege älter 90 Tage' as c59,
 	   (od_left(T1."ACCT_NR",1)) as c60,
 	   T6."USED_TIME" as c61,
 	   T6."USED_TIME_INT" as c62
-from "deop01"."dbo"."ACCOUNT_INFO" T1,
-	(("deop01"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop01"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop01"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
-	(("deop01"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop01"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop01"."dbo"."ORDER_LINE" T6 on (T6."ORDER_NUMBER" = T7."ORDER_NUMBER") and (T6."LINE_NUMBER" = T7."ORDER_LINE_NUMBER"))
+from "deop73"."dbo"."ACCOUNT_INFO" T1,
+	(("deop73"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop73"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop73"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop73"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop73"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop73"."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 (T2."BOOKKEEP_DATE" >= TIMESTAMP '2010-01-01 00:00:00.000'))
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_hist_deop74.iqd

@@ -0,0 +1,140 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop74
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_hist_deop74.imr
+TITLE,GuV_8_O21_hist_deop74.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,
+	   T2."REPAIR_GROUP" as c27,
+	   T2."KIT_GROUP" as c28,
+	   T2."TIME_CODE" as c29,
+	   T2."INT_VOUCHER_NO" as c30,
+	   T2."BALANCING_MARK" as c31,
+	   T2."USED_VEH_DEST_CODE" as c32,
+	   T2."USE_OF_VEHICLE" as c33,
+	   T2."ACCT_NO_NEXT_CHART" as c34,
+	   T3."REFERENCE_IDENT" as c35,
+	   T3."TRANSACT_DATE" as c36,
+	   T3."HANDLER" as c37,
+	   T3."PROGRAM" as c38,
+	   T3."FUNCTION_CODE" as c39,
+	   T3."MODUL" as c40,
+	   T3."DOCUMENT_KEY" as c41,
+	   T3."COMMENT" as c42,
+	   T4."DEPARTMENT_TYPE_ID" as c43,
+	   T4."DESCRIPTION" as c44,
+	   T4."DEPARTMENT_GROUP" as c45,
+	   T5."AA_TRTYPE_ID" as c46,
+	   T5."DESCRIPTION" as c47,
+	   T5."OWN_DESCRIPTION" as c48,
+	   '1' as c49,
+	   '02' as c50,
+	   '3' as c51,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
+	   (database()) as c53,
+	   T6."MAKE_TIME_UNIT" as c54,
+	   T6."INV_TIME" as c55,
+	   CASE WHEN (T1."ACCT_NR" LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c56,
+	   T6."ORDER_NUMBER" as c57,
+	   T6."LINE_NUMBER" as c58,
+	   'Summe Belege älter 90 Tage' as c59,
+	   (od_left(T1."ACCT_NR",1)) as c60,
+	   T6."USED_TIME" as c61,
+	   T6."USED_TIME_INT" as c62,
+	   (rtrim(T1."ACCT_NR")) || '_2' as c63
+from "deop74"."dbo"."ACCOUNT_INFO" T1,
+	(("deop74"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop74"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop74"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop74"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop74"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop74"."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 (T2."BOOKKEEP_DATE" >= TIMESTAMP '2010-01-01 00:00:00.000'))
+
+END SQL
+COLUMN,0,Acct Nr_ori
+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,Marke
+COLUMN,51,Betrag
+COLUMN,52,Mandant
+COLUMN,53,Make Time Unit
+COLUMN,54,Inv Time
+COLUMN,55,Menge
+COLUMN,56,Order Number
+COLUMN,57,Line Number
+COLUMN,58,Text
+COLUMN,59,Susa
+COLUMN,60,Used Time
+COLUMN,61,Used Time Int
+COLUMN,62,Acct Nr
+