@ -44,8 +44,8 @@ namespace NFine.Application.WMS
for ( int i = 0 ; i < Sapdt1 . Rows . Count ; i + + )
{
var code = Sapdt1 . Rows [ i ] [ "ApplyCode" ] . ToString ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = Sapdt1 . Rows [ i ] [ "ApplyCode" ] . ToString ( ) ;
Info . STATE = "0" ;
@ -58,9 +58,9 @@ namespace NFine.Application.WMS
{
throw new Exception ( "单据查询失败" ) ; //单据查询失败
}
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
foreach ( DataRow dr in Sapdt . Rows )
{
@ -74,8 +74,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "IssueQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dr [ "ApplyCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "IssueQuantity" ] . ToString ( ) ) , 3 ) ;
@ -105,13 +105,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -161,14 +161,14 @@ namespace NFine.Application.WMS
chksql = string . Format ( chksql , dt . Rows [ j ] [ "ApplyCode" ] . ToString ( ) , dt . Rows [ j ] [ "WorkPoint" ] . ToString ( ) ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ j ] [ "ApplyCode" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ " select A.ApplyCode,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.IssueQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode , A . ID , A . WorkPoint , A . WHCode from ICSOApply A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -187,8 +187,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "IssueQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dr [ "ApplyCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "IssueQuantity" ] . ToString ( ) ) , 3 ) ;
@ -214,13 +214,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -259,16 +259,16 @@ namespace NFine.Application.WMS
GROUP BY SDNCode , WorkPoint ";
chksql = string . Format ( chksql , dt . Rows [ i ] [ "SDNCode" ] . ToString ( ) , dt . Rows [ i ] [ "WorkPoint" ] . ToString ( ) ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ Client = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ1 Info = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ1 ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD > headlist = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD > ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD head = new SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ Client = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ1 Info = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ1 ( ) ;
List < SAPCallBackDispatchVPN . ZWMS_DO_HEAD > headlist = new List < SAPCallBackDispatchVPN . ZWMS_DO_HEAD > ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_HEAD head = new SAPCallBackDispatchVPN . ZWMS_DO_HEAD ( ) ;
head . VBELN = dt . Rows [ i ] [ "SDNCode" ] . ToString ( ) ;
headlist . Add ( head ) ;
Info . T_HEAD = headlist . ToArray ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM > ItemList = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM > ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR > ItemLineList = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR > ( ) ;
Info . T_RETURN = new SAPCallBackDispatchVPNCS . ZWMS_DO_RETURN [ 1 ] ;
List < SAPCallBackDispatchVPN . ZWMS_DO_ITEM > ItemList = new List < SAPCallBackDispatchVPN . ZWMS_DO_ITEM > ( ) ;
List < SAPCallBackDispatchVPN . ZWMS_DO_GERNR > ItemLineList = new List < SAPCallBackDispatchVPN . ZWMS_DO_GERNR > ( ) ;
Info . T_RETURN = new SAPCallBackDispatchVPN . ZWMS_DO_RETURN [ 1 ] ;
sql = @ " select A.ID,A.WorkPoint,A.WHCode, A.SDNCode,A.InvCode,A.SAPSequence,A.Sequence,A.Quantity,A.SDNQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode from ICSSDN A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -287,8 +287,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "SDNQuantity" ] . ToDecimal ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR ItemLine = new SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM Item = new SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_GERNR ItemLine = new SAPCallBackDispatchVPN . ZWMS_DO_GERNR ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_ITEM Item = new SAPCallBackDispatchVPN . ZWMS_DO_ITEM ( ) ;
Item . VBELN = dr [ "SDNCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LFIMG = System . Decimal . Round ( Convert . ToDecimal ( dr [ "SDNQuantity" ] . ToString ( ) ) , 3 ) ;
@ -314,9 +314,9 @@ namespace NFine.Application.WMS
{
Info . T_GERNR = ItemLineList . ToArray ( ) ;
}
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZResponse result = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZResponse ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZResponse result = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZResponse ( ) ;
result = Client . CallZWMS_SK_DO_GZ ( Info ) ;
foreach ( SAPCallBackDispatchVPNCS . ZWMS_DO_RETURN resultItem in result . T_RETURN )
foreach ( SAPCallBackDispatchVPN . ZWMS_DO_RETURN resultItem in result . T_RETURN )
{
if ( resultItem . ZFLG = = "N" )
{
@ -356,14 +356,14 @@ namespace NFine.Application.WMS
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
if ( Convert . ToDecimal ( chkdt . Rows [ 0 ] [ "Quantity" ] ) ! = Convert . ToDecimal ( chkdt . Rows [ 0 ] [ "OutQuantity" ] ) )
{
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ i ] [ "OutCode" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ "select A.ID, A.OutCode,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.OutQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode , A . WorkPoint , A . WHCode from ICSOtherOut A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -382,8 +382,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "OutQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dr [ "OutCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "OutQuantity" ] . ToString ( ) ) , 3 ) ;
@ -412,13 +412,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -455,14 +455,14 @@ namespace NFine.Application.WMS
chksql = string . Format ( chksql , dt . Rows [ i ] [ "TransferNO" ] . ToString ( ) , dt . Rows [ i ] [ "WorkPoint" ] . ToString ( ) ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ i ] [ "TransferNO" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ " select A.ID,A.WorkPoint,A.FromWarehouseCode, A.TransferNO,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.TransferQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode from ICSTransfer A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -481,8 +481,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "TransferQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dr [ "TransferNO" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "TransferQuantity" ] . ToString ( ) ) , 3 ) ;
@ -511,13 +511,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -583,15 +583,15 @@ namespace NFine.Application.WMS
sqlString . Append ( $@"DELETE FROM ICSDeliveryNotice WHERE ID='{id}';" ) ;
sqlString . Append ( $@"INSERT INTO ICSDeleteReceiptsLog VALUES(NEWID(),'{dnCode}','{sequence}','13','{workPoint}','{invCode}',{dnQuantity},null,'{MUSER}','{MUSERNAME}','{MTime}');" ) ;
SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKU Client = new SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKU ( ) ;
SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKU1 Info = new SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKU1 ( ) ;
SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKU Client = new SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKU ( ) ;
SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKU1 Info = new SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKU1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . PRUEFLOS = Sapdt . Rows [ 0 ] [ "DNCode" ] . ToString ( ) ;
Info . L_LME = System . Decimal . Round ( Convert . ToDecimal ( Sapdt . Rows [ 0 ] [ "RCVQuantity" ] . ToString ( ) ) , 3 ) ;
Info . SERNP = Sapdt . Rows [ 0 ] [ "BatchCode" ] . ToString ( ) ;
Info . Z_GERNR = new SAPCallBackJYHGDVPNCS . ZWEBS_GERNR [ 0 ] ;
Info . Z_GERNR = new SAPCallBackJYHGDVPN . ZWEBS_GERNR [ 0 ] ;
SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKUResponse result = new SAPCallBackJYHGDVPNCS . ZWMS_SK_WS_RUKUResponse ( ) ;
SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKUResponse result = new SAPCallBackJYHGDVPN . ZWMS_SK_WS_RUKUResponse ( ) ;
result = Client . CallZWMS_SK_WS_RUKU ( Info ) ;
if ( result . Z_NULL = = "N" )
{
@ -628,14 +628,14 @@ namespace NFine.Application.WMS
chksql = string . Format ( chksql , dt . Rows [ i ] [ "RCVCode" ] . ToString ( ) , dt . Rows [ i ] [ "WorkPoint" ] . ToString ( ) ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ i ] [ "RCVCode" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ "select A.ID,A.WorkPoint,A.WHCode,A.RCVCode,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.RCVQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode from ICSManufactureReceive A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -654,8 +654,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "RCVQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dr [ "RCVCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "RCVQuantity" ] . ToString ( ) ) , 3 ) ;
@ -684,13 +684,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -731,14 +731,14 @@ namespace NFine.Application.WMS
GROUP BY InCode , WorkPoint ";
chksql = string . Format ( chksql , applyCode , applyWorkPoint ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ i ] [ "InCode" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ "select A.InCode,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.InQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode , A . ID , A . WHCode , A . WorkPoint from ICSOtherIn A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -757,8 +757,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "InQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dnCode ;
Item . POSNR = sequence ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "InQuantity" ] . ToString ( ) ) , 3 ) ; ;
@ -786,13 +786,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -841,14 +841,14 @@ namespace NFine.Application.WMS
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZ1 ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ Client = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 Info = new SAPCallBackDocVPN . ZWMS_SK_WS_PZ1 ( ) ;
Info . NEWID = Guid . NewGuid ( ) . ToString ( ) ;
Info . DANJU = dt . Rows [ i ] [ "ApplyNegCode" ] . ToString ( ) ;
Info . STATE = "0" ;
List < SAPCallBackDocVPNCS . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPNCS . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPNCS . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPNCS . ZWEB_RETURN [ 1 ] ;
List < SAPCallBackDocVPN . ZWMS_PZ > ItemList = new List < SAPCallBackDocVPN . ZWMS_PZ > ( ) ;
List < SAPCallBackDocVPN . ZWEBS_GERNR > ItemLineList = new List < SAPCallBackDocVPN . ZWEBS_GERNR > ( ) ;
Info . Z_FLAG = new SAPCallBackDocVPN . ZWEB_RETURN [ 1 ] ;
sql = @ " select A.ApplyNegCode,B.SAPSequence,B.InvCode,B.Sequence,B.Quantity,B.IssueNegQuantity
, ISNULL ( C . BatchCode , ' ' ) AS BatchCode , B . WorkPoint , B . ID , B . WHCode from ICSMOApplyNeg A
LEFT JOIN ICSMOApplyNegDetail B ON B . ApplyNegCode = A . ApplyNegCode AND B . WorkPoint = A . WorkPoint
@ -868,8 +868,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "IssueNegQuantity" ] . ToDecimal ( ) = = 0 ? 0 : dr [ "IssueNegQuantity" ] . ToDecimal ( ) ;
SAPCallBackDocVPNCS . ZWMS_PZ Item = new SAPCallBackDocVPNCS . ZWMS_PZ ( ) ;
SAPCallBackDocVPNCS . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPNCS . ZWEBS_GERNR ( ) ;
SAPCallBackDocVPN . ZWMS_PZ Item = new SAPCallBackDocVPN . ZWMS_PZ ( ) ;
SAPCallBackDocVPN . ZWEBS_GERNR ItemLine = new SAPCallBackDocVPN . ZWEBS_GERNR ( ) ;
Item . DANJU = dnCode ;
Item . POSNR = sequence ;
Item . LINGYSL = System . Decimal . Round ( Convert . ToDecimal ( dr [ "IssueNegQuantity" ] . ToString ( ) ) , 3 ) ;
@ -898,13 +898,13 @@ namespace NFine.Application.WMS
}
else
{
Info . Z_GERNR = new SAPCallBackDocVPNCS . ZWEBS_GERNR [ 1 ] ;
Info . Z_GERNR = new SAPCallBackDocVPN . ZWEBS_GERNR [ 1 ] ;
}
SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPNCS . ZWMS_SK_WS_PZResponse ( ) ;
SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse result = new SAPCallBackDocVPN . ZWMS_SK_WS_PZResponse ( ) ;
result = Client . CallZWMS_SK_WS_PZ ( Info ) ;
if ( result . Z_NULL = = "N" )
{
foreach ( SAPCallBackDocVPNCS . ZWEB_RETURN resultItem in result . Z_FLAG )
foreach ( SAPCallBackDocVPN . ZWEB_RETURN resultItem in result . Z_FLAG )
{
IsSuccess = "N" ;
ErrorMessage + = resultItem . L_MESSAGE + "/r/n" ;
@ -942,16 +942,16 @@ namespace NFine.Application.WMS
chksql = string . Format ( chksql , dt . Rows [ i ] [ "SDNCode" ] . ToString ( ) , dt . Rows [ i ] [ "WorkPoint" ] . ToString ( ) ) ;
DataTable chkdt = Repository ( ) . FindDataSetBySql ( chksql ) . Tables [ 0 ] ;
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ Client = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ1 Info = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZ1 ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD > headlist = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD > ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD head = new SAPCallBackDispatchVPNCS . ZWMS_DO_HEAD ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ Client = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ1 Info = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZ1 ( ) ;
List < SAPCallBackDispatchVPN . ZWMS_DO_HEAD > headlist = new List < SAPCallBackDispatchVPN . ZWMS_DO_HEAD > ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_HEAD head = new SAPCallBackDispatchVPN . ZWMS_DO_HEAD ( ) ;
head . VBELN = dt . Rows [ i ] [ "SDNCode" ] . ToString ( ) ;
headlist . Add ( head ) ;
Info . T_HEAD = headlist . ToArray ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM > ItemList = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM > ( ) ;
List < SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR > ItemLineList = new List < SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR > ( ) ;
Info . T_RETURN = new SAPCallBackDispatchVPNCS . ZWMS_DO_RETURN [ 1 ] ;
List < SAPCallBackDispatchVPN . ZWMS_DO_ITEM > ItemList = new List < SAPCallBackDispatchVPN . ZWMS_DO_ITEM > ( ) ;
List < SAPCallBackDispatchVPN . ZWMS_DO_GERNR > ItemLineList = new List < SAPCallBackDispatchVPN . ZWMS_DO_GERNR > ( ) ;
Info . T_RETURN = new SAPCallBackDispatchVPN . ZWMS_DO_RETURN [ 1 ] ;
sql = @ " select A.ID,A.WorkPoint,A.WHCode, A.SDNCode,A.SAPSequence,A.InvCode,A.Sequence,A.Quantity,A.SDNQuantity
, ISNULL ( B . BatchCode , ' ' ) AS BatchCode from ICSSDN A
LEFT JOIN ICSExtension B ON B . ID = A . ExtensionID AND B . WorkPoint = A . WorkPoint
@ -970,8 +970,8 @@ namespace NFine.Application.WMS
string sequence = dr [ "SAPSequence" ] . ToString ( ) ;
string batchCode = dr [ "BatchCode" ] . ToString ( ) ;
decimal dnQuantity = dr [ "SDNQuantity" ] . ToDecimal ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM Item = new SAPCallBackDispatchVPNCS . ZWMS_DO_ITEM ( ) ;
SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR ItemLine = new SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_ITEM Item = new SAPCallBackDispatchVPN . ZWMS_DO_ITEM ( ) ;
SAPCallBackDispatchVPN . ZWMS_DO_GERNR ItemLine = new SAPCallBackDispatchVPN . ZWMS_DO_GERNR ( ) ;
Item . VBELN = dr [ "SDNCode" ] . ToString ( ) ;
Item . POSNR = dr [ "SAPSequence" ] . ToString ( ) ;
Item . LFIMG = System . Decimal . Round ( Convert . ToDecimal ( dr [ "SDNQuantity" ] . ToString ( ) ) , 3 ) ;
@ -999,11 +999,11 @@ namespace NFine.Application.WMS
}
else
{
Info . T_GERNR = new SAPCallBackDispatchVPNCS . ZWMS_DO_GERNR [ 1 ] ;
Info . T_GERNR = new SAPCallBackDispatchVPN . ZWMS_DO_GERNR [ 1 ] ;
}
SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZResponse result = new SAPCallBackDispatchVPNCS . ZWMS_SK_DO_GZResponse ( ) ;
SAPCallBackDispatchVPN . ZWMS_SK_DO_GZResponse result = new SAPCallBackDispatchVPN . ZWMS_SK_DO_GZResponse ( ) ;
result = Client . CallZWMS_SK_DO_GZ ( Info ) ;
foreach ( SAPCallBackDispatchVPNCS . ZWMS_DO_RETURN resultItem in result . T_RETURN )
foreach ( SAPCallBackDispatchVPN . ZWMS_DO_RETURN resultItem in result . T_RETURN )
{
if ( resultItem . ZFLG = = "N" )
{