König_Partner

Portal/System/IQD/Belege/Bilanz_SKR51_O21.iqd

@@ -0,0 +1,120 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanz_SKR51_O21.imr
+TITLE,Bilanz_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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) 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" = '1') and (T2."BOOKKEEP_PERIOD" >= 202001))
+
+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
+COLUMN,52,Beleg_Nr_1
+

Portal/System/IQD/Belege/Bilanz_SKR51_O21_deop03.iqd

@@ -0,0 +1,120 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_2
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Bilanz_SKR51_O21_deop03.imr
+TITLE,Bilanz_SKR51_O21_deop03.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,
+	   '2' 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"))))) = 'RENAULT') THEN ('RN') 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"))))) = 'RENAULT') THEN ('RN') 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,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) as c53
+from "deop03"."dbo"."ACCOUNT_INFO" T1,
+	"deop03"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop03"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop03"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop03"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop03"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop03"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop03"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop03"."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') and (T2."BOOKKEEP_PERIOD" >= 202001))
+
+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
+COLUMN,52,Beleg_Nr_1
+

Portal/System/IQD/Belege/GuV_SKR51_O21.iqd

@@ -0,0 +1,122 @@
+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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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,
+	   T2."PRICE_CODE" 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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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")) <= 30) 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')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) 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 (T2."BOOKKEEP_PERIOD" >= 202001))
+
+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,Price Code
+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
+COLUMN,53,Beleg_Nr_1
+

Portal/System/IQD/Belege/GuV_SKR51_O21_STK.iqd

