修改PIL EDI，修改2处，截单的15行、73B行

Myshipping.Application/EDI/PILEdiHelper.cs

@@ -912,9 +912,17 @@ namespace Myshipping.Application.EDI.PIL
                     tempstr += GetSpaceStr(bill.PLACERECEIPT, 50);//2//Origin Freeform//O//X(50)//3//52//BL location text for Port of Origin//收货地
                     tempstr += GetSpaceStr(bill.PORTLOAD, 50);//3//Load Port Freeform//O//X(50)//53//102//BL location text for Port of Load//装货港
                     tempstr += GetSpaceStr(bill.PORTDISCHARGE, 50);//4//Discharge Port Freeform//O//X(50)//103//152//BL location text for Port of Discharge//卸货港
-                    tempstr += GetSpaceStr(bill.PLACEDELIVERY, 50);//5//Destination Freeform//O//X(50)//153//202//BL location text for Port of Delivery//交货地点
+                    /*
+                     * 2023-04-04 参考韩工最新代码调整取值
+                     tempstr += GetSpaceStr(bill.PLACEDELIVERY, 50);//5//Destination Freeform//O//X(50)//153//202//BL location text for Port of Delivery//交货地点
+                    */
+                    tempstr += GetSpaceStr(bill.DESTINATION, 50);
                     tempstr += GetSpaceStr(bill.VOYNO, 30);//6//Freeform Voyage//O//X(30)//203//232//BL voyage freeform/
+                    /*
+                     * 2023-04-04 参考韩工最新代码调整去掉赋值航次号
                     tempstr += GetSpaceStr(bill.VOYNO, 30);//6//Freeform Voyage//O//X(30)//203//232//BL voyage freeform//航次
+                    */
+                    tempstr += GetSpaceStr("", 30);//6//Freeform Voyage//O//X(30)//203//232//BL voyage freeform//航次
                     tempstr += GetSpaceStr("", 18);//7//Filler//M//X(18)//233//250//Spaces
                     r.WriteLine(GetSpaceStr(tempstr, 250));
                     #endregion
@@ -1666,30 +1674,36 @@ namespace Myshipping.Application.EDI.PIL
                     ctnline = ctnline + 1;
                 }
 
-                //2023-02-23 经韩工确认这里如此处理
                 #region 73
-                tempstr = "73";//1 //RECORD_ID//M//9(2)//1 //2 //73 
-                tempstr += "B";//2 //Remarks_indicator//M//X(1)//3 //3 //O-Onhold, B-Booking, C-Customs, M-Manifest, X-Special, A-Additional, G-General, T-Transhipment, E-EDI //"73B,必填内容：1）SALES REP CODE;2）ACI HBL （1,2,3）；加拿大线的HBL3) 货物混装描述 （S0C+C0C)"//分三行
-                //3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
-                //4 //Filler//M//X(127)//124 //250 //Spaces
-                r.WriteLine(GetSpaceStr(tempstr, 250));
-
-                if (!string.IsNullOrWhiteSpace(bill.ACIHBL))
+                /*
+                 2023-04-04 73B行韩工给提供了新的代码，替换原有逻辑
+                 */
+                if (InttrEdi.filetype != "E")
                 {
                     tempstr = "73";//1 //RECORD_ID//M//9(2)//1 //2 //73 
                     tempstr += "B";//2 //Remarks_indicator//M//X(1)//3 //3 //O-Onhold, B-Booking, C-Customs, M-Manifest, X-Special, A-Additional, G-General, T-Transhipment, E-EDI //"73B,必填内容：1）SALES REP CODE;2）ACI HBL （1,2,3）；加拿大线的HBL3) 货物混装描述 （S0C+C0C)"//分三行
-                    tempstr += GetSpaceStr(bill.ACIHBL, 120);//3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
-                    //4 //Filler//M//X(127)//124 //250 //Spaces
+                                   //3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
+                                   //4 //Filler//M//X(127)//124 //250 //Spaces
                     r.WriteLine(GetSpaceStr(tempstr, 250));
-                }
 
-                if (!string.IsNullOrWhiteSpace(bill.S0CC0C))
-                {
-                    tempstr = "73";//1 //RECORD_ID//M//9(2)//1 //2 //73 
-                    tempstr += "B";//2 //Remarks_indicator//M//X(1)//3 //3 //O-Onhold, B-Booking, C-Customs, M-Manifest, X-Special, A-Additional, G-General, T-Transhipment, E-EDI //"73B,必填内容：1）SALES REP CODE;2）ACI HBL （1,2,3）；加拿大线的HBL3) 货物混装描述 （S0C+C0C)"//分三行
-                    tempstr += GetSpaceStr(bill.S0CC0C, 120);//3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
-                    //4 //Filler//M//X(127)//124 //250 //Spaces
-                    r.WriteLine(GetSpaceStr(tempstr, 250));
+
+                    if (!string.IsNullOrWhiteSpace(bill.ACIHBL))
+                    {
+                        tempstr = "73";//1 //RECORD_ID//M//9(2)//1 //2 //73 
+                        tempstr += "B";//2 //Remarks_indicator//M//X(1)//3 //3 //O-Onhold, B-Booking, C-Customs, M-Manifest, X-Special, A-Additional, G-General, T-Transhipment, E-EDI //"73B,必填内容：1）SALES REP CODE;2）ACI HBL （1,2,3）；加拿大线的HBL3) 货物混装描述 （S0C+C0C)"//分三行
+                        tempstr += GetSpaceStr(bill.ACIHBL, 120);//3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
+                                                                 //4 //Filler//M//X(127)//124 //250 //Spaces
+                        r.WriteLine(GetSpaceStr(tempstr, 250));
+                    }
+
+                    if (!string.IsNullOrWhiteSpace(bill.S0CC0C))
+                    {
+                        tempstr = "73";//1 //RECORD_ID//M//9(2)//1 //2 //73 
+                        tempstr += "B";//2 //Remarks_indicator//M//X(1)//3 //3 //O-Onhold, B-Booking, C-Customs, M-Manifest, X-Special, A-Additional, G-General, T-Transhipment, E-EDI //"73B,必填内容：1）SALES REP CODE;2）ACI HBL （1,2,3）；加拿大线的HBL3) 货物混装描述 （S0C+C0C)"//分三行
+                        tempstr += GetSpaceStr(bill.S0CC0C, 120);//3 //Remarks Text//O//X(120)//4 //123 //RemarksGetCustEdi(bill.YARD,120)
+                                                                 //4 //Filler//M//X(127)//124 //250 //Spaces
+                        r.WriteLine(GetSpaceStr(tempstr, 250));
+                    }
                 }
 
                 if (InttrEdi.filetype == "E")