Marc-O-Polo/syspro
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rm param 'LINES', add '<ReferenceBuyerOrder />'

Browse Source
This commit is contained in:
Jeremiah Blunser
2024-01-17 13:08:46 +01:00
parent 17d20e860a
commit 04387729bf
2 changed files with 204 additions and 195 deletions
Download Patch File Download Diff File Expand all files Collapse all files
syspro/SAP2syspro/DESADV/0000000005567395.out.xml
+52 -52
View File
@@ -1,55 +1,55 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<Message> <Message>
<XMLDESADV> <XMLDESADV>
<XMLDESADVHEADER> <XMLDESADVHEADER>
<DocumentId>0180001585_00000000001000003539</DocumentId> <DocumentId>0180001585_00000000001000003539</DocumentId>
<DeliveryNote>0180001585</DeliveryNote> <DeliveryNote>0180001585</DeliveryNote>
<DocumentType>XMLDESADV</DocumentType> <DocumentType>XMLDESADV</DocumentType>
<DocumentSubType>DESADV_GI</DocumentSubType> <DocumentSubType>DESADV_IBT</DocumentSubType>
<DocumentDate>2024-01-09T00:00:00.0000000+01:00</DocumentDate> <DocumentDate>2024-01-09T00:00:00.0000000+01:00</DocumentDate>
<DeliveryDate>2024-01-10T11:00:00.0000000+01:00</DeliveryDate> <DeliveryDate>2024-01-10T11:00:00.0000000+01:00</DeliveryDate>
<ReferenceSupplierOrder /> <ReferenceSupplierOrder/>
<ReferenceBuyerOrder /> <ReferenceBuyerOrder/>
<ReferenceDocument /> <ReferenceDocument/>
<AllocationReference /> <AllocationReference/>
<SenderGLN /> <SenderGLN/>
<ReceipientGLN /> <ReceipientGLN/>
<SupplierGLN /> <SupplierGLN/>
<BuyerGLN /> <BuyerGLN/>
<DeliveryPartyGLN /> <DeliveryPartyGLN/>
<UltimateConsignyGLN /> <UltimateConsignyGLN/>
<ReturnGLN /> <ReturnGLN/>
<SendFromGLN /> <SendFromGLN/>
<SendToGLN /> <SendToGLN/>
<DeliveryCurrency /> <DeliveryCurrency/>
</XMLDESADVHEADER> </XMLDESADVHEADER>
<XMLDESADV /> <XMLDESADV/>
<XMLPACKAGEGROUP> <XMLPACKAGEGROUP>
<NumberOfPackages>1</NumberOfPackages> <NumberOfPackages>1</NumberOfPackages>
<PackageCode>33E</PackageCode> <PackageCode>33E</PackageCode>
</XMLPACKAGEGROUP> </XMLPACKAGEGROUP>
<XMLSSCCGROUP> <XMLSSCCGROUP>
<SSCC>1000003539</SSCC> <SSCC>1000003539</SSCC>
<PackageCode>33E</PackageCode> <PackageCode>33E</PackageCode>
<PackageType>BJ</PackageType> <PackageType>BJ</PackageType>
<XMLITEMS> <XMLITEMS>
<PositionNumber>000010</PositionNumber> <PositionNumber>000010</PositionNumber>
<GTIN>2050000024177</GTIN> <GTIN>2050000024177</GTIN>
<DeliveredQuantity>1.000</DeliveredQuantity> <DeliveredQuantity>1.000</DeliveredQuantity>
<QuantityQualifier>12</QuantityQualifier> <QuantityQualifier>12</QuantityQualifier>
<DeliveryPrice /> <DeliveryPrice/>
<ReferenceSupplierOrder>5400000531</ReferenceSupplierOrder> <ReferenceSupplierOrder>5400000531</ReferenceSupplierOrder>
<ReferenceBuyerOrder /> <ReferenceBuyerOrder/>
</XMLITEMS> </XMLITEMS>
<XMLITEMS> <XMLITEMS>
<PositionNumber>000020</PositionNumber> <PositionNumber>000020</PositionNumber>
<GTIN>2050000024184</GTIN> <GTIN>2050000024184</GTIN>
<DeliveredQuantity>1.000</DeliveredQuantity> <DeliveredQuantity>1.000</DeliveredQuantity>
<QuantityQualifier>12</QuantityQualifier> <QuantityQualifier>12</QuantityQualifier>
<DeliveryPrice /> <DeliveryPrice/>
<ReferenceSupplierOrder>5400000531</ReferenceSupplierOrder> <ReferenceSupplierOrder>5400000531</ReferenceSupplierOrder>
<ReferenceBuyerOrder /> <ReferenceBuyerOrder/>
</XMLITEMS> </XMLITEMS>
</XMLSSCCGROUP> </XMLSSCCGROUP>
</XMLDESADV> </XMLDESADV>
</Message> </Message>
syspro/mapping/DEV-8311.xsl
+152 -143
View File
@@ -10,32 +10,36 @@
<xsl:strip-space elements="*" /> <xsl:strip-space elements="*" />
<xsl:template match="/"> <xsl:template match="/">
<Message> <Message>
<xsl:apply-templates/> <xsl:apply-templates />
</Message> </Message>
</xsl:template> </xsl:template>
<xsl:template match="/ZFSHDLV/IDOC">
<xsl:if test="./E1EDL20/E1EDL37"> <xsl:template match="/ZFSHDLV/IDOC">
<xsl:call-template name="HandlingUnit" /> <xsl:if test="./E1EDL20/E1EDL37">
</xsl:if> <xsl:call-template name="HandlingUnit" />
<xsl:if test="not(./E1EDL20/E1EDL37)"> </xsl:if>
<xsl:call-template name="WithOutHandlingUnits" /> <xsl:if test="not(./E1EDL20/E1EDL37)">
</xsl:if> <xsl:call-template name="WithOutHandlingUnits" />
</xsl:if>
</xsl:template> </xsl:template>
<xsl:template name="Message"> <xsl:template name="Message">
<xsl:param name="CASE"/> <xsl:param name="CASE" />
<xsl:param name="ID"/> <xsl:param name="ID" />
<xsl:param name="SSCCID"/> <xsl:param name="SSCCID" />
<xsl:param name="LINES" /> <xsl:param name="POSITIONS" />
<xsl:param name="POSITIONS" /> <!-- START: local variable declaration -->
<!-- START: local variable declaration -->
<xsl:variable name="PackageCode"> <xsl:variable name="PackageCode">
<xsl:copy>33E</xsl:copy> <xsl:copy>
33E
</xsl:copy>
</xsl:variable> </xsl:variable>
<xsl:variable name="PackageType"> <xsl:variable name="PackageType">
<xsl:copy>BJ</xsl:copy> <xsl:copy>
BJ
</xsl:copy>
</xsl:variable> </xsl:variable>
<!-- END: local variable declaration --> <!-- END: local variable declaration -->
<XMLDESADV> <XMLDESADV>
<XMLDESADVHEADER> <XMLDESADVHEADER>
<DocumentId> <DocumentId>
@@ -47,48 +51,50 @@
<DocumentType> <DocumentType>
<xsl:call-template name="DocumentType"> <xsl:call-template name="DocumentType">
<xsl:with-param name="DocumentType"> <xsl:with-param name="DocumentType">
<xsl:copy>DEV-8311</xsl:copy> <xsl:copy>
DEV-8311
</xsl:copy>
</xsl:with-param> </xsl:with-param>
</xsl:call-template> </xsl:call-template>
</DocumentType> </DocumentType>
<DocumentSubType> <DocumentSubType>
<xsl:call-template name="DocumentSubType"> <xsl:call-template name="DocumentSubType">
<xsl:with-param name="LFART"> <xsl:with-param name="LFART">
<xsl:value-of select="../E1EDL21/LFART"/> <xsl:value-of select="../E1EDL21/LFART" />
</xsl:with-param> </xsl:with-param>
</xsl:call-template> </xsl:call-template>
</DocumentSubType> </DocumentSubType>
<DocumentDate> <DocumentDate>
<xsl:value-of <xsl:value-of
select="format-dateTime(adjust-dateTime-to-timezone(xs:dateTime(concat( select="format-dateTime(adjust-dateTime-to-timezone(xs:dateTime(concat(
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,1,4), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,1,4),
'-', '-',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,5,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,5,2),
'-', '-',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,7,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANF,7,2),
'T', 'T',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,1,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,1,2),
':', ':',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,3,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,3,2),
':', ':',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,5,2)))), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='015']/NTANZ,5,2)))),
'[Y0000]-[M00]-[D00]T[H00]:[m00]:[s00].[f0000000][Z]')" /> '[Y0000]-[M00]-[D00]T[H00]:[m00]:[s00].[f0000000][Z]')" />
</DocumentDate> </DocumentDate>
<DeliveryDate> <DeliveryDate>
<xsl:value-of <xsl:value-of
select="format-dateTime(adjust-dateTime-to-timezone(xs:dateTime(concat( select="format-dateTime(adjust-dateTime-to-timezone(xs:dateTime(concat(
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,1,4), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,1,4),
'-', '-',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,5,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,5,2),
'-', '-',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,7,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANF,7,2),
'T', 'T',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,1,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,1,2),
':', ':',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,3,2), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,3,2),
':', ':',
substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,5,2)))), substring(/ZFSHDLV/IDOC/E1EDL20/E1EDT13[QUALF='007']/NTANZ,5,2)))),
'[Y0000]-[M00]-[D00]T[H00]:[m00]:[s00].[f0000000][Z]')" /> '[Y0000]-[M00]-[D00]T[H00]:[m00]:[s00].[f0000000][Z]')" />
</DeliveryDate> </DeliveryDate>
<ReferenceSupplierOrder /> <ReferenceSupplierOrder />
<ReferenceBuyerOrder /> <ReferenceBuyerOrder />
@@ -109,121 +115,124 @@
</XMLDESADV> </XMLDESADV>
<XMLPACKAGEGROUP> <XMLPACKAGEGROUP>
<NumberOfPackages> <NumberOfPackages>
<xsl:choose> <xsl:choose>
<xsl:when test="format-number(/ZFSHDLV/IDOC/E1EDL20/ANZPK,'#') > 0 "> <xsl:when
<xsl:value-of select="format-number(/ZFSHDLV/IDOC/E1EDL20/ANZPK,'#')" /> test="format-number(/ZFSHDLV/IDOC/E1EDL20/ANZPK,'#') > 0 ">
</xsl:when> <xsl:value-of
<xsl:otherwise><xsl:copy-of select="1"/></xsl:otherwise> select="format-number(/ZFSHDLV/IDOC/E1EDL20/ANZPK,'#')" />
</xsl:choose> </xsl:when>
<xsl:otherwise>
<xsl:copy-of select="1" />
</xsl:otherwise>
</xsl:choose>
</NumberOfPackages> </NumberOfPackages>
<PackageCode> <PackageCode>
<xsl:value-of select="$PackageCode" /> <xsl:value-of select="$PackageCode" />
</PackageCode> </PackageCode>
</XMLPACKAGEGROUP> </XMLPACKAGEGROUP>
<XMLSSCCGROUP> <XMLSSCCGROUP>
<SSCC><xsl:value-of select="$SSCCID" /></SSCC> <SSCC>
<PackageCode> <xsl:value-of select="$SSCCID" />
<xsl:value-of select="$PackageCode" /> </SSCC>
</PackageCode> <PackageCode>
<PackageType> <xsl:value-of select="$PackageCode" />
<xsl:value-of select="$PackageType" /> </PackageCode>
</PackageType> <PackageType>
<xsl:copy-of select="$POSITIONS"/> <xsl:value-of select="$PackageType" />
</PackageType>
<xsl:copy-of select="$POSITIONS" />
</XMLSSCCGROUP> </XMLSSCCGROUP>
</XMLDESADV> </XMLDESADV>
</xsl:template> </xsl:template>
<xsl:template name="WithOutHandlingUnits">
<xsl:variable name="POSITIONS">
<xsl:for-each select="./E1EDL20/E1EDL24">
<XMLITEMS>
<PositionNumber>
<xsl:value-of select="./POSNR" />
</PositionNumber>
<GTIN>
<xsl:value-of
select="./EAN11" />
</GTIN>
<DeliveredQuantity>
<xsl:value-of
select="./LGMNG" />
</DeliveredQuantity>
<QuantityQualifier>
<xsl:call-template name="QuantityQualifier">
<xsl:with-param name="UoM">
<xsl:value-of
select="./MEINS" />
</xsl:with-param>
</xsl:call-template>
</QuantityQualifier>
<DeliveryPrice></DeliveryPrice>
<ReferenceSupplierOrder>
<xsl:value-of
select="./VGBEL" />
</ReferenceSupplierOrder>
</XMLITEMS>
</xsl:for-each>
</xsl:variable>
<xsl:template name="WithOutHandlingUnits">
<xsl:call-template name="Message" > <xsl:variable name="POSITIONS">
<xsl:with-param name="CASE" select="'NoHandlingUnit'"/> <xsl:for-each select="./E1EDL20/E1EDL24">
<xsl:with-param name="ID" select="./E1EDL20/VBELN"/> <XMLITEMS>
<xsl:with-param name="SSCCID" select="./E1EDL20/VBELN" /> <PositionNumber>
<xsl:with-param name="POSITIONS" select="$POSITIONS"/> <xsl:value-of select="./POSNR" />
</xsl:call-template> </PositionNumber>
<GTIN>
<xsl:value-of select="./EAN11" />
</GTIN>
<DeliveredQuantity>
<xsl:value-of select="./LGMNG" />
</DeliveredQuantity>
<QuantityQualifier>
<xsl:call-template name="QuantityQualifier">
<xsl:with-param name="UoM">
<xsl:value-of select="./MEINS" />
</xsl:with-param>
</xsl:call-template>
</QuantityQualifier>
<DeliveryPrice></DeliveryPrice>
<ReferenceSupplierOrder>
<xsl:value-of select="./VGBEL" />
</ReferenceSupplierOrder>
<ReferenceBuyerOrder />
</XMLITEMS>
</xsl:for-each>
</xsl:variable>
<xsl:call-template name="Message">
<xsl:with-param name="CASE" select="'NoHandlingUnit'" />
<xsl:with-param name="ID" select="./E1EDL20/VBELN" />
<xsl:with-param name="SSCCID" select="./E1EDL20/VBELN" />
<xsl:with-param name="POSITIONS" select="$POSITIONS" />
</xsl:call-template>
</xsl:template> </xsl:template>
<xsl:template name="HandlingUnit"> <xsl:template name="HandlingUnit">
<xsl:for-each select="./E1EDL20/E1EDL37"> <!-- Looping over all E1EDL37 segments and create a new message --> <xsl:for-each select="./E1EDL20/E1EDL37"> <!-- Looping over all E1EDL37 segments and create a new message -->
<xsl:variable name="POSITIONS"> <xsl:variable name="POSITIONS">
<xsl:for-each select="./E1EDL44"> <xsl:for-each select="./E1EDL44">
<xsl:variable name="position" select="./POSNR" /> <xsl:variable name="position" select="./POSNR" />
<XMLITEMS> <XMLITEMS>
<PositionNumber> <PositionNumber>
<xsl:value-of select="$position" /> <xsl:value-of select="$position" />
</PositionNumber> </PositionNumber>
<GTIN> <GTIN>
<xsl:value-of <xsl:value-of
select="../../E1EDL24[POSNR = $position]/EAN11" /> select="../../E1EDL24[POSNR = $position]/EAN11" />
</GTIN> </GTIN>
<DeliveredQuantity> <DeliveredQuantity>
<xsl:value-of <xsl:value-of
select="../../E1EDL24[POSNR = $position]/LGMNG" /> select="../../E1EDL24[POSNR = $position]/LGMNG" />
</DeliveredQuantity> </DeliveredQuantity>
<QuantityQualifier> <QuantityQualifier>
<xsl:call-template name="QuantityQualifier"> <xsl:call-template name="QuantityQualifier">
<xsl:with-param name="UoM"> <xsl:with-param name="UoM">
<xsl:value-of <xsl:value-of
select="../../E1EDL24[POSNR = $position]/MEINS" /> select="../../E1EDL24[POSNR = $position]/MEINS" />
</xsl:with-param> </xsl:with-param>
</xsl:call-template> </xsl:call-template>
</QuantityQualifier> </QuantityQualifier>
<DeliveryPrice></DeliveryPrice> <DeliveryPrice></DeliveryPrice>
<ReferenceSupplierOrder> <ReferenceSupplierOrder>
<xsl:value-of <xsl:value-of
select="../../E1EDL24[POSNR = $position]/VGBEL" /> select="../../E1EDL24[POSNR = $position]/VGBEL" />
</ReferenceSupplierOrder> </ReferenceSupplierOrder>
<ReferenceBuyerOrder /> <ReferenceBuyerOrder />
<xsl:if test="exists(./E1EPC03)"> <xsl:if test="exists(./E1EPC03)">
<xsl:for-each select="./E1EPC03"> <xsl:for-each select="./E1EPC03">
<XMLEPC> <XMLEPC>
<EPC> <EPC>
<xsl:value-of select="./EPC" /> <xsl:value-of select="./EPC" />
</EPC> </EPC>
</XMLEPC> </XMLEPC>
</xsl:for-each> </xsl:for-each>
</xsl:if> </xsl:if>
</XMLITEMS> </XMLITEMS>
</xsl:for-each> </xsl:for-each>
</xsl:variable> </xsl:variable>
<xsl:call-template name="Message" > <xsl:call-template name="Message">
<xsl:with-param name="CASE" select="'HandlingUnit'"/> <xsl:with-param name="CASE" select="'HandlingUnit'" />
<xsl:with-param name="ID" select="concat(../VBELN,'_',./EXIDV)"/> <xsl:with-param name="ID"
<xsl:with-param name="SSCCID" select="format-number(./EXIDV,'#')" /> select="concat(../VBELN,'_',./EXIDV)" />
<xsl:with-param name="POSITIONS" select="$POSITIONS"/> <xsl:with-param name="SSCCID"
select="format-number(./EXIDV,'#')" />
<xsl:with-param name="POSITIONS" select="$POSITIONS" />
</xsl:call-template> </xsl:call-template>
</xsl:for-each> </xsl:for-each>
</xsl:template> </xsl:template>