选择多重惊吓充电时重复的项目

2020-09-29 21:38发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中) 专家们 具有通过Cry...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


专家们

具有通过Crystal Report打印出采购订单的存储过程

现在在打印中有问题,

当我在采购订单中使用多个Fright费用和多个项目时,根据选择的Fright数量,该操作会重复出现

例如:如果我在PO中使用一项,并且如果我有2种不同类型的Fright,例如"门到门收费"和"文件收费"

该项目将以相同的数量和相同的速率显示2次,

请通过编辑帮助我解决此问题

查看查询和所附的屏幕截图

致谢

 走
/******对象:StoredProcedure [dbo]。[spPurchaseOrder]脚本日期:2017年1月25日12:05:51 PM ******/
 设置ANSI_NULLS OFF
 走
 将QUOTED_IDENTIFIER设置为ON
 走
 变更程序
 [dbo]。[spPurchaseOrder](@DocNUM int)
 如
 
  开始
  


 选择OPOR.DocEntry,OPOR.CardCode,OPOR.CardName,OPOR.DocNum,OPOR.DocDate,OPOR.NumAtCard AS"供应商参考",OPOR.DocDueDate,
 notull(POR12.StreetS,'')+''+ isull(POR12.StreetNoS,'')+''+ isnull(POR12.BlockS,'')+''+ isull(POR12.CityS,'')+'  '+ isull(POR12.ZipCodeS,'')+''+
 isull(POR12.CountryS,'')AS'发送地址',isnull(OPOR.PAYTOCODE,'')+''+ isnull(POR12.StreetB,'')+''+ isull(POR12.StreetNoB,''  )
 +''+ isnull(POR12.BlockB,'')+''+ isull(POR12.CityB,'')+''+ isull(POR12.ZipCodeB,'')+''+
 notull(POR12.CountryB,'')AS'Bill/Pay To Address',POR1.ItemCode,POR1.Dscription,POR1.Quantity,
 POR1.Price,(POR1.Quantity * POR1.Price),AS为"行总计",OPOR.DocCur,OPOR.DocTotal为" Docuemnt本国货币",OPOR.DocTotalFC为" Docuemnt总外币"
 ,OITM.BuyUnitMsr AS'UOM',OPOR.DiscSumFC AS'Discount%Forgine Currency',
 OPOR.DiscSum AS'Discount%Local Currency',OPOR.TotalExpns,
 POR3.TotalFrgn'运费',OPOR。注释为'文档备注',
 OSHP.TrnspName作为"运输类型",OCTG.PymntGroup作为"付款条款",
 isull(OHEM.firstName,'')+''+ isnull(OHEM.middleName,'')+''+ isnull(OHEM.lastName,'')AS'Requester',
 OSLP.slpName为"销售员工姓名",OCRD.CntctPrsn为" @供应商联系人",OPOR.Header为"备注(H)",OPOR.Footer AS为"备注(F)",OPRJ.PrjCode为" ProjCode"  ,
 OPRJ.PrjName AS'ProjeName',isnull(OWHS.WhsName,'')+''+ isnull(OWHS.Street,'')+''+ isnull(OWHS.Street,'')+''+ isnull(OWHS  .Block,'')+''+ isnull(OWHS.City,'')+''+
 notull(OWHS.County,'')AS'仓库地址',OPOR.Address,OPOR.Address2,OPOR.DiscPrcnt为'折扣%',OPOR.U_LocalDel为'本地交货地址',
 OPOR.U_DeliverAt作为"国际递送",OCRD.Phone1作为" Telephone1",OCRD.Phone1作为" Telephone2",OCRD.Fax,OCRD.E_Mail,OCRD.CntctPrsn作为"联系人姓名",
 NNM1.SeriesName为" PO系列",OITM.U_LongDesc为"详细说明",OPOR.DocType为" DocType",POR1.U_srv_qty为" Sty数量",POR3.ExpnsCode


         来自OPOR


 在OPOR.DocEntry = por12.DocEntry上左联接por12
 在OPOR上左加入POR1。  DocEntry = POR1.DocEntry
 左连接OITM ON POR1.ItemCode = OITM.ItemCode
 在OPOR.DocEntry = POR3.DocEntry上左联接POR3
 左联接OSHP ON OPOR.TrnspCode = OSHP.TrnspCode
 左加入OCTG ON OPOR.GroupNum = OCTG.GroupNum
 在OPOR.OWNERCODE = OHEM.EMPID上左加入OHEM
 左联接OSLP ON OPOR.SlpCode = oslp.SlpCode
 左加入OCRD ON OPOR.CARDCODE = OCRD.CARDCODE
 在POR1.Project = OPRJ.PrjCode上左联接OPRJ
 在POR1.WhsCode = OWHS.WhsCode上左加入OWHS
 在OPOR.Series = NNM1.Series上左加入NNM1


     其中OPOR.DocEntry=@DocNUM
 
  结束
  返回


 