@@ -0,0 +1,124 @@
+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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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,
+	   T2."PRICE_CODE" 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"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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")) <= 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')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53,
+	   ((CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'PIAGGIO') THEN ('PG') 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 c54,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) as c55
+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 (T2."BOOKKEEP_PERIOD" >= 202001)) and ((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) <> 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,Price Code
+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
+COLUMN,54,Beleg_Nr_1
+

Portal/System/IQD/Belege/GuV_SKR51_O21_STK_deop03.iqd

@@ -0,0 +1,124 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_2
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21_STK_deop03.imr
+TITLE,GuV_SKR51_O21_STK_deop03.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,
+	   '2' 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"))))) = 'RENAULT') THEN ('RN') 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,
+	   T2."PRICE_CODE" 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"))))) = 'RENAULT') THEN ('RN') 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")) <= 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')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53,
+	   ((CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'RENAULT') THEN ('RN') 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 c54,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) as c55
+from "deop03"."dbo"."ACCOUNT_INFO" T1,
+	"deop03"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop03"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop03"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop03"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop03"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop03"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop03"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop03"."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 (T2."BOOKKEEP_PERIOD" >= 202001)) and ((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) <> 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,Price Code
+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
+COLUMN,54,Beleg_Nr_1
+

Portal/System/IQD/Belege/GuV_SKR51_O21_deop03.iqd

@@ -0,0 +1,122 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_2
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\GuV_SKR51_O21_deop03.imr
+TITLE,GuV_SKR51_O21_deop03.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,
+	   '2' 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"))))) = 'RENAULT') THEN ('RN') 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,
+	   T2."PRICE_CODE" 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"))))) = 'RENAULT') THEN ('RN') 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")) <= 30) 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')) THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c52,
+	   T9."SUB_ACCT_NO" as c53,
+	   (od_left(((cast_numberToString(cast_integer(T2."DOCUMENT_NO")))),1)) as c54
+from "deop03"."dbo"."ACCOUNT_INFO" T1,
+	"deop03"."dbo"."ACCT_DOC_DATA" T9,
+	(((((("deop03"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop03"."dbo"."SITE" T3 on T2."SITE" = T3."SITE_ID") left outer join "deop03"."dbo"."STRATEGIC_AREA" T4 on T2."STRATEGIC_AREA" = T4."STRATEGIC_AREA_ID") left outer join "deop03"."dbo"."DEPARTMENT_TYPE" T5 on T2."DEPARTMENT" = T5."DEPARTMENT_TYPE_ID") left outer join "deop03"."dbo"."vPP48" T6 on T2."DESTINATION" = T6."CUSTOMER_GROUP") left outer join "deop03"."dbo"."vPP65" T7 on T2."PRODUCT_GROUP" = T7."PRODUCT_GROUP") left outer join "deop03"."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 (T2."BOOKKEEP_PERIOD" >= 202001))
+
+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,Price Code
+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
+COLUMN,53,Beleg_Nr_1
+

Portal/System/IQD/Belege/Kontenrahmen/Kontenrahmen_kombiniert.iqd

@@ -0,0 +1,27 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\Kontenrahmen\Kontenrahmen_kombiniert.imr
+TITLE,Kontenrahmen_kombiniert.imr
+BEGIN SQL
+select distinct (rtrim(T1."ACCT_NR")) as c1,
+	   CASE WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'AUTO') THEN ('ZZ') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'BAIC') THEN ('1B') WHEN (((ucase((rtrim(T2."STRATEGIC_AREA"))))) = 'ISUZU') THEN ('IZ') 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 c2,
+	   CASE WHEN ((((rtrim(T2."SITE"))) IS NOT NULL) and (((rtrim(T2."SITE"))) <> '')) THEN (((rtrim(T2."SITE")))) ELSE ('00') END as c3,
+	   CASE WHEN ((((rtrim(T2."DEPARTMENT"))) IS NOT NULL) and (((rtrim(T2."DEPARTMENT"))) <> '')) THEN (((rtrim(T2."DEPARTMENT")))) ELSE ('00') END as c4,
+	   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 c5,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN (((rtrim(T2."MODEL_LINE")))) WHEN ((((cast_numberToString(cast_integer(T3."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T3."SKR51_PRODUCT_GROUP")))) <> '')) THEN (((cast_numberToString(cast_integer(T3."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 c6,
+	   CASE WHEN ((((rtrim(T2."MODEL_LINE"))) IS NOT NULL) and (((rtrim(T2."MODEL_LINE"))) <> '')) THEN ('NW') WHEN ((((cast_numberToString(cast_integer(T3."SKR51_PRODUCT_GROUP")))) IS NOT NULL) and (((cast_numberToString(cast_integer(T3."SKR51_PRODUCT_GROUP")))) <> '')) THEN ('TZ') WHEN ((((rtrim(T2."REPAIR_GROUP"))) IS NOT NULL) and (((rtrim(T2."REPAIR_GROUP"))) <> '')) THEN ('SC') ELSE ('') END as c7
+from "deop01"."dbo"."ACCOUNT_INFO" T1,
+	("deop01"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop01"."dbo"."vPP65" T3 on T2."PRODUCT_GROUP" = T3."PRODUCT_GROUP")
+where (T1."ACCT_NR" = T2."ACCT_NO")
+and ((T1."TYPE_ACCTT" IN ('1','2')) and (T2."BOOKKEEP_PERIOD" >= 202001))
+
+END SQL
+COLUMN,0,Konto_Nr
+COLUMN,1,Marke
+COLUMN,2,Standort
+COLUMN,3,Kostenstelle
+COLUMN,4,Absatzkanal
+COLUMN,5,Kostenträger
+COLUMN,6,Kostenträger_Quelle
+

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" = '16') 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'))) or ((((T1."bundeslaender_id" = '16') and (T1."datum" IN (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'))) 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'))))
 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_deop05.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_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_deop05.imr
+TITLE,Bilanzbelege_O21_deop05.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -59,12 +59,13 @@ select T1."ACCT_NR" as c1,
 	   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")
+	   '' as c56,
+	   '01' as c57
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	"deop05"."dbo"."ACCT_DOC_DATA" T3,
+	(("deop05"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."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'))
+and (T1."TYPE_ACCTT" = '1')
 order by c1 asc
 
 END SQL
@@ -117,11 +118,12 @@ COLUMN,45,Aa Trtype Id
 COLUMN,46,Description
 COLUMN,47,Own Description
 COLUMN,48,Rechtseinheit
-COLUMN,49,Betrieb
+COLUMN,49,Betrieb_1
 COLUMN,50,Marke
 COLUMN,51,Betrag
 COLUMN,52,Menge
 COLUMN,53,Mandant
 COLUMN,54,Susa
 COLUMN,55,Text
+COLUMN,56,Betrieb
 

Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_deop99.iqd

@@ -0,0 +1,129 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_deop99.imr
+TITLE,Bilanzbelege_O21_deop99.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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '99' 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,
+	   '02' as c57
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	"deop99"."dbo"."ACCT_DOC_DATA" T3,
+	(("deop99"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."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')
+order by c1 asc
+
+END SQL
+COLUMN,0,Acct Nr
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Ledger Accts Name2
+COLUMN,3,Handler
+COLUMN,4,Dept Split
+COLUMN,5,Type Acctt
+COLUMN,6,Acct No
+COLUMN,7,Bookkeep Date
+COLUMN,8,Bookkeep Period
+COLUMN,9,Document No
+COLUMN,10,Origin
+COLUMN,11,Status
+COLUMN,12,Debit Amount
+COLUMN,13,Credit Amount
+COLUMN,14,Debit Quantity
+COLUMN,15,Credit Quantity
+COLUMN,16,Aa Trtype
+COLUMN,17,Department
+COLUMN,18,Stock
+COLUMN,19,Make Family
+COLUMN,20,Make
+COLUMN,21,Vehicle Type
+COLUMN,22,Model Line
+COLUMN,23,Factory Model
+COLUMN,24,Workshop Model
+COLUMN,25,Product Group
+COLUMN,26,Repair Group
+COLUMN,27,Kit Group
+COLUMN,28,Time Code
+COLUMN,29,Int Voucher No
+COLUMN,30,Balancing Mark
+COLUMN,31,Used Veh Dest Code
+COLUMN,32,Use Of Vehicle
+COLUMN,33,Acct No Next Chart
+COLUMN,34,Reference Ident
+COLUMN,35,Transact Date
+COLUMN,36,Handler
+COLUMN,37,Program
+COLUMN,38,Function Code
+COLUMN,39,Modul
+COLUMN,40,Document Key
+COLUMN,41,Comment
+COLUMN,42,Department Type Id
+COLUMN,43,Description
+COLUMN,44,Department Group
+COLUMN,45,Aa Trtype Id
+COLUMN,46,Description
+COLUMN,47,Own Description
+COLUMN,48,Rechtseinheit
+COLUMN,49,Betrieb_1
+COLUMN,50,Marke
+COLUMN,51,Betrag
+COLUMN,52,Menge
+COLUMN,53,Mandant
+COLUMN,54,Susa
+COLUMN,55,Text
+COLUMN,56,Betrieb
+

Portal/System/IQD/Belege/Bilanzbelege_O21_hist.iqd → Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_hist_deop05.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_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_hist_deop05.imr
+TITLE,Bilanzbelege_O21_hist_deop05.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -59,10 +59,11 @@ select T1."ACCT_NR" as c1,
 	   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_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")
+	   '' as c56,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c57
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	"deop05"."dbo"."ACCT_DOC_DATA_01" T3,
+	(("deop05"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."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
@@ -124,4 +125,5 @@ COLUMN,52,Menge
 COLUMN,53,Mandant
 COLUMN,54,Susa
 COLUMN,55,Text
+COLUMN,56,Betrieb_1
 

Portal/System/IQD/Belege_SKR53/Bilanzbelege_O21_hist_deop99.iqd

@@ -0,0 +1,129 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\Bilanzbelege_O21_hist_deop99.imr
+TITLE,Bilanzbelege_O21_hist_deop99.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,
+	   '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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c57
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	"deop99"."dbo"."ACCT_DOC_DATA_01" T3,
+	(("deop99"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."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
+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,Betrieb_1
+

Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_deop05.iqd

@@ -0,0 +1,138 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_deop05.imr
+TITLE,GuV_8_O21_STK_deop05.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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') WHEN ((od_left(T4."DEPARTMENT_TYPE_ID",2)) = '03') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END 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,
+	   (database()) as c52,
+	   CASE WHEN (((od_left(T1."ACCT_NR",5)) || '_STK') IN ('84370','84730')) THEN (0) WHEN (((od_left(T1."ACCT_NR",5)) || '_STK') LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END 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 ('Belege älter 90 Tage') END as c54,
+	   (od_left(T1."ACCT_NR",5)) || '_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,
+	   '01' as c62
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	(("deop05"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop05"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop05"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop05"."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 ((CASE WHEN (((od_left(T1."ACCT_NR",5)) || '_STK') IN ('84370','84730')) THEN (0) WHEN (((od_left(T1."ACCT_NR",5)) || '_STK') LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END) <> 0))
+
+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_1
+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,Betrieb
+

Portal/System/IQD/Belege/GuV_8_O21_STK.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_deop99.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_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_deop99.imr
+TITLE,GuV_8_O21_STK_deop99.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,
-	   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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '99' 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 ('Belege älter 90 Tage') END as c54,
 	   (od_left(T1."ACCT_NR",5)) || '_STK' as c55,
 	   'STK' as c56,
 	   T6."ORDER_NUMBER" as c57,
@@ -65,12 +65,12 @@ select T1."ACCT_NR" as c1,
 	   T6."INV_TIME" as c59,
 	   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"))
+	   '02' as c62
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	(("deop99"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop99"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop99"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop99"."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'))
+and (((T1."TYPE_ACCTT" = '2') and (T1."ACCT_NR" LIKE '8%')) and ((T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") <> 0))
 
 END SQL
 COLUMN,0,Acct Nr_ori
@@ -78,7 +78,7 @@ COLUMN,1,Ledger Accts Name
 COLUMN,2,Ledger Accts Name2
 COLUMN,3,Handler
 COLUMN,4,Dept Split
-COLUMN,5,Type Acctt_
+COLUMN,5,Type Acctt
 COLUMN,6,Acct No
 COLUMN,7,Bookkeep Date
 COLUMN,8,Bookkeep Period
@@ -122,7 +122,7 @@ COLUMN,45,Aa Trtype Id
 COLUMN,46,Description
 COLUMN,47,Own Description
 COLUMN,48,Rechtseinheit
-COLUMN,49,Betrieb
+COLUMN,49,Betrieb_1
 COLUMN,50,Marke
 COLUMN,51,Mandant
 COLUMN,52,Betrag
@@ -134,5 +134,5 @@ COLUMN,57,Line Number
 COLUMN,58,Inv Time
 COLUMN,59,Inv Time Int
 COLUMN,60,Make Time Unit
-COLUMN,61,Type Acctt
+COLUMN,61,Betrieb
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_hist_deop05.iqd

@@ -0,0 +1,144 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_hist_deop05.imr
+TITLE,GuV_8_O21_STK_hist_deop05.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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') WHEN ((od_left(T4."DEPARTMENT_TYPE_ID",2)) = '03') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END 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,
+	   T6."MAKE_TIME_UNIT" as c54,
+	   T6."INV_TIME" as c55,
+	   CASE WHEN (((rtrim(T1."ACCT_NR")) || '_STK') IN ('84370','84730')) THEN (0) WHEN (((rtrim(T1."ACCT_NR")) || '_STK') LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END as c56,
+	   T6."ORDER_NUMBER" as c57,
+	   T6."LINE_NUMBER" as c58,
+	   (rtrim(T1."ACCT_NR")) || '_STK' as c59,
+	   'Belege älter 90 Tage' as c60,
+	   'STK' as c61,
+	   'STK' as c62,
+	   T6."USED_TIME" as c63,
+	   T6."USED_TIME_INT" as c64,
+	   '01' as c65
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	(("deop05"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop05"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop05"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop05"."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 ((CASE WHEN (((rtrim(T1."ACCT_NR")) || '_STK') IN ('84370','84730')) THEN (0) WHEN (((rtrim(T1."ACCT_NR")) || '_STK') LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") ELSE null END) <> 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_1
+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
+COLUMN,64,Betrieb
+

Portal/System/IQD/Belege/GuV_8_O21_STK_hist.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_STK_hist_deop99.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_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_STK_hist_deop99.imr
+TITLE,GuV_8_O21_STK_hist_deop99.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,8 +53,8 @@ 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,
-	   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 (T2."DEPARTMENT" = ' ') THEN ('01') WHEN ((od_left(T4."DEPARTMENT_TYPE_ID",2)) = '03') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '99' 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,
@@ -63,14 +63,15 @@ 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,
+	   '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"))
+	   T6."USED_TIME_INT" as c64,
+	   '02' as c65
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	(("deop99"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop99"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop99"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop99"."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'))
 
@@ -124,7 +125,7 @@ COLUMN,45,Aa Trtype Id
 COLUMN,46,Description
 COLUMN,47,Own Description
 COLUMN,48,Rechtseinheit
-COLUMN,49,Betrieb
+COLUMN,49,Betrieb_1
 COLUMN,50,Marke
 COLUMN,51,Betrag_ori
 COLUMN,52,Mandant
@@ -139,4 +140,5 @@ COLUMN,60,Susa
 COLUMN,61,Type Acctt
 COLUMN,62,Used Time
 COLUMN,63,Used Time Int
+COLUMN,64,Betrieb
 

Portal/System/IQD/Belege/GuV_8_O21.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_deop05.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_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_deop05.imr
+TITLE,GuV_8_O21_deop05.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,23 +53,24 @@ 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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') WHEN ((od_left(T4."DEPARTMENT_TYPE_ID",2)) = '03') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END 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 ('84370','84730','84770','82790')) THEN (0) WHEN (T1."ACCT_NR" LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") 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 ('Belege älter 90 Tage') 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"))
+	   T6."MAKE_TIME_UNIT" as c61,
+	   '01' as c62
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	(("deop05"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop05"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop05"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop05"."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'))
+and (T1."TYPE_ACCTT" = '2')
 
 END SQL
 COLUMN,0,Acct Nr
@@ -121,7 +122,7 @@ COLUMN,45,Aa Trtype Id
 COLUMN,46,Description
 COLUMN,47,Own Description
 COLUMN,48,Rechtseinheit
-COLUMN,49,Betrieb
+COLUMN,49,Betrieb_1
 COLUMN,50,Marke
 COLUMN,51,Betrag
 COLUMN,52,Mandant
@@ -133,4 +134,5 @@ COLUMN,57,Line Number
 COLUMN,58,Inv Time
 COLUMN,59,Inv Time Int
 COLUMN,60,Make Time Unit
+COLUMN,61,Betrieb
 

Portal/System/IQD/Belege_SKR53/GuV_8_O21_deop99.iqd

@@ -0,0 +1,138 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_deop99.imr
+TITLE,GuV_8_O21_deop99.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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '99' as c51,
+	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
+	   (database()) as c53,
+	   CASE WHEN (T1."ACCT_NR" LIKE '8%') THEN (T2."DEBIT_QUANTITY" + T2."CREDIT_QUANTITY") 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 ('Belege älter 90 Tage') 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,
+	   '02' as c62
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	(("deop99"."dbo"."ACCT_DOC_KEY" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop99"."dbo"."ACCT_DOC_DATA" T3 left outer join "deop99"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop99"."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')
+
+END SQL
+COLUMN,0,Acct Nr
+COLUMN,1,Ledger Accts Name
+COLUMN,2,Ledger Accts Name2
+COLUMN,3,Handler
+COLUMN,4,Dept Split
+COLUMN,5,Type Acctt
+COLUMN,6,Acct No
+COLUMN,7,Bookkeep Date
+COLUMN,8,Bookkeep Period
+COLUMN,9,Document No
+COLUMN,10,Origin
+COLUMN,11,Status
+COLUMN,12,Debit Amount
+COLUMN,13,Credit Amount
+COLUMN,14,Debit Quantity
+COLUMN,15,Credit Quantity
+COLUMN,16,Aa Trtype
+COLUMN,17,Department
+COLUMN,18,Stock
+COLUMN,19,Make Family
+COLUMN,20,Make
+COLUMN,21,Vehicle Type
+COLUMN,22,Model Line
+COLUMN,23,Factory Model
+COLUMN,24,Workshop Model
+COLUMN,25,Product Group
+COLUMN,26,Repair Group
+COLUMN,27,Kit Group
+COLUMN,28,Time Code
+COLUMN,29,Int Voucher No
+COLUMN,30,Balancing Mark
+COLUMN,31,Used Veh Dest Code
+COLUMN,32,Use Of Vehicle
+COLUMN,33,Acct No Next Chart
+COLUMN,34,Reference Ident
+COLUMN,35,Transact Date
+COLUMN,36,Handler
+COLUMN,37,Program
+COLUMN,38,Function Code
+COLUMN,39,Modul
+COLUMN,40,Document Key
+COLUMN,41,Comment
+COLUMN,42,Department Type Id
+COLUMN,43,Description
+COLUMN,44,Department Group
+COLUMN,45,Aa Trtype Id
+COLUMN,46,Description
+COLUMN,47,Own Description
+COLUMN,48,Rechtseinheit
+COLUMN,49,Betrieb_1
+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,Betrieb
+

Portal/System/IQD/Belege_SKR53/GuV_8_O21_hist_deop05.iqd

@@ -0,0 +1,140 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,O21_deop05
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_hist_deop05.imr
+TITLE,GuV_8_O21_hist_deop05.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,
+	   CASE WHEN (T2."DEPARTMENT" = ' ') THEN ('01') WHEN ((od_left(T4."DEPARTMENT_TYPE_ID",2)) = '03') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END 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,
+	   T6."MAKE_TIME_UNIT" as c54,
+	   T6."INV_TIME" as c55,
+	   CASE WHEN (T1."ACCT_NR" IN ('84370','84730','84770','82790')) THEN (0) 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,
+	   (od_left(T1."ACCT_NR",1)) as c60,
+	   T6."USED_TIME" as c61,
+	   T6."USED_TIME_INT" as c62,
+	   '01' as c63
+from "deop05"."dbo"."ACCOUNT_INFO" T1,
+	(("deop05"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop05"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop05"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop05"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop05"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop05"."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
+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_1
+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,Betrieb
+

Portal/System/IQD/Belege/GuV_8_O21_hist.iqd → Portal/System/IQD/Belege_SKR53/GuV_8_O21_hist_deop99.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_deop99
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege_SKR53\GuV_8_O21_hist_deop99.imr
+TITLE,GuV_8_O21_hist_deop99.imr
 BEGIN SQL
 select T1."ACCT_NR" as c1,
 	   T1."LEDGER_ACCTS_NAME" as c2,
@@ -53,8 +53,8 @@ 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,
-	   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 (T2."DEPARTMENT" = ' ') THEN ('01') ELSE ((od_left(T4."DEPARTMENT_TYPE_ID",2))) END as c50,
+	   '99' as c51,
 	   T2."DEBIT_AMOUNT" + T2."CREDIT_AMOUNT" as c52,
 	   (database()) as c53,
 	   T6."MAKE_TIME_UNIT" as c54,
@@ -65,10 +65,11 @@ select T1."ACCT_NR" as c1,
 	   'Belege älter 90Tage' 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"))
+	   T6."USED_TIME_INT" as c62,
+	   '02' as c63
+from "deop99"."dbo"."ACCOUNT_INFO" T1,
+	(("deop99"."dbo"."ACCT_DOC_KEY_01" T2 left outer join "deop99"."dbo"."DEPARTMENT_TYPE" T4 on T2."DEPARTMENT" = T4."DEPARTMENT_TYPE_ID") left outer join "deop99"."dbo"."AA_TRTYPE" T5 on T2."AA_TRTYPE" = T5."AA_TRTYPE_ID"),
+	(("deop99"."dbo"."ACCT_DOC_DATA_01" T3 left outer join "deop99"."dbo"."ACCT_DOC_SALESCLAS" T7 on T3."REFERENCE_IDENT" = T7."REFERENCE_IDENT") left outer join "deop99"."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'))
 
@@ -122,7 +123,7 @@ COLUMN,45,Aa Trtype Id
 COLUMN,46,Description
 COLUMN,47,Own Description
 COLUMN,48,Rechtseinheit
-COLUMN,49,Betrieb
+COLUMN,49,Betrieb_1
 COLUMN,50,Marke
 COLUMN,51,Betrag
 COLUMN,52,Mandant
@@ -135,4 +136,5 @@ COLUMN,58,Text
 COLUMN,59,Susa
 COLUMN,60,Used Time
 COLUMN,61,Used Time Int
+COLUMN,62,Betrieb
 

Portal/System/IQD/Belege_SKR53/current_date_Prognose.iqd

@@ -0,0 +1,52 @@
+COGNOS QUERY
+STRUCTURE,1,1
+DATABASE,Kalender
+DATASOURCENAME,C:\GAPS\Portal\System\IQD\Belege\current_date_Prognose.imr
+TITLE,current_date_Prognose.imr
+BEGIN SQL
+select c1 as c1,
+	   c2 as c2,
+	   c3 as c3,
+	   c4 as c4,
+	   c5 as c5,
+	   c6 as c6,
+	   c7 as c7,
+	   c8 as c8,
+	   c9 as c9,
+	   c10 as c10,
+	   c11 as c11,
+	   CASE WHEN (c4 = 1) THEN (RCOUNT(c4)) ELSE null END as c12,
+	   c13 as c13
+from 
+(select T1."bundeslaender_id" as c1,
+	   T1."datum" as c2,
+	   T1."wochentage_id" as c3,
+	   T1."arbeitstag_mofr" as c4,
+	   T1."zaehler_mofr" as c5,
+	   T1."summe_mofr" as c6,
+	   T1."arbeitstag_mosa" as c7,
+	   T1."zaehler_mosa" as c8,
+	   T1."summe_mosa" as c9,
+	   T1."feiertage_id" as c10,
+	   (@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" = '16') 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'))) or ((((T1."bundeslaender_id" = '16') and (T1."datum" IN (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'))) 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'))))
+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
+
+END SQL
+COLUMN,0,Bundeslaender Id
+COLUMN,1,Datum
+COLUMN,2,Wochentage Id
+COLUMN,3,Arbeitstag Mofr
+COLUMN,4,Zaehler Mofr
+COLUMN,5,Summe Mofr
+COLUMN,6,Arbeitstag Mosa
+COLUMN,7,Zaehler Mosa
+COLUMN,8,Summe Mosa
+COLUMN,9,Feiertage Id
+COLUMN,10,Jahr
+COLUMN,11,Arbeitstag Nr Jahr
+COLUMN,12,Gesamt Arbeitstage
+