了解 DB2 中的复杂 SP

Question

我需要对具有一堆复杂 XML 功能的 SP 进行更改

Declare ResultCsr2 Cursor For
       WITH
       MDI_BOM_COMP(PROD_ID,SITE_ID, xml ) AS (
       SELECT TC401F.T41PID,TC401F.T41SID,
        XMLSERIALIZE(
         XMLAGG(
          XMLELEMENT( NAME "MDI_BOM_COMP",
           XMLFOREST(
                     trim(TC401F.T41CTY) AS COMPONENT_TYPE,
                     TC401F.T41LNO AS COMP_NUM,
                     trim(TC401F.T41CTO) AS CTRY_OF_ORIGIN,
                     trim(TC401F.T41DSC) AS DESCRIPTION,
                     TC401F.T41EFR AS EFFECTIVE_FROM,
                     TC401F.T41EFT AS EFFECTIVE_TO,
                     trim(TC401F.T41MID) AS MANUFACTURER_ID,
                     trim(TC401F.T41MOC) AS MANUFACTURER_ORG_CODE,
                     trim(TC401F.T41CNO) AS PROD_ID,
                     trim(TC401F.T41POC) AS PROD_ORG_CODE,
                     TC401F.T41QPR AS QTY_PER,
                     trim(TC401F.T41SBI) AS SUB_BOM_ID,
                     trim(TC401F.T41SBO) AS SUB_BOM_ORG_CODE,       --ADB01
                     trim(TC401F.T41VID) AS SUPPLIER_ID,
                     trim(TC401F.T41SOC) AS SUPPLIER_ORG_CODE,
                     TC401F.T41UCT AS UNIT_COST
               )
              )
             ) AS CLOB(1M)
            )
             FROM TC401F TC401F
             GROUP BY T41PID,T41SID
            )

       SELECT
       RowNum, '<BOM_INBOUND>' ||
        XMLSERIALIZE (
         XMLELEMENT(NAME "INTEGRATION_MESSAGE_CONTROL",
          XMLFOREST(
                    'FULL_UPDATE' as ACTION,
                    'POLARIS' as COMPANY_CODE,
                    TRIM(TC400F.T40OCD) as ORG_CODE,
                    '5' as PRIORITY,
                    'INBOUND_ENTITY_INTEGRATION' as MESSAGE_TYPE,
                    'POLARIS_INTEGRATION' as USERID,
                    'TA' as RECEIVER,
                    HEX(Generate_Unique()) as SOURCE_SYSTEM_TOKEN
                    ),
                      XMLELEMENT(NAME "BUS_KEY",
                       XMLFOREST(
                        TRIM(TC400F.T40BID) as BOM_ID,
                        TRIM(TC400F.T40OCD) as ORG_CODE
                       )
                      )
                     ) AS VARCHAR(1000)
                    )
            || '<MDI_BOM>' ||
              XMLSERIALIZE (
               XMLFOREST(

                 TRIM(TC400F.T40ATP) AS ASSEMBLY_TYPE,
                 TRIM(TC400F.T40BID) AS BOM_ID,
                 TRIM(TC400F.T40CCD) AS CURRENCY_CODE,
                 TC400F.T40DPC AS DIRECT_PROCESSING_COST,
                 TC400F.T40EFD AS EFFECTIVE_FROM,
                 TC400F.T40EFT AS EFFECTIVE_TO,
                 TRIM(TC400F.T40MID) AS MANUFACTURER_ID,
                 TRIM(TC400F.T40MOC) AS MANUFACTURER_ORG_CODE,
                 TRIM(TC400F.T40OCD) AS ORG_CODE,
                 TRIM(TC400F.T40PRF) AS PROD_FAMILY,
                 TRIM(TC400F.T40PID) AS PROD_ID,
                 TRIM(TC400F.T40POC) AS PROD_ORG_CODE,
                 TRIM(TC400F.T40ISA) AS IS_ACTIVE,
                 TRIM(TC400F.T40VID) AS SUPPLIER_ID,
                 TRIM(TC400F.T40SOC) AS SUPPLIER_ORG_CODE,
                 TRIM(TC400F.T40PSF) AS PROD_SUB_FAMILY,
                 CASE TRIM(TC400F.T40PML)
                    WHEN '' THEN TRIM(TC400F.T40PML)
                    ELSE TRIM(TC400F.T40PML) || '~' || TRIM(TC403F.T43MDD)
                   END    AS PROD_MODEL

                  ) AS VARCHAR(3000)
                 )
            || IFNULL(MBC.xml, '') ||
               XMLSERIALIZE (
                 XMLFOREST(
                   XMLFOREST(
                     TRIM(TC400F.T40CCD) AS CURRENCY_CODE,
                     TC400F.T40PRI AS PRICE,
                     TRIM(TC400F.T40PTY) AS PRICE_TYPE
                       ) AS MDI_BOM_PRICE,
                    XMLFOREST(
                      TRIM(TC400F.T40CCD) AS CURRENCY_CODE,
                      TRIM(TC400F.T40PRI) AS PRICE,
                      'TRANSACTION_VALUE' AS PRICE_TYPE
                      ) AS MDI_BOM_PRICE,
                    XMLFOREST(
                      TRIM(TC400F.T40INA) AS INCLUDE_IN_AVERAGING

                       ) AS MDI_BOM_IMPL_BOM_PROD_FAMILY_AUTOMOBILES

                      ) AS VARCHAR(3000)
                    )
                  || '</MDI_BOM>' ||
                  '</BOM_INBOUND>' XML
                     FROM (
                            SELECT
                            ROW_NUMBER() OVER (
                                   ORDER BY T40STS
                                   ,T40SID
                                   ,T40BID
                            ) AS RowNum
                            ,t.*
                            FROM TC400F t
                     ) TC400F

                     LEFT OUTER JOIN MDI_BOM_COMP MBC
                     ON TC400F.T40SID = MBC.SITE_ID
                     AND TC400F.T40PID = MBC.PROD_ID
                     LEFT OUTER JOIN TC403F TC403F
                      ON TC400F.T40PML <> ''
                      AND TC400F.T40PML = TC403F.T43MDL
                     WHERE TC400F.T40STS = '10'
                       AND TC400F.RowNUM BETWEEN
                         (P_STARTROW + (P_PAGENOS - 1) * P_NBROFRCDS)
                         AND (P_STARTROW  + (P_PAGENOS - 1) * P_NBROFRCDS  +
                              P_NBROFRCDS - 1);