(60.9 kB)
6条回答
樱桃小丸子0093
2020-09-29 22:33

尝试一下,

 GO
/******对象:StoredProcedure [dbo]。[spPurchaseOrder]脚本日期:01/25/201712:05:51 PM ******/SET ANSI_NULLS OFF
 走
 将QUOTED_IDENTIFIER设置为ON
 走
 ALTER PROCEDURE [dbo]。[spPurchaseOrder](@ DocNUM int)ASBeginselect OPOR.DocEntry,OPOR.CardCode,OPOR.CardName,OPOR.DocNum,OPOR.DocDate,OPOR.NumAtCard AS'Vendor Ref',OPOR.DocDueDate,
 notull(POR12.StreetS,'')+''+ isull(POR12.StreetNoS,'')+''+ isnull(POR12.BlockS,'')+''+ isull(POR12.CityS,'')+'  '+ isull(POR12.ZipCodeS,'')+''+
 isull(POR12.CountryS,'')AS'Ship To Address',isnull(OPOR.PAYTOCODE,'')+''+ isnull(POR12.StreetB,'')+''+ isull(POR12.StreetNoB,''  )+''+ isnull(POR12.BlockB,'')+''+ isull(POR12.CityB,'')+''+ isull(POR12.ZipCodeB,'')+''+
 notull(POR12.CountryB,'')AS'Bill/Pay To Address',POR1.ItemCode,POR1.Dscription,POR1.Quantity,
 POR1。价格,(POR1。数量* POR1。价格)AS'Line Total',OPOR.DocCur,OPOR.DocTotal为'Docuemnt本币总额',OPOR.DocTotalFC为'Docuemnt外币总额',OITM.BuyUnitMsr AS'  UOM',OPOR.DiscSumFC AS'Discount%Forgine Currency',
 OPOR.DiscSum AS'Discount%Local Currency',OPOR.TotalExpns,
 POR3.TotalFrgn'运费',OPOR.Comments作为'文档备注',
 OSHP.TrnspName作为"运输类型",OCTG.PymntGroup作为"付款条款",
 isull(OHEM.firstName,'')+''+ isnull(OHEM.middleName,'')+''+ isnull(OHEM.lastName,'')AS'Requester',
 OSLP.slpName作为"销售员工名称",OCRD.CntctPrsn作为" @供应商联系人",OPOR.Headeras"备注(H)",OPOR.Footer AS"备注(F)",OPRJ.PrjCode作为" ProjCode",
 OPRJ.PrjName AS'ProjeName',isnull(OWHS.WhsName,'')+''+ isnull(OWHS.Street,'')+''+ isnull(OWHS.Street,'')+''+ isnull(OWHS  .Block,'')+''+ isnull(OWHS.City,'')+''+
 notull(OWHS.County,'')AS'仓库地址',OPOR.Address,OPOR.Address2,OPOR.DiscPrcnt作为'折扣%',OPOR.U_LocalDel作为'本地交货地址',
 OPOR.U_Deliver作为"国际传递",OCRD.Phone1作为" Telephone1",OCRD.Phone1作为" Telephone2",OCRD.Fax,OCRD.E_Mail,OCRD.CntctPrsn作为"联系人姓名",
 NNM1.SeriesName为" PO系列",OITM.U_LongDesc为"详细说明",OPOR.DocType为" DocType",POR1.U_srv_qty为"服务数量",POR3.ExpnsCode
         来自OPOR
 在OPOR.DocEntry = por12.DocEntry上加入por12
 在OPOR上内部加入POR1。  DocEntry = POR1.DocEntry
 内连接OITM ON POR1.ItemCode = OITM.ItemCode
 内部在OPOR.DocEntry = POR3.DocEntry上加入POR3
 左联接OSHP ON OPOR.TrnspCode = OSHP.TrnspCode
 左加入OCTG ON OPOR.GroupNum = OCTG.GroupNum
 在OPOR.OWNERCODE = OHEM.EMPID上左加入OHEM
 左联接OSLP ON OPOR.SlpCode = oslp.SlpCode
 左加入OCRD ON OPOR.CARDCODE = OCRD.CARDCODE
 在POR1.Project = OPRJ.PrjCode上左联接OPRJ
 在POR1.WhsCode = OWHS.WhsCode上左加入OWHS
 在OPOR.Series = NNM1.Series上左加入NNM1
     其中OPOR.DocEntry=@DocNUM
 
  结束

 返回

 

一周热门 更多>