From 0cf1357666ac40c941f884a45ebc2706553738a0 Mon Sep 17 00:00:00 2001
From: hongjli <3117313295@qq.com>
Date: 星期三, 13 九月 2023 17:25:55 +0800
Subject: [PATCH] 面板物料Rest配置

---
 _Main/BL/Type_GlobalDTOTable/Method_ReceivingPanelMaterials.qbl |   13 +++++--------
 1 files changed, 5 insertions(+), 8 deletions(-)

diff --git a/_Main/BL/Type_GlobalDTOTable/Method_ReceivingPanelMaterials.qbl b/_Main/BL/Type_GlobalDTOTable/Method_ReceivingPanelMaterials.qbl
index cf331b0..ee27ddc 100644
--- a/_Main/BL/Type_GlobalDTOTable/Method_ReceivingPanelMaterials.qbl
+++ b/_Main/BL/Type_GlobalDTOTable/Method_ReceivingPanelMaterials.qbl
@@ -6,16 +6,13 @@
 {
   TextBody:
   [*
-    info( requestnvt.ToString() );
-    
     logfile( "--------------------------------------1------------------------------------------------" );
-    body := LibInt_MessageAccessor::GetBodyValueAsString( requestnvt );
-    rep := LibInt_MessageAccessor::CreateEmptyMessage();
-    LibInt_MessageAccessor::SetBodyValueAsString( rep, body );
-    logfile( "--------------------------------------2------------------------------------------------" );
-    info( rep.ToString() );
+    nameValue := requestnvt.Root();
+    info( nameValue.ToString() );
     
+    replynvt := LibInt_MessageAccessor::CreateEmptyMessage();
+    LibInt_MessageAccessor::SetHeaderProperty( replynvt, "Content-Type", "application/json" );
     
-    return emit( rep );
+    return emit( replynvt );
   *]
 }

--
Gitblit v1.9.3