You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

77 lines
2.1 KiB

1 year ago
  1. --Exec PROC_PARTNER_RECONCILIATION @user='admin' ,@controlNo='80121788012' ,@pAgent='601349'
  2. alter PROC PROC_PARTNER_RECONCILIATION
  3. (
  4. @user VARCHAR(100)
  5. ,@controlNo VARCHAR(100) = null
  6. ,@pSuperAgent VARCHAR(20) = null
  7. ,@flag VARCHAR(20) = NULL
  8. ,@PaidDate VARCHAR(10) = null
  9. )
  10. AS
  11. SET NOCOUNT ON;
  12. SET XACT_ABORT ON;
  13. BEGIN
  14. IF @flag = 'partnerList-recon' ----## API PARTNER LIST FOR CHECKING DIRECT reconciliation
  15. BEGIN
  16. SELECT agentId AS [VALUE],agentName AS [TEXT]
  17. FROM agentMaster(NOLOCK)
  18. WHERE parentId = 0 AND agentType='2902'
  19. AND isActive = 'Y' AND AGENTID IN( 590851,601353)
  20. RETURN
  21. END
  22. IF @pSuperAgent=590851 --====KASIKORNBANK PUBLIC CO. LTD.===
  23. BEGIN
  24. IF EXISTS (SELECT 'X' FROM remittran(NOLOCK) WHERE controlNo= dbo.fnaencryptstring(@controlNo)
  25. AND payStatus = 'Post' AND tranStatus='Payment' AND pSuperAgent = @pSuperAgent
  26. )
  27. BEGIN
  28. UPDATE remitTran SET
  29. payStatus = 'Paid',
  30. tranStatus = 'Paid',
  31. paidBy = 'system',
  32. paidDate = @PaidDate,
  33. paidDateLocal = @PaidDate
  34. WHERE controlno = dbo.FNAEncryptString(@controlNo)
  35. AND payStatus = 'Post'
  36. AND tranStatus='Payment'
  37. AND pSuperAgent = @pSuperAgent
  38. EXEC proc_errorHandler 0, 'Update status sucessfully.', @controlNo
  39. RETURN
  40. END
  41. ELSE
  42. BEGIN
  43. EXEC proc_errorHandler 1, 'No Record found.', @controlNo
  44. RETURN
  45. END
  46. END
  47. IF @pSuperAgent=601353 ----====Lyhour---====-------
  48. BEGIN
  49. IF EXISTS (SELECT 'X' FROM remittran(NOLOCK) WHERE contno= @controlNo
  50. AND payStatus = 'Post' AND tranStatus='Payment' AND pSuperAgent = @pSuperAgent)
  51. BEGIN
  52. UPDATE remitTran SET
  53. payStatus = 'Paid',
  54. tranStatus = 'Paid',
  55. paidBy = 'system',
  56. paidDate = ISNULL(@PaidDate,approvedDate),
  57. paidDateLocal = ISNULL(@PaidDate,approvedDate)
  58. WHERE ContNo = @controlNo
  59. AND payStatus = 'Post'
  60. AND tranStatus ='Payment'
  61. AND pSuperAgent = @pSuperAgent
  62. EXEC proc_errorHandler 0, 'Update status sucessfully.', @controlNo
  63. RETURN
  64. END
  65. ELSE
  66. BEGIN
  67. EXEC proc_errorHandler 1, 'No Record found.', @controlNo
  68. RETURN
  69. END
  70. END
  71. END