SalesRegister:
ClassDeclaration:
[SRSReportQueryAttribute (querystr(SalesRegisterQueryMT)), //My Query
SRSReportParameterAttribute(classStr(SSrsRdpContractSales))] //class name
//class SSrsSalesReqRDP extends SRSReportDataProviderBase
class SSrsSalesReqRDP extends SrsReportDataProviderPreProcess
{
SalesReqTmp salesReqTmp;
InventDim inventDim;
CustInvoiceTrans custInvoiceTrans;
CustInvoiceJour custInvoiceJour;
SalesTable salesTable;
CustPackingSlipJour custPackingSlipJour;
CustTable custTable;
SalesLine salesLine;
TaxTrans taxTrans;
MarkupTrans markupTrans;
DirPartyTable dirPartyTable;
InventTable inventTable;
UnitOfMeasureConversion unitOfMeasureConversion;
EcoResProduct ecoResProduct;
LogisticsPostalAddress logisticsPostalAddress;
}
AmountCur:
public TaxRegulationAmountCur amountCur(TaxTrans _taxTrans)
{
return _taxTrans.SourceRegulateAmountCur * -1;
}
displaySourceRegulateAmountCur:
public TaxRegulationAmountCur displaySourceRegulateAmountCur(TaxTrans _taxTrans)
{
return _taxTrans.SourceRegulateAmountCur * 1;
}
getSalesReqTmp:
[SRSReportDataSetAttribute("SalesReqTmp")] //tmp table
Public SalesReqTmp getSalesReqTmp()
{
select * from salesReqTmp;
return salesReqTmp;
}
insertTmpTable:
public void insertTmpTable()
{
CustInvoiceTrans custInvoiceTransLoc;
MarkupTrans markuptransLoc;
salesTable = salesTable::find(custInvoiceTrans.SalesId);
custPackingSlipJour = custPackingSlipJour::findFromSalesId(salesTable.SalesId);
// custPackingSlipJour = custPackingSlipJour::findFromCustPackingSlipTrans();
custInvoiceJour = custInvoiceJour::findFromCustInvoiceTrans(custInvoiceTrans.SalesId,custInvoiceTrans.InvoiceId,custInvoiceTrans.InvoiceDate,custInvoiceTrans.numberSequenceGroup);
custTable = custTable::find(custInvoiceJour.InvoiceAccount);
salesLine = salesLine::findItemIdInventDimId(custInvoiceTrans.SalesId,custInvoiceTrans.ItemId,custInvoiceTrans.InventDimId);
//taxTrans = Taxtrans::find(custInvoiceJour.LedgerVoucher, custInvoiceJour.InvoiceDate);
//suresh:moldtek second modification for finance people
select * from dirPartyTable
where dirPartyTable.RecId == custTable.Party;
select * from inventTable
where inventTable.ItemId == salesLine.ItemId;
ecoResProduct = EcoResProduct::find(inventTable.Product);
select * from unitOfMeasureConversion
where unitOfMeasureConversion.Product == ecoResProduct.RecId;
if(unitOfMeasureConversion.Factor)
salesReqTmp.Factor = custInvoiceTrans.Qty / unitOfMeasureConversion.Factor;
salesReqTmp.ItemBuyerGroupId = inventTable.ItemBuyerGroupId;
//**********
select markuptransLoc
where markuptransLoc.TransTableId == custInvoiceTrans.TableId
&& markuptransLoc.TransRecId == custInvoiceTrans.RecId;
salesReqTmp.FrieghtValue = custInvoiceTrans.Qty * markuptransLoc.Value;// _custInvoiceJour.SumMarkup;
//salesReqTmp.FrieghtValue = custInvoiceJour.SumMarkup;
salesReqTmp.County = custTable.countyName();
salesReqTmp.MTCustECCNo = custInvoiceJour.EccNo();
salesReqTmp.MTCustTINNo = custInvoiceJour.CustTinNo();
salesReqTmp.MTName = dirPartyTable.Name;
salesReqTmp.CustGroup = custTable.CustGroup;
//suresh:moldtek second modification for finance people
salesReqTmp.InventSiteId = inventDim.InventSiteId;
salesReqTmp.SalesId = custInvoiceTrans.SalesId;
//salesReqTmp.salesTableCreateDattime = salesTable.createdDateTime;
salesReqTmp.InvoiceAccount = custInvoiceTrans.InvoiceId;
salesReqTmp.PackingSlipId = custPackingSlipJour.PackingSlipId;
salesReqTmp.DeliveryDate = custPackingSlipJour.DeliveryDate;
salesReqTmp.InvoiceId = custInvoiceTrans.InvoiceId;
salesReqTmp.InvoiceDate = custInvoiceJour.InvoiceDate;
salesReqTmp.InvoiceAccount = custInvoiceJour.InvoiceAccount;
salesReqTmp.Name = salesTable.SalesName;
//salesReqTmp.LocationOfcustor = custTable.addressCounty();
salesReqTmp.AccountNum = custTable.AccountNum;
salesReqTmp.PaymTermId = custTable.PaymTermId;
salesReqTmp.RegistrationNumber = salesTable.eccNum();
salesReqTmp.SODate = salesTable.MTcreateDate();
salesReqTmp.SalesName = salesTable.SalesName;
salesReqTmp.PurchaseOrder = custInvoiceJour.PurchaseOrder;
salesReqTmp.PODate = salesTable.PODate;
salesReqTmp.TaxGroup = salesLine.TaxGroup;
salesReqTmp.ItemId = salesLine.ItemId;
salesReqTmp.itemName = salesLine.Name;
salesReqTmp.ItemGroupId = InventItemGroupItem::findByItemIdLegalEntity(salesLine.ItemId).ItemGroupId;
salesReqTmp.InventSizeId = inventDim.InventSizeId;
salesReqTmp.Qty = custInvoiceTrans.Qty;
salesReqTmp.SalesUnit = custInvoiceTrans.SalesUnit;
salesReqTmp.CurrencyCode = custInvoiceTrans.CurrencyCode;
salesReqTmp.SalesPrice = custInvoiceTrans.SalesPrice;
salesReqTmp.LineAmount = custInvoiceTrans.lineAmountInclTax();
salesReqTmp.ConsigneeLocation = LogisticsPostalAddress::findRecId(salesLine.DeliveryPostalAddress).County;
taxTrans.clear();
salesReqTmp.BEDTaxCode = "";
salesReqTmp.BedAmount = 0;
salesReqTmp.EcessTaxCode = "";
salesReqTmp.ECessAmount = 0;
salesReqTmp.SHECessTaxCode = "";
salesReqTmp.SHECessAmount = 0;
salesReqTmp.VATTaxCode = "";
salesReqTmp.VATAmount = 0;
salesReqTmp.CSTTaxcode = "";
salesReqTmp.CSTTaxAmount = 0;
salesReqTmp.EDTaxCode = "";
salesReqTmp.EDAmount = 0;
salesReqTmp.OctroiTaxCode = "";
salesReqTmp.OctroiAmount = 0;
while select taxTrans
where taxTrans.Voucher == custInvoiceJour.LedgerVoucher
&& taxTrans.InventTransId == custInvoiceTrans.InventTransId
{
if(taxTrans.TaxCode like "BED*")
{
salesReqTmp.BEDTaxCode = taxTrans.TaxCode;
salesReqTmp.BedAmount = this.amountCur(taxTrans);
}
//Moldtek added by Suresh 08-03-2015 start
if(taxTrans.TaxCode like "ED*")
{
salesReqTmp.EDTaxCode = taxTrans.TaxCode;
salesReqTmp.EDAmount = this.amountCur(taxTrans);
}
if(taxTrans.TaxCode like "Octroi*")
{
salesReqTmp.OctroiTaxCode = taxTrans.TaxCode;
salesReqTmp.OctroiAmount = this.amountCur(taxTrans);
}
//Moldtek added by Suresh 08-03-2015 end
if(taxTrans.TaxCode like "ECESS*")
{
salesReqTmp.EcessTaxCode = taxTrans.TaxCode;
salesReqTmp.ECessAmount = this.amountCur(taxTrans);
}
if(taxTrans.TaxCode like "SHECESS*")
{
salesReqTmp.SHECessTaxCode = taxTrans.TaxCode;
salesReqTmp.SHECessAmount = this.amountCur(taxTrans);
}
if(taxTrans.TaxCode like "VAT*")
{
salesReqTmp.VATTaxCode = taxTrans.TaxCode;
salesReqTmp.VATAmount = this.amountCur(taxTrans);
}
if(taxTrans.TaxCode like "CST*")
{
salesReqTmp.CSTTaxcode = taxTrans.TaxCode;
salesReqTmp.CSTTaxAmount = this.amountCur(Taxtrans);
}
}
salesReqTmp.insert();
}
processReport:
[SysEntryPointAttribute(false)]
public void processReport()
{
QueryRun queryRun;
Query query;// = new Query();
// Get the query from the runtime using a dynamic query.
delete_from salesReqTmp;
query = this.parmQuery();
queryRun = new QueryRun(query);
ttsbegin;
while (queryRun.next())
{
inventDim = queryRun.get(tableNum(InventDim));
custInvoiceTrans = queryRun.get(tableNum(custInvoiceTrans));
this.insertTmpTable();
}
ttsCommit;
}
SSrsRdpContractSales:
[DataContractAttribute]
class SSrsRdpContractSales
{
TransDate fromDate;
}
PurchaseRegister
ClassDeclaration:
[SRSReportQueryAttribute (querystr(MTPurchReg)), //My Query
SRSReportParameterAttribute(classStr(SSrsRdpContractPurch))] //class name
class SSrsPurchReqRDP extends SRSReportDataProviderBase
//class SSrsPurchReqRDP extends SrsReportDataProviderPreProcess
{
PurchaseReqTmp purchaseReqTmp;
InventDim inventDim;
VendInvoiceTrans vendInvoiceTrans;
VendInvoiceJour vendInvoiceJour;
PurchTable purchTable;
VendPackingSlipJour vendPackingSlipJour;
VendTable vendTable;
PurchLine purchLine;
TaxTrans taxTrans;
MarkupTrans markupTrans;
PurchParmTable purchParmTable;
}
displaySourceRegulateAmountCur:
public TaxRegulationAmountCur displaySourceRegulateAmountCur(TaxTrans _taxTrans)
{
return _taxTrans.SourceRegulateAmountCur * 1;
}
getPurchaseReqTmp:
[SRSReportDataSetAttribute("PurchaseReqTmp")] //tmp table
Public PurchaseReqTmp getPurchaseReqTmp()
{
select * from purchaseReqTmp;
return purchaseReqTmp;
}
insertTmpTable:
public void insertTmpTable()
{
PurchReqTable purchReqTable;
VendPackingSlipTrans vendPackingSlipTrans;
InventTrans inventTrans;
purchaseReqTmp.clear();
taxTrans.clear();
purchTable = PurchTable::find(vendInvoiceTrans.PurchID);
vendPackingSlipJour = VendPackingSlipJour::findFromPurchId(vendInvoiceTrans.PurchID);
vendInvoiceJour = VendInvoiceJour::findFromVendInvoiceTrans(vendInvoiceTrans.PurchID,vendInvoiceTrans.InvoiceId,
vendInvoiceTrans.InvoiceDate,vendInvoiceTrans.numberSequenceGroup,
vendInvoiceTrans.InternalInvoiceId);
vendTable = VendTable::find(vendInvoiceJour.InvoiceAccount);
purchLine = PurchLine::find(purchTable.PurchId);
select PackingSlipId from vendPackingSlipTrans
where vendPackingSlipTrans.InventDimId == vendInvoiceTrans.InventDimId
&& vendPackingSlipTrans.InventTransId == vendInvoiceTrans.InventTransId
&& vendPackingSlipTrans.ItemId == vendInvoiceTrans.ItemId
&& vendPackingSlipTrans.OrigPurchid == vendInvoiceTrans.PurchID
&& vendPackingSlipTrans.LineNum == vendInvoiceTrans.LineNum;
purchaseReqTmp.InventSiteId = inventDim.InventSiteId;
purchaseReqTmp.PurchId = vendInvoiceTrans.PurchID;
purchaseReqTmp.PODate = DateTimeUtil::date(purchTable.createdDateTime);
purchaseReqTmp.PurchTableCreateDattime = purchTable.createdDateTime;
purchaseReqTmp.InvoiceAccount = vendInvoiceTrans.InvoiceId;
purchaseReqTmp.PackingSlipId = vendPackingSlipTrans.PackingSlipId;
purchaseReqTmp.DeliveryDate = vendPackingSlipJour.DeliveryDate;
purchaseReqTmp.InvoiceId = vendInvoiceTrans.InvoiceId;
purchaseReqTmp.InvoiceDate = vendInvoiceJour.InvoiceDate;
purchaseReqTmp.InvoiceAccount = vendInvoiceJour.InvoiceAccount;
purchaseReqTmp.Name = purchTable.PurchName;
purchaseReqTmp.TaxItemGroup = vendInvoiceTrans.TaxItemGroup;
purchaseReqTmp.LocationOfVendor = vendTable.addressCounty();
purchaseReqTmp.VendorTinNo = vendTable.getTaxRegistrationNumber();
purchaseReqTmp.RegistrationNumber = purchTable.eccNum();
purchaseReqTmp.TaxGroup = vendInvoiceTrans.TaxGroup;
purchaseReqTmp.ItemId = vendInvoiceTrans.ItemId;
purchaseReqTmp.itemName = vendInvoiceTrans.Name;
purchaseReqTmp.ItemGroupId = InventItemGroupItem::findByItemIdLegalEntity(purchLine.ItemId).ItemGroupId;
purchaseReqTmp.InventSizeId = inventDim.InventSizeId;
purchaseReqTmp.Qty = vendInvoiceTrans.Qty;
purchaseReqTmp.PurchUnit = vendInvoiceTrans.PurchUnit;
purchaseReqTmp.CurrencyCode = vendInvoiceTrans.CurrencyCode;
purchaseReqTmp.PurchPrice = vendInvoiceTrans.PurchPrice;
purchaseReqTmp.LineAmount = vendInvoiceTrans.lineAmountInclTax();
/*select * from purchParmTable
where purchParmTable.PurchId == purchTable.PurchId;*/
purchaseReqTmp.SecurityGateDate = vendPackingSlipJour.getSecurityGateDate();
purchaseReqTmp.SecurityGateNo = vendPackingSlipJour.getSecurityGateNumber();
while select markupTrans
where markupTrans.TransTableId == vendInvoiceTrans.TableId
&& markupTrans.TransRecId == vendInvoiceTrans.RecId
{
if ((markupTrans.MarkupCode =="Freight") && (markupTrans.MarkupCategory == MarkupCategory::Fixed))
{
purchaseReqTmp.FrieghtValue = markupTrans.Value;
}
if ((markupTrans.MarkupCode == "Freight") && (markupTrans.MarkupCategory == MarkupCategory::Pcs))
{
purchaseReqTmp.FrieghtValue = markupTrans.Value * vendInvoiceTrans.Qty;
}
}
select PurchReqId from purchLine
where purchLine.PurchId == vendInvoiceTrans.PurchID &&
purchLine.ItemId == vendInvoiceTrans.ItemId;
purchaseReqTmp.PurchReqId = purchLine.PurchReqId;
select SubmittedDateTime from purchReqTable
where purchReqTable.PurchReqId == purchLine.PurchReqId;
purchaseReqTmp.IndentDate = DateTimeUtil::date(purchReqTable.SubmittedDateTime);
if (vendInvoiceTrans.TaxItemGroup)
{
taxTrans.clear();
purchaseReqTmp.BEDTaxCode = "";
purchaseReqTmp.BedAmount = 0;
purchaseReqTmp.EDTaxCode = "";
purchaseReqTmp.EDAmount = 0;
purchaseReqTmp.EcessTaxCode = "";
purchaseReqTmp.ECessAmount = 0;
purchaseReqTmp.SHECessTaxCode = "";
purchaseReqTmp.SHECessAmount = 0;
purchaseReqTmp.VATTaxCode = "";
purchaseReqTmp.VATAmount = 0;
purchaseReqTmp.CSTTaxCode = "";
purchaseReqTmp.CSTAmount = 0;
purchaseReqTmp.OctroiTaxCode = "";
purchaseReqTmp.OctroiAmount = 0;
while select taxTrans
where
taxTrans.Voucher == vendInvoiceJour.LedgerVoucher &&
taxTrans.TransDate == vendInvoiceJour.InvoiceDate &&
taxTrans.InventTransId == vendInvoiceTrans.InventTransId
{
if(taxTrans.TaxCode like "BED*")
{
purchaseReqTmp.BEDTaxCode = taxTrans.TaxCode;
purchaseReqTmp.BedAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "ED*")
{
purchaseReqTmp.EDTaxCode = taxTrans.TaxCode;
purchaseReqTmp.EDAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "ECESS*")
{
purchaseReqTmp.EcessTaxCode = taxTrans.TaxCode;
purchaseReqTmp.ECessAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "SHECESS*")
{
purchaseReqTmp.SHECessTaxCode = taxTrans.TaxCode;
purchaseReqTmp.SHECessAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "VAT*")
{
purchaseReqTmp.VATTaxCode = taxTrans.TaxCode;
purchaseReqTmp.VATAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "CST*")
{
purchaseReqTmp.CSTTaxCode = taxTrans.TaxCode;
purchaseReqTmp.CSTAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
if(taxTrans.TaxCode like "Octroi*")
{
purchaseReqTmp.OctroiTaxCode = taxTrans.TaxCode;
purchaseReqTmp.OctroiAmount = this.displaySourceRegulateAmountCur(taxTrans);
}
}
}
purchaseReqTmp.insert();
}
processReport:
[SysEntryPointAttribute(false)]
public void processReport()
{
QueryRun queryRun;
Query query;// = new Query();
// Get the query from the runtime using a dynamic query.
query = this.parmQuery();
queryRun = new QueryRun(query);
ttsbegin;
while (queryRun.next())
{
//purchTable = queryRun.get(tableNum(PurchTable));
//vendInvoiceJour = queryRun.get(tableNum(VendInvoiceJour));
inventDim = queryRun.get(tableNum(InventDim));
vendInvoiceTrans = queryRun.get(tableNum(VendInvoiceTrans));
this.insertTmpTable();
}
ttsCommit;
}
SSrsRdpContractPurch:
[DataContractAttribute]
class SSrsRdpContractPurch
{
InventSiteId site;
startdate datetrans;
}
SSrsRdpContractPurch:
[DataContractAttribute]
class SSrsRdpContractPurch
{
InventSiteId site;
startdate datetrans;
}
DeliveryChallan
ClassDeclaration:
[SRSReportQueryAttribute (querystr(DeliveryChalanaMT)), //My Query
//[
SRSReportParameterAttribute(classStr(DeliverychalanaContract)) //class name
]
class DeliveryChalanaRDP extends SRSReportDataProviderBase
//class DeliveryChalanaRDP extends SrsReportDataProviderPreProcess
{
CustPackingSlipJour custPackingSlipJour, custPackingSlipJourLoc;
CustPackingSlipTrans custPackingSlipTrans,custPackingSlipTransLoc;
InventDim inventDim, inventDimloc;
DirPartyPostalAddressView dirPartyPostalAddressView,dirPartyPostalAddressViewCustomer;
SalesLine salesLine;
SalesTable salesTable;
CustInvoiceJour custInvoiceJour;
TaxRegistrationNumbers_IN taxRegistrationNumbers_IN;
SalesParmTable salesParmTable;
TaxInformation_IN taxInformation_IN;
NumberOfRecords rows;
DeliveryChalanaHeaderFooterTmp deliveryChalanaHeaderFooterTmp;
DeliveryChalanaTmp deliveryChalanaTmp;
DeliverychalanaContract contract;
PackingSlipId packingSlipId;
}
buildQuery:
private Query buildQuery(Query _query,PackingSlipId _packingSlipId)
{
if(_packingSlipId!="")
_query.dataSourceTable(tablenum(CustPackingSlipJour), 1).addRange(fieldnum(CustPackingSlipJour,PackingSlipId)).value(queryValue(_packingSlipId));
return _query;
}
getDataFromContract:
public void getDataFromContract(PackingSlipId _packingSlipId)
{
//contract = this.parmDataContract() as DeliverychalanaContract;
packingSlipId = _packingSlipId;
}
getDeliveryChalanaHeaderFooterTmp;
[SRSReportDataSetAttribute(tableStr(DeliveryChalanaHeaderFooterTmp))]
public DeliveryChalanaHeaderFooterTmp getDeliveryChalanaHeaderFooterTmp()
{
select * from deliveryChalanaHeaderFooterTmp;
return deliveryChalanaHeaderFooterTmp;
}
getDeliveryChalanaTmp:
[SRSReportDataSetAttribute(tableStr(DeliveryChalanaTmp))]
public DeliveryChalanaTmp getDeliveryChalanaTmp()
{
select * from deliveryChalanaTmp;
return deliveryChalanaTmp;
}
getReportParameters:
private void getReportParameters()
{
DeliverychalanaContract deliverychalanaContract = this.parmDataContract();
if (deliverychalanaContract)
{
packingSlipId=deliverychalanaContract.parmPackingSlipId();
}
}
insertIntoDeliveryChalanaTMP:
public void insertIntoDeliveryChalanaTMP()
{
inventDimloc = InventDim::find(inventDim.inventDimId);
custPackingSlipJour= custPackingSlipJour::findFromCustPackingSlipTrans(custPackingSlipTrans.SalesId,
custPackingSlipTrans.PackingSlipId,
custPackingSlipTrans.DeliveryDate);
if (!rows)
{
rows = 1;
}
else
{
rows++;
}
if (custPackingSlipTrans)
{
select custPackingSlipTransLoc
where custPackingSlipTransLoc.RecId == custPackingSlipTrans.RecId;
}
select * from custPackingSlipJourLoc
where custPackingSlipJourLoc.RecId == custPackingSlipJour.RecId;
DeliveryChalanaTmp.SlNo = rows;
deliveryChalanaTmp.Jar = custPackingSlipTrans.JarPacking;
deliveryChalanaTmp.Cap = custPackingSlipTrans.CapPacking;
deliveryChalanaTmp.Description = InventTable::find(custPackingSlipTrans.ItemId).itemName();
deliveryChalanaTmp.Qty = custPackingSlipTrans.Qty;
deliveryChalanaTmp.SalesUnit = custPackingSlipTrans.SalesUnit;
deliveryChalanaTmp.insert();
}
insertIntoHeaderfootertmp:
public void insertIntoHeaderfootertmp()
{
CustInvoiceTrans custInvoiceTrans;
SalesLine salesLineLoc;
LogisticsPostalAddress llPostalAddrs;
TaxRegistrationNumbers_IN TaxRegistrationNumbers_INLoc;
Taxinformation_in taxinformation_inloc;
inventDim = InventDim::find(inventDimloc.inventDimId);
select * from custPackingSlipJour
where custPackingSlipJour.RecId == custPackingSlipJourLoc.RecId;
deliveryChalanaHeaderFooterTmp.Unit = inventDim.InventSiteId;
select dirPartyPostalAddressView
where dirPartyPostalAddressView.LocationName == inventDim.InventSiteId;
/*select taxInformation_IN
where taxInformation_IN.RegistrationLocation == dirPartyPostalAddressView.Location;*/
// added by suresh:moldtek 2403215 start
while select taxInformation_IN
where taxInformation_IN.RegistrationLocation == dirPartyPostalAddressView.Location
if(taxInformation_IN.Name like "Unit-2 New*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-4 New*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-1 New*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-6 New*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-5*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-7*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "Unit-3*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "G1*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.TraderECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "G2*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.TraderECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "G3*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.TraderECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
else if(taxInformation_IN.Name like "G4*")
{
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.TraderECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.SalesTaxRegistrationNumber).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;
}
// added by suresh:moldtek 2403215 end
/*deliveryChalanaHeaderFooterTmp.ECCNumber = TaxRegistrationNumbers_IN::find(taxInformation_IN.ManECCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.TINNo = TaxRegistrationNumbers_IN::find(taxInformation_IN.TIN).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.CST = TaxRegistrationNumbers_IN::find(taxInformation_IN.STCRegistrationNumberTable).RegistrationNumber;
deliveryChalanaHeaderFooterTmp.Address = dirPartyPostalAddressView.Address;*/
//deliveryChalanaHeaderFooterTmp.Phone
deliveryChalanaHeaderFooterTmp.PackingSlipId = custPackingSlipJour.PackingSlipId;
deliveryChalanaHeaderFooterTmp.DeliveryDate = custPackingSlipJour.DeliveryDate;
deliveryChalanaHeaderFooterTmp.PurchaseOrder = custPackingSlipJour.PurchaseOrder;
deliveryChalanaHeaderFooterTmp.PODate = SalesTable::find(custPackingSlipJour.SalesId).PODate;
deliveryChalanaHeaderFooterTmp.PODates = SalesTable::find(custPackingSlipJour.SalesId).PODate;
select custInvoiceTrans
where custInvoiceTrans.InventDimId == custPackingSlipTransLoc.InventDimId
&& custInvoiceTrans.InventTransId == custPackingSlipTransLoc.InventTransId
&& custInvoiceTrans.Qty == custPackingSlipTransLoc.Qty
&& custInvoiceTrans.InvoiceDate == custPackingSlipTransLoc.DeliveryDate;
select * from custInvoiceJour
where custInvoiceJour.SalesId == custPackingSlipTransLoc.SalesId;
/* select * from TaxRegistrationNumbers_INLoc
where TaxRegistrationNumbers_INLoc.RegistrationNumber == custInvoiceJour.EccNo();
select * from taxinformation_inloc
where taxinformation_inloc.SalesTaxRegistrationNumber == TaxRegistrationNumbers_INLoc.RecId;
llPostalAddrs = LogisticsPostalAddress::findByLocation(taxinformation_inloc.RegistrationLocation);*/
select * from salesLineLoc
where salesLineLoc.SalesId == custPackingSlipTransLoc.SalesId;
select dirPartyPostalAddressViewCustomer
where dirPartyPostalAddressViewCustomer.PostalAddress == salesLineLoc.DeliveryPostalAddress;
/*SalesLine::find(custPackingSlipTransLoc.SalesId,
custPackingSlipTransLoc.LineNum).DeliveryPostalAddress;*/
select * from salesParmTable
where salesParmTable.SalesId == custPackingSlipJour.SalesId
&& salesParmTable.ParmId == custPackingSlipJour.ParmId;
select * from salesTable
where salesTable.SalesId == custPackingSlipTransLoc.SalesId;
select * from salesLine
where salesLine.SalesId == salesTable.SalesId;
//Address of buyer
//added on 04042015 start
deliveryChalanaHeaderFooterTmp.CustTINNum = custInvoiceJour.CustTinNo();
deliveryChalanaHeaderFooterTmp.CustECCNum = custInvoiceJour.EccNo();
//added on 04042015 end
deliveryChalanaHeaderFooterTmp.MTJCT = salesParmTable.TOTALS;
deliveryChalanaHeaderFooterTmp.CapTotals = salesParmTable.CapTotals;
deliveryChalanaHeaderFooterTmp.JarTotals = salesParmTable.JarTotals;
deliveryChalanaHeaderFooterTmp.InvoiceId = custInvoiceTrans.InvoiceId;
deliveryChalanaHeaderFooterTmp.InvoiceDate = custInvoiceTrans.InvoiceDate;
deliveryChalanaHeaderFooterTmp.VehicleNo = custPackingSlipJour.LorryNo;
// deliveryChalanaHeaderFooterTmp.CustName = SalesTable::find(custPackingSlipJour.SalesId).customerName();
deliveryChalanaHeaderFooterTmp.CustName = salesLine.DeliveryName;
deliveryChalanaHeaderFooterTmp.CustAddress = dirPartyPostalAddressViewCustomer.Address;
deliveryChalanaHeaderFooterTmp.POLine = salesParmTable.MTPOLine;
deliveryChalanaHeaderFooterTmp.SupplierCode = salesParmTable.MTSupplierCode;
deliveryChalanaHeaderFooterTmp.insert();
}
processReport:
[SysEntryPointAttribute(false)]
public void processReport()
{
QueryRun queryRun;
Query query;// = new Query();
//this.getDataFromContract();
this.getReportParameters();
queryRun = new QueryRun(this.buildQuery(this.parmQuery(),packingSlipId));
// Get the query from the runtime using a dynamic query.
//query = this.parmQuery();
//queryRun = new QueryRun(query);
ttsbegin;
while (queryRun.next())
{
inventDim = queryRun.get(tableNum(InventDim));
custPackingSlipJour = queryRun.get(tableNum(CustPackingSlipJour));
custPackingSlipTrans = queryRun.get(tableNum(CustPackingSlipTrans));
this.insertIntoDeliveryChalanaTMP();
this.insertIntoHeaderfootertmp();
}
//this.insertIntoHeaderfootertmp();
ttsCommit;
}
*************************
DeliveryChallanaController:
ClassDeclaration:
class DeliveryChallanaController extends SrsReportRunController
{
#define.ReportName("DeliveryChallan.PrecisionDesign1")
DeliverychalanaContract contract;
CustPackingSlipJour custPackingSlipJour;
}
prePromptModifycontract:
public void prePromptModifycontract()
{
Query qu;
if (this.parmArgs() &&
this.parmArgs().record() &&
this.parmArgs().dataset() == tableNum(CustPackingSlipJour))
{
custPackingSlipJour = this.parmArgs().record();
}
if (!contract)
{
contract = this.parmReportContract().parmRdpContract();
}
contract.parmPackingSlipId(custPackingSlipJour.PackingSlipId);
qu = this.getFirstQuery();
}
setRange:
public void setRange(Args _args,Query _query)
{
QueryBuildDataSource qbds;
QueryBuildRange qbr;
if (_args.dataset())
{
switch(_args.dataset())
{
case tableNum(CustPackingSlipJour):
custPackingSlipJour = _args.record();
break;
}
}
qbds = _query.dataSourceTable(tableNum(CustPackingSlipJour));
qbds.clearRanges();
qbr = qbds.findRange(fieldName2id(tableNum(CustPackingSlipJour),fieldStr(CustPackingSlipJour,PackingSlipId)));
if (!qbr)
{
qbr = qbds.addRange(fieldNum(CustPackingSlipJour, PackingSlipId));
}
if(custPackingSlipJour)
{
qbr.value(custPackingSlipJour.PackingSlipId);
}
}
showQueryValues:
public boolean showQueryValues(str parameterName)
{
return true;
}
construct:
public static DeliveryChallanaController construct(Args _args)
{
DeliveryChallanaController controller=new DeliveryChallanaController();
controller.parmArgs(_args);
return controller;
}
Main:
public static client void main(Args _args)
{
DeliveryChallanaController deliveryChallanaController = new DeliveryChallanaController();
deliveryChallanaController.parmArgs(_args);
deliveryChallanaController.parmReportName(#ReportName);
deliveryChallanaController.prePromptModifycontract();
deliveryChallanaController.parmArgs(_args);
deliveryChallanaController.setRange(_args, deliveryChallanaController.parmReportContract().parmQueryContracts().lookup(deliveryChallanaController.getFirstQueryContractKey()));
deliveryChallanaController.parmShowDialog(false);
deliveryChallanaController.startOperation();
}
*************************************************
DeliverychalanaContract:
ClassDeclaration:
[DataContractAttribute]
class DeliverychalanaContract //implements SysOperationValidatable
{
InventSiteId site;
PackingSlipId packingslipId;
RecId custPackingSlipTransRecid;
}
parmPackingSlipId:
[DataMemberAttribute('PackingSlipId')]
public PackingSlipId parmPackingSlipId(PackingSlipId _packingSlipId = packingSlipId)
{
packingSlipId = _packingSlipId;
return packingSlipId;
}
No comments:
Post a Comment