#include <wobject/xstring.hpp>
|
#include <xcontrol/xtreeview.hpp>
|
#include <xcontrol/xdwgrid.hpp>
|
#include <wobject/xdouble.hpp>
|
#include <xcontrol/xlayersheet.hpp>
|
|
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
|
#include "viewobject/view.base.hpp"
|
|
using xml = KXMLDOMDocument;
|
class __declspec(dllexport) VATInvoiceNew : public xframe
|
{
|
public:
|
xdwgrid dw_1;
|
xdwgrid dw_2;
|
xlayersheet m_layer;
|
xnode m_agentNode; //Agent Condition
|
public:
|
VATInvoiceNew(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
|
public:
|
static VATInvoiceNew* CreateInstance(void* implPtr, void* hWnd)
|
{
|
VATInvoiceNew* pWin = new VATInvoiceNew(implPtr, (HWND)hWnd);
|
return pWin;
|
}
|
int SetAgent()
|
{
|
xstring xfNodeAgentArea = L"agentarea";
|
xnode anode = GetAgentNode(xfNodeAgentArea);
|
if(m_agentNode)
|
{
|
SetAgentNode (anode,m_agentNode);
|
}
|
else
|
{
|
KXMLDOMElement xframeElement = GetElement();
|
KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/"+xfNodeAgentArea+L"[1]/*");
|
if(agent)
|
{
|
xstring s = agent.xml();
|
m_agentNode = SetAgentNode (anode,s);
|
}
|
}
|
return 1;
|
}
|
|
|
int OnDoubleClicked(TEvent* evt, int p)
|
{
|
HCURSOR hCursor = xutil::SetCursorWait();
|
int col = dw_1.GetColumn();
|
//if(dw_1.GetColumnName(col)==L"Amount")
|
dw_1.ItemChangeTo(dw_1.GetRow(),L"VATBillAmount",dw_1.GetItemString(dw_1.GetRow(),L"NAmount"));
|
dw_1.Redraw();
|
xutil::RestoreCursor(hCursor);
|
return 1;
|
}
|
|
//½¹µã¼¤»î´¦Àíº¯Êý
|
int OnSetFocus(TEvent* evt, LPARAM param)
|
{
|
//ÖØÖù¤¾ßÌõ
|
//SetAgent();
|
return 1;
|
}
|
|
int ResetDataForContinue()
|
{
|
int i = 1;
|
for (i=dw_1.GetRowCount(); i>=1; i --)
|
{
|
xstring Amount = dw_1.GetItemString(i,L"VATBillAmount");
|
if (Amount != L"" && Amount != L"0.00" && Amount != L".00")
|
{
|
dw_1.DeleteRow(i);
|
}
|
}
|
for (i=dw_2.GetRowCount(); i>=1; i --)
|
{
|
dw_2.DeleteRow(i);
|
}
|
dw_1.ResetUpdateStatus();
|
dw_2.ResetUpdateStatus();
|
|
return 1;
|
}
|
|
int OnTabSelectedSheet(TEvent* evt, int p)
|
{
|
int index = m_layer.GetSheetIndex();
|
if (index == 1)
|
{
|
dw_1.AcceptText();
|
while (dw_2.GetRowCount() >0) dw_2.DeleteRow(0);
|
|
int i=0;
|
for (i=1;i <=dw_1.GetRowCount(); i++)
|
{
|
xstring Amount = dw_1.GetItemString(i,L"VATBillAmount");
|
//trace(L"\r\n"+Amount);
|
if (Amount != L"" && Amount != L"0.00" && Amount != L".00")
|
{
|
|
xstring ClassifyID = dw_1.GetItemString(i,L"NClassifyID");
|
xstring InvoiceNo = dw_1.GetItemString(i,L"NInvoiceNo");
|
if(InvoiceNo==L"") dw_1.GetItemString(i,L"InvoiceNo");
|
xstring SupplierID = dw_1.GetItemString(i,L"SupplierID");
|
xstring SupplierName = dw_1.GetItemDisplayString(i,L"SupplierID");
|
xstring GRNDate=dw_1.GetItemString(i,L"GRNDate");
|
xstring HasGRN=dw_1.GetItemString(i,L"HasGRN");
|
xstring HasGRNOne=dw_1.GetItemString(i,L"HasGRNOne");
|
xstring HasGRNTwo=dw_1.GetItemString(i,L"HasGRNTwo");
|
xstring SalespersonID=dw_1.GetItemString(i,L"SalespersonID");
|
xstring SalespersonIDName = dw_1.GetItemDisplayString(i,L"SalespersonID");
|
xstring Merchandiser=dw_1.GetItemString(i,L"Merchandiser");
|
xstring PurcharID=dw_1.GetItemString(i,L"PurcharID");
|
xstring CustomerName=dw_1.GetItemString(i,L"CustomerName");
|
int row;
|
bool inserted = false;
|
for(row = 1; row <= dw_2.GetRowCount(); row++)
|
{
|
if( InvoiceNo == dw_2.GetItemString(row,L"NInvoiceNo") && SupplierID== dw_2.GetItemString(row,L"SupplierID")) break;
|
}
|
if(row > dw_2.GetRowCount())
|
{
|
dw_2.InsertRow(0);
|
inserted = true;
|
}
|
|
if(inserted)
|
{
|
xstring VATInvoiceID = publiccode::GetGuid();
|
dw_1.SetItemString(i,L"VATInvoiceID",VATInvoiceID);
|
dw_2.SetItemString(row,L"VATInvoiceID",VATInvoiceID);
|
dw_2.SetItemString(row,L"VATSupplierID",SupplierID);
|
dw_2.SetItemDisplayString(row,L"VATSupplierID",SupplierName);
|
dw_2.SetItemString(row,L"SupplierID",SupplierID);
|
dw_2.SetItemDisplayString(row,L"SupplierID",SupplierName);
|
dw_2.SetItemString(row,L"NInvoiceNo",InvoiceNo);
|
dw_2.SetItemString(row,L"DeduceAmount",dw_1.GetItemString(i,L"DeduceAmount"));
|
dw_2.SetItemString(row,L"OverAmount",dw_1.GetItemString(i,L"OverAmount"));
|
dw_2.SetItemString(row,L"VATBillAmount",dw_1.GetItemString(i,L"VATBillAmount"));
|
dw_2.SetItemString(row,L"NetAmount",dw_1.GetItemString(i,L"NetAmount"));
|
dw_2.SetItemString(row,L"VATAmount",dw_1.GetItemString(i,L"VATAmount"));
|
dw_2.SetItemString(row,L"RefundAmount",dw_1.GetItemString(i,L"RefundAmount"));
|
xstring sdate = xstring(publiccode::GetCurrentDate()).left(10);
|
dw_2.SetItemString(row,L"CreateDate",sdate);
|
dw_2.SetItemString(row,L"VATDate",sdate);
|
dw_2.SetItemString(row,L"VATInvoiceDate",sdate);
|
dw_2.SetItemString(row,L"GRNDate",GRNDate);
|
dw_2.SetItemString(row,L"HasGRN",HasGRN);
|
dw_2.SetItemString(row,L"HasGRNOne",HasGRNOne);
|
dw_2.SetItemString(row,L"HasGRNTwo",HasGRNTwo);
|
xstring suserid = publiccode::GetUser().id;
|
xstring susername = publiccode::GetUser().name;
|
dw_2.SetItemString(row,L"CreatorID",suserid);
|
dw_2.SetItemDisplayString(row,L"CreatorID",susername);
|
dw_1.SetItemString(i,L"VATInvoiceID",VATInvoiceID);
|
dw_2.SetItemString(row,L"Salesperson",SalespersonID);
|
dw_2.SetItemDisplayString(row,L"Salesperson",SalespersonIDName);
|
dw_2.SetItemString(row,L"Merchandiser",Merchandiser);
|
dw_2.SetItemString(row,L"PurcharID",PurcharID);
|
dw_2.SetItemString(row,L"CustomerName",CustomerName);
|
}else
|
{
|
dw_1.SetItemString(i,L"VATInvoiceID",dw_2.GetItemString(row,L"VATInvoiceID"));
|
double amt = 0.0;
|
amt = dw_2.GetItemDouble(row,L"DeduceAmount");
|
amt += dw_1.GetItemDouble(i,L"DeduceAmount");
|
dw_2.SetItemDouble(row,L"DeduceAmount",amt);
|
|
amt = dw_2.GetItemDouble(row,L"OverAmount");
|
amt += dw_1.GetItemDouble(i,L"OverAmount");
|
dw_2.SetItemDouble(row,L"OverAmount",amt);
|
|
amt = dw_2.GetItemDouble(row,L"RefundAmount");
|
amt += dw_1.GetItemDouble(i,L"RefundAmount");
|
dw_2.SetItemDouble(row,L"RefundAmount",amt);
|
|
amt = dw_2.GetItemDouble(row,L"VATBillAmount");
|
amt += dw_1.GetItemDouble(i,L"VATBillAmount");
|
dw_2.SetItemDouble(row,L"VATBillAmount",amt);
|
|
amt = dw_2.GetItemDouble(row,L"NetAmount");
|
amt += dw_1.GetItemDouble(i,L"NetAmount");
|
dw_2.SetItemDouble(row,L"NetAmount",amt);
|
|
amt = dw_2.GetItemDouble(row,L"VATAmount");
|
amt += dw_1.GetItemDouble(i,L"VATAmount");
|
dw_2.SetItemDouble(row,L"VATAmount",amt);
|
}
|
}
|
}
|
}
|
return 1;
|
}
|
|
int OnSave(bool continueAdd)
|
{
|
dw_1.AcceptText();
|
dw_2.AcceptText();
|
xstring error;
|
xstring str;
|
xml x;
|
xaserverarg arg;
|
|
dw_1.DwUpdateAllToEx(x);
|
xml x0;
|
|
x0.loadXML(L"<data/>");
|
|
KXMLDOMNodeList t = x.selectNodes(L"data/Item[@update.modify]");
|
KXMLDOMElement e1= x0.documentElement();
|
int len = t.length();
|
for(int i=0;i<len;i++)
|
{
|
e1.appendChild(t.item(i));
|
}
|
arg.AddArg(L"content",x0.xml());
|
|
|
if(xurl::get(L"/sale/data/VATNotify/base/update", arg.GetString(),x0)!=1)
|
{
|
error = x0.text();
|
alert(L"err:"+error);
|
return 1;
|
}
|
str = x0.documentElement().getAttribute(L"text");
|
if(str != L"true")
|
{
|
alert(L"±£´æʧ°Ü!");
|
return 1;
|
}
|
|
dw_2.DwUpdateAllToEx(x);
|
arg.AddArg(L"content",x.xml());
|
|
|
if(xurl::get(L"/sale/data/VATNotify/vatinvoice/update", arg.GetString(),x)!=1)
|
{
|
error = x.text();
|
alert(L"err:"+error);
|
return 1;
|
}
|
str = x.documentElement().getAttribute(L"text");
|
if(str != L"true")
|
{
|
alert(L"±£´æʧ°Ü!");
|
return 1;
|
}
|
|
dw_1.ResetUpdateStatus();
|
dw_2.ResetUpdateStatus();
|
|
if(!continueAdd)
|
{
|
alert(L"±£´æ³É¹¦!");
|
CloseWindow();
|
}
|
else
|
{
|
ResetDataForContinue();
|
m_layer.SelectSheet(0);
|
}
|
return 1;
|
}
|
|
//ÃüÁî·¢²¼º¯Êý
|
int OnCmdDispatch(xstring comdid)
|
{
|
int index;
|
if (comdid==L"xmPrev")
|
{
|
index = m_layer.GetSheetIndex();
|
index --;
|
m_layer.SelectSheet(index);
|
}
|
else if (comdid==L"xmNext")
|
{
|
index = m_layer.GetSheetIndex();
|
index ++;
|
m_layer.SelectSheet(index);
|
}
|
else if(comdid==L"xmCancel")
|
{
|
CloseWindow();
|
return 1;
|
}
|
else if(comdid==L"xmOk")
|
{
|
return OnSave(false);
|
}
|
else if(comdid==L"xmOkEx")
|
{
|
return OnSave(true);
|
}
|
else if(comdid==L"xmQuery")
|
{
|
OnRetrieve();
|
return 1;
|
}
|
return 0;
|
}
|
|
int RecalcVatAmt(int row)
|
{
|
double VatRate = dw_1.GetItemDouble(row,L"VATRate");
|
if((int)(VatRate*100) < 1) VatRate = 13.0;
|
double VATRefundRate = dw_1.GetItemDouble(row,L"VATRefundRate");
|
double billAmt = dw_1.GetItemDouble(row,L"VATBillAmount");
|
double VatAmt = billAmt /(100.0+VatRate)*VatRate;
|
double VATRefundAmt = billAmt /(100.0+VatRate)*VATRefundRate;
|
dw_1.SetItemDouble(row,L"VATAmount",VatAmt);
|
dw_1.SetItemDouble(row,L"RefundAmount",VATRefundAmt);
|
dw_1.SetItemDouble(row,L"NetAmount",billAmt - VatAmt);
|
return 1;
|
}
|
|
int OnItemChanged(TEvent* evt, LPARAM p)
|
{
|
DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
|
xstring colname=hdr.colname;
|
xstring value = hdr.data;
|
int row = hdr.row;
|
|
if(value==L"") return 1;
|
if(colname==L"VATAmount")
|
{
|
double VATAmount=dw_1.GetItemDouble(row,L"VATAmount");
|
double billAmtt= dw_1.GetItemDouble(row,L"VATBillAmount");
|
|
double v4= billAmtt - VATAmount;
|
int v5=(int)VATAmount;
|
if(v5>=0){
|
dw_1.SetItemDouble(row,L"NetAmount",v4);
|
dw_1.Redraw();
|
}
|
}
|
else if(colname==L"VATBillAmount")
|
{
|
RecalcVatAmt(row);
|
|
if(value==L"" || value==L"0.00" || value==L".00")
|
{
|
dw_1.SetItemString(row,L"OverAmount",L"");
|
dw_1.SetItemString(row,L"DeduceAmount",L"");
|
dw_1.SetItemString(row,L"VATBillAmount",L"");
|
}else
|
{
|
double NAmount = dw_1.GetItemDouble(row,L"NAmount");
|
double billAmt = dw_1.GetItemDouble(row,L"VATBillAmount");
|
double Amt = NAmount - billAmt ;
|
int v1 =(int) Amt;
|
int v2 = (int)(billAmt - NAmount);
|
if(v2 < 0) v2 = - v2;
|
if(v1 <0 || v2<49 )
|
{
|
dw_1.SetItemDouble(row,L"OverAmount",billAmt - NAmount);
|
dw_1.SetItemString(row,L"DeduceAmount",L"");
|
}
|
else
|
{
|
dw_1.SetItemString(row,L"OverAmount",L"");
|
dw_1.SetItemDouble(row,L"DeduceAmount", NAmount - billAmt);
|
}
|
}
|
dw_1.Redraw();
|
/*
|
if ldec_notifyamt - dec(data) < 0 or abs(dec(data) - ldec_notifyamt)<=49 then
|
this.setItem(row,'kkamt',0)
|
this.setItem(row,'dkamt',dec(data) - ldec_notifyamt)
|
else
|
this.setItem(row,'dkamt',0)
|
this.setItem(row,'kkamt',ldec_notifyamt - dec(data))
|
end if
|
|
ll_decrate = this.getitemdecimal(row,'retax')
|
ll_incrate = this.getitemdecimal(row,'incrate')
|
if isnull(ll_decrate) then ll_decrate = 13
|
if isnull(ll_incrate) or ll_incrate=0 then ll_incrate = 17
|
this.setitem(row,'retaxamt',this.getItemDecimal(row,'billamt')/(100+ll_incrate)*ll_decrate)
|
this.setitem(row,'inctaxamt',this.getItemDecimal(row,'billamt')/(100+ll_incrate)*ll_incrate)
|
end if
|
|
if dwo.name='kkamt' or dwo.name='dkamt' then
|
ls_prdname = this.object.supplier_cname[row]
|
if isnull(ls_prdname) then ls_prdname = ''
|
if ls_prdname <> '' then
|
ls_firstName = LeftW (trim(ls_prdname), 2)
|
ls_lastName = rightW (trim(ls_prdname), 1)
|
ls_comName = ls_firstName + ls_lastName
|
end if
|
|
if ls_comName <> '²úÆ·²¿' then
|
this.setitem(row,'billamt',dec(this.Describe(L"evaluate('notifybuyamt - if(isnull(kkamt),0,kkamt) + if(isnull(dkamt),0,dkamt)',L"+xstring(row)+L")")))
|
else
|
this.setitem(row,'billamt',dec(this.Describe(L"evaluate('prd_nbuyamt - if(isnull(kkamt),0,kkamt) + if(isnull(dkamt),0,dkamt)',L"+xstring(row)+L")")))
|
end if
|
|
ll_decrate = this.getitemdecimal(row,'retax')
|
ll_incrate = this.getitemdecimal(row,'incrate')
|
if isnull(ll_decrate) then ll_decrate = 13
|
if isnull(ll_incrate) or ll_incrate=0 then ll_incrate = 17
|
this.setitem(row,'retaxamt',this.getItemDecimal(row,'billamt')/(100+ll_incrate)*ll_decrate)
|
this.setitem(row,'inctaxamt',this.getItemDecimal(row,'billamt')/(100+ll_incrate)*ll_incrate)
|
*/
|
}
|
else if(colname==L"DeduceAmount" || colname==L"OverAmount")
|
{
|
double dAmt = dw_1.GetItemDouble(row,L"DeduceAmount");
|
double oAmt = dw_1.GetItemDouble(row,L"OverAmount");
|
double nAmt = dw_1.GetItemDouble(row,L"NAmount");
|
dw_1.SetItemDouble(row,L"VATBillAmount",nAmt + oAmt - dAmt);
|
RecalcVatAmt(row);
|
dw_1.Redraw();
|
}
|
return 1;
|
}
|
|
int OnItemChangedTwo(TEvent* evt, LPARAM p)
|
{
|
DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
|
xstring colname=hdr.colname;
|
xstring value = hdr.data;
|
|
|
if (colname == L"RefundAmount")
|
{
|
double RefundAmount2 = dw_2.GetItemDouble(hdr.row,L"RefundAmount");
|
dw_2.SetItemDouble(hdr.row,L"TaxfundAmount", xdouble((RefundAmount2)).round(2));
|
}
|
|
double RefundAmount= dw_2.GetItemDouble(hdr.row,L"RefundAmount");
|
double TaxfundAmount1 = dw_2.GetItemDouble(hdr.row,L"TaxfundAmount");
|
//trace(L"RefundAmount+=+++L"+RefundAmount.toString()+L"====TaxfundAmount1+++L"+TaxfundAmount1.toString());
|
if(TaxfundAmount1 ==0.00)
|
{
|
dw_2.SetItemDouble(hdr.row,L"TaxfundAmount", xdouble((RefundAmount)).round(2));
|
}
|
if (colname == L"TaxfundAmount" || colname == L"AlreadyRefundAmount" || colname == L"RefundAmount")
|
{
|
double TaxfundAmount = dw_2.GetItemDouble(hdr.row,L"TaxfundAmount");
|
double AlreadyRefundAmount = dw_2.GetItemDouble(hdr.row,L"AlreadyRefundAmount");
|
dw_2.SetItemDouble(hdr.row,L"NotRefundAmount", xdouble((TaxfundAmount - AlreadyRefundAmount)).round(2));
|
}
|
return 1;
|
}
|
//ÃüÁî´¦Àíʼþ
|
int OnXCommand(TEvent* evt, LPARAM param)
|
{
|
return OnCmdDispatch(evt->xcommand.pStrID);
|
}
|
|
int OnAttachEvent()
|
{
|
//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
|
AttachEvent(L"WM_XCOMMAND", (FEvent)&VATInvoiceNew::OnXCommand);
|
//»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ
|
AttachEvent(L"WM_SETFOCUS", (FEvent)&VATInvoiceNew::OnSetFocus);
|
AttachEvent(L"dw_1",L"DWV_DOUBLECLICKED", (FEvent)&VATInvoiceNew::OnDoubleClicked);//ÐÐË«»÷
|
AttachEvent(L"dw_1",L"DWV_ITEMCHANGED", (FEvent)&VATInvoiceNew::OnItemChanged);
|
AttachEvent(L"dw_2",L"DWV_ITEMCHANGED", (FEvent)&VATInvoiceNew::OnItemChangedTwo);
|
AttachEvent(L"tab_1", L"LYSN_SELECTEDSHEET", (FEvent)&VATInvoiceNew::OnTabSelectedSheet);
|
return 1;
|
}
|
|
int OnRetrieve()
|
{
|
xml x;
|
xaserverarg arg;
|
|
arg.AddArg(L"QueryTxt",xcontrol(GetControl(L"sle_search")).GetText());
|
arg.AddArg(L"QueryArg",L"<arg/>");
|
if (getUrl(L"/sale/data/VATNotify/list/novatinvoice",arg.GetString(),x)!=1)
|
{
|
trace(x.text());
|
return -1;
|
}else
|
{
|
//alert(x.GetXml());
|
dw_1.Retrieve(x);
|
dw_1.Redraw();
|
}
|
return 1;
|
}
|
|
int onload()
|
{
|
m_layer = GetControl(L"tab_1");
|
dw_1 = GetControl(L"dw_1");
|
dw_1.openUrl(L"/sale/view/VATNotify/template/VATInvoice/ImportList1");
|
|
dw_1.SetColumnState(L"GRNDate",false);
|
dw_1.SetColumnState(L"NSupplierID",false);
|
|
dw_2 = GetControl(L"dw_2");
|
dw_2.openUrl(L"/sale/view/VATNotify/template/VATInvoice/ImportList2");
|
|
dw_2.SetColumnState(L"GRNDate",false);
|
dw_2.SetColumnState(L"NSupplierID",false);
|
|
|
xml x;
|
xaserverarg arg = GetArg();
|
if(arg)
|
{
|
xstring InvoiceNo = arg.GetArgString(L"InvoiceNo");
|
x = ViewObject::RetrieveData(L"/sale/data/VATNotify/list/novatinvoice",L"QueryTxt",InvoiceNo,L"QueryArg",L"<arg/>");
|
if(x)dw_1.Retrieve(x);
|
}
|
OnAttachEvent();
|
//OnRetrieve();
|
return 1;
|
}
|
|
int onloaded()
|
{
|
//SetAgent();
|
return 1;
|
}
|
};
|