上面给出的是我很难理解的 SP 代码中的游标声明。第一个 WITH 本身似乎很神秘。我已经将它与临时 table 名称一起使用，但这是第一次，我看到这种似乎是 SP 或 UDF 的东西？有人可以指导我如何理解和理解这一切吗？

进一步补充问题，这里的实际要求是在 XML 中安排数据，使得那些填充了 TC401F.T41SBI 字段的记录应该出现在 XML 输出..

该字段在代码中被选中，如下所示：

trim(TC401F.T41SBI) AS SUB_BOM_ID。如果此字段非空白，则应首先出现在 XML 中，并且任何具有此字段值空白的记录都应仅出现在之后。这样做的最佳方法是什么？以任何方式使用 ORDER BY 似乎都没有真正的帮助，因为 XML 实际上是通过某些函数创建的，排序方式不会影响项目在 XML 中的排列方式。我能想到的一种方法是使用 where 子句，其中 TC401F.T41SBI <> '' 首先附加那些记录 TC401F.T41SBI = ''

Answer 1

我能做的就是帮助 CTE。

 WITH
   MDI_BOM_COMP(PROD_ID,SITE_ID, xml ) AS (
   SELECT TC401F.T41PID,TC401F.T41SID,

这只会生成一个名为 MDI_BOM_COMP 的 table，其中包含名为 PROD_ID、SITE_ID 和 XML 的三列。 table 每个 PROD_ID、SITE_ID 都有一条记录，XML 的内容将是一个 XML 片段，其中包含该产品的所有组件和网站。

现在 XML 部分可能有点混乱，但如果我们将其分解为标量和聚合部分，我们可以使其更容易理解。

先忽略分组。因此 CTE 检索 TC401F 中的每一行。 XMLELEMENT 和 XMLFORREST 是标量函数。 XMLELEMENT 创建单个 XML 元素标签是上例中的第一个参数，元素的内容是第二个。 XMLFORREST 就像一堆 XMLELEMENT 连接在一起。

    XMLSERIALIZE(
     XMLAGG(
      XMLELEMENT( NAME "MDI_BOM_COMP",
       XMLFOREST(
                 trim(TC401F.T41CTY) AS COMPONENT_TYPE,
                 TC401F.T41LNO AS COMP_NUM,
                 trim(TC401F.T41CTO) AS CTRY_OF_ORIGIN,
                 trim(TC401F.T41DSC) AS DESCRIPTION,
                 TC401F.T41EFR AS EFFECTIVE_FROM,
                 TC401F.T41EFT AS EFFECTIVE_TO,
                 trim(TC401F.T41MID) AS MANUFACTURER_ID,
                 trim(TC401F.T41MOC) AS MANUFACTURER_ORG_CODE,
                 trim(TC401F.T41CNO) AS PROD_ID,
                 trim(TC401F.T41POC) AS PROD_ORG_CODE,
                 TC401F.T41QPR AS QTY_PER,
                 trim(TC401F.T41SBI) AS SUB_BOM_ID,
                 trim(TC401F.T41SBO) AS SUB_BOM_ORG_CODE,       --ADB01
                 trim(TC401F.T41VID) AS SUPPLIER_ID,
                 trim(TC401F.T41SOC) AS SUPPLIER_ORG_CODE,
                 TC401F.T41UCT AS UNIT_COST
           )
          )
         ) AS CLOB(1M)

所以在示例中，对于 table 中的每一行，XMLFORREST 创建一个包含 XML 个元素的列表，每个 COMPONENT_TYPE、COMP_NUM、CTRY_OF_ORIGIN 等。这些元素构成另一个 XML 元素 MDI_BOM_COMP 的内容，该元素由 XMLELEMENT.

创建

现在，对于 table 中的每一行，我们选择了 PROD_ID、SITE_ID，并创建了一些 XML。接下来我们按 PROD_ID 和 SITE_ID 分组。聚合函数 XMLAGG 将为每个 PROD_ID 和 SITE_ID 收集所有 XML，并将它们连接在一起。

最后 XMLSERIALIZE 会将内部 XML 表示转换为我们都知道和喜爱的字符串格式 ;)

Answer 2

我想我找到了我的要求的答案。我必须在 XMLELEMENT 函数

之后按字段名称添加顺序

了解 DB2 中的复杂 SP

understanding complex SP in DB2

db2

ibm-midrange