Great Plains定制? 编程在应收帐款的自动申请
微软Great Plains是三个微软企业解答中间市场ERP产品之一: Great Plains, Solomon, Navision。 考虑Great Plains现在是非常综合化的好候选人与POS应用,例如微软零售管理系统或RMS和客户联系系统,例如微软CRM ? 有在Great Plains定制的共同的需要,并且综合化,特别是在MS SQL服务器上的水平办理SQL询问和存储过程。
在这篇小文章上我们将显示您如何创造自动申请公共事业,当您集成销售交易和付款的巨大数目。 我们与RM20101一起使用? 可接收打开文件和RM20201 ? 可接收应用打开文件。
我们看SQL代码:
宣称数字的@curpmtamt (19,5)
宣称数字的@curinvamt (19,5)
宣称varchar的@curpmtnum (20)
宣称varchar的@curinvnum (20)
宣称@curinvtype int
宣称@curpmttype int
宣称@maxid int
宣称@counter int
-- 创造一个临时表
创造桌#temp
(
[ID] int身分(1,1)主关键字,
varchar的CUSTNMBR (15),
varchar的INVNUM (20),
INVTYPE int,
varchar的PMTNUM (20),
PMTTYPE int,
数字的INVAMT (19,5),
数字的PMTAMT (19,5),
数字的AMTAPPLIED (19,5)
)
创造在#temp (INVNUM)的索引IDX_INVNUM
创造在#temp (PMTNUM)的索引IDX_PMTNUM
-- 插入未应用的发货票和付款
插入入#temp
(
CUSTNMBR,
INVNUM,
INVTYPE,
PMTNUM,
PMTTYPE,
INVAMT,
PMTAMT,
AMTAPPLIED
)
选择
CUSTNMBR = a.CUSTNMBR,
INVNUM = b.DOCNUMBR,
INVTYPE = b.RMDTYPAL,
PMTNUM = a.DOCNUMBR,
PMTTYPE = a.RMDTYPAL,
INVAMT = b.CURTRXAM,
PMTAMT = a.CURTRXAM,
AMTAPPLIED = 0
从RM20101 a
加入RM20101 b在(a.CUSTNMBR = b.CUSTNMBR)
加入RM00101 c在(a.CUSTNMBR = c.CUSTNMBR)
那里
a.RMDTYPAL (7, 8, 9)和
b.RMDTYPAL (1, 3)和
a.CURTRXAM 0和
b.CURTRXAM 0
命令
a.custnmbr,
b.DOCDATE,
a.DOCDATE,
a.DOCNUMBR,
b.DOCNUMBR
-- 通过每个纪录重复
选择@maxid =最大([ID])
从#temp
选择@counter = 1
当@counter = @curpmtamt)和(@curpmtamt>0)时和(@curinvamt>0)-- 如果发票金额是伟大或相同的与付款数额
开始
选择@curinvamt = @curinvamt - @curpmtamt -- 发票金额保持
-- 与被申请于当前发货票的数额的更新
-- 经常开支
更新#temp
集合
AMTAPPLIED = @curpmtamt
那里
[ID] = @counter
-- 与相当数量的更新发货票保持
更新#temp
集合
INVAMT = @curinvamt
那里
INVNUM = @curinvnum和
INVTYPE = @curinvtype
-- 与相当数量的更新付款保持
更新#temp
集合
PMTAMT = 0
那里
PMTNUM = @curpmtnum和
PMTTYPE = @curpmttype
末端
如果(@curinvamt 0)和(@curinvamt>0)-- 如果发票金额是较少对付款数额
开始
选择@curpmtamt = @curpmtamt - @curinvamt -- 付款数额保持
-- 与被申请于当前发货票的数额的更新
-- 经常开支
更新#temp
集合
AMTAPPLIED = @curinvamt
那里
[ID] = @counter
-- 与相当数量的更新发货票保持
更新#temp
集合
INVAMT = 0
那里
INVNUM = @curinvnum和
INVTYPE = @curinvtype
-- 与相当数量的更新付款保持
更新#temp
集合
PMTAMT = @curpmtamt
那里
PMTNUM = @curpmtnum和
PMTTYPE = @curpmttype
末端
-- 去下个纪录
选择@counter = @counter + 1
末端
-- 更新与正确数额的RM开放桌
更新
RM20101
集合
CURTRXAM = b.INVAMT
从
RM20101 a
加入#temp b在(a.DOCNUMBR = b.INVNUM和a.RMDTYPAL = b.INVTYPE)
更新
RM20101
集合
CURTRXAM = b.PMTAMT
从
RM20101 a
加入#temp b在(a.DOCNUMBR = b.PMTNUM和a.RMDTYPAL = b.PMTTYPE)
-- 如果纪录已经存在,创造RM应用纪录或更新
更新
RM20201
集合
DATE1 =改变信仰者(varchar (10), getdate (), 101),
GLPOSTDT =改变信仰者(varchar (10), getdate (), 101),
APPTOAMT = APPTOAMT + a.AMTAPPLIED,
ORAPTOAM = ORAPTOAM + a.AMTAPPLIED,
APFRMAPLYAMT = APFRMAPLYAMT + a.AMTAPPLIED,
ActualApplyToAmount = APFRMAPLYAMT + a.AMTAPPLIED
从
#temp a
加入RM20101 b在(b.DOCNUMBR = a.INVNUM和b.RMDTYPAL = a.INVTYPE)
加入RM20101 c在(c.DOCNUMBR = a.PMTNUM和c.RMDTYPAL = a.PMTTYPE)
加入RM20201 d (d.APFRDCTY = a.PMTTYPE和
d.APFRDCNM = a.PMTNUM和
d.APTODCTY = a.INVTYPE和
d.APTODCNM = a.INVNUM)
那里
a.AMTAPPLIED 0
插入物到RM20201里
(CUSTNMBR,
DATE1,
GLPOSTDT,
张贴,
APTODCNM,
APTODCTY,
APTODCDT,
ApplyToGLPostDate,
CURNCYID,
CURRNIDX,
APPTOAMT,
ORAPTOAM,
APFRDCNM,
APFRDCTY,
APFRDCDT,
ApplyFromGLPostDate,
FROMCURR,
APFRMAPLYAMT,
ActualApplyToAmount)
精选
CUSTNMBR = a.CUSTNMBR,
DATE1 =改变信仰者(varchar (10), getdate (), 101),
GLPOSTDT =改变信仰者(varchar (10), getdate (), 101),
张贴的= 1,
APTODCNM = a.INVNUM,
APTODCTY = a.INVTYPE,
APTODCDT = b.DOCDATE,
ApplyToGLPostDate = b.GLPOSTDT,
CURNCYID = b.CURNCYID,
CURRNIDX = ",
APPTOAMT = a.AMTAPPLIED,
ORAPTOAM = a.AMTAPPLIED,
APFRDCNM = a.PMTNUM,
APFRDCTY = a.PMTTYPE,
APFRDCDT = c.DOCDATE,
ApplyFromGLPostDate = c.GLPOSTDT,
FROMCURR = c.CURNCYID,
APFRMAPLYAMT = a.AMTAPPLIED,
ActualApplyToAmount = a.AMTAPPLIED
从
#temp a
加入RM20101 b在(b.DOCNUMBR = a.INVNUM和b.RMDTYPAL = a.INVTYPE)
加入RM20101 c在(c.DOCNUMBR = a.PMTNUM和c.RMDTYPAL = a.PMTTYPE)
那里
a.AMTAPPLIED 0和
没有存在(选择1
从RM20201 d
那里d.APFRDCTY = a.PMTTYPE和
d.APFRDCNM = a.PMTNUM和
d.APTODCTY = a.INVTYPE和
d.APTODCNM = a.INVNUM)
下落桌#temp
关于作者
安德鲁Karasev是首要技术官员在晨曲光谱技术? 美国全国性Great Plains,微软CRM定制公司,与办公室在芝加哥,旧金山,洛杉矶,圣迭戈,菲尼斯,休斯敦,迈阿密,亚特兰大,纽约,马德里,巴西,莫斯科(
http://www.albaspectrum.com),您能到达安德鲁1-866-528-0577,他是手巧、SQL、C#.Net,水晶报告和微软CRM SDK开发商;
akarasev@albaspectrum.com
文章来源: Messaggiamo.Com
Related:
» Seo Elite: New Seo Software!
» AntiSpywareBOT
» Reverse Mobile
» Error Nuker
网管得到HTML代码
加上这条到你的网站!
网站管理员提交你的文章
无须登记!填写好的表格和你的文章是在 Messaggiamo.Com 目录!