Skip to main content

Self diagnostics

this Script will check if all tables have



  • Primary index

  • Cluster index

  • Caching

//NOTE: temp tables are skipped




static void TableTuningTest(Args _args)

{

boolean skipEmptyTables = true;

boolean result;

treeNode treeNode;

SysDictTable sdt;

str TableAndCound;

int recordCount;

boolean skipEmptyrecordCount = false;

treeNodeIterator treeNodeIterator =TreeNode::findNode("\\Data Dictionary\\Tables").AOTiterator();

;

treeNode = treeNodeIterator.next();

setPrefix("Tuning");

while (treeNode)

{

sdt = new SysDictTable(tablename2id(treeNode.AOTname()));

recordCount = sdt.recordCount();


if(!sdt.isTmp() && (!skipEmptyTables || (recordCount != 0)) )

{

TableAndCound = treeNode.AOTname()+ ' ('+ int2str(sdt.recordCount())+')';

setPrefix(TableAndCound);

result = false;

result = result || sdt.treeNode().AOTgetProperty("CreatedDateTime") == "yes" ? true : false;

result = result || sdt.treeNode().AOTgetProperty("ModifiedDateTime")== "yes" ? true : false;


if(result && sdt.treeNode().AOTgetProperty("CreateRecIdIndex") == "No" )

{

setPrefix(TableAndCound);

info("RecIdIndex");

}

if(sdt.treeNode().AOTgetProperty("CacheLookup") == "None")

{

setPrefix(TableAndCound);

info("CacheLookup");

}

if(sdt.treeNode().AOTgetProperty("ClusterIndex") == "")

{

setPrefix(TableAndCound);

Warning("ClusterIndex");

}

if(sdt.treeNode().AOTgetProperty("PrimaryIndex") == "")

{

setPrefix(TableAndCound);

Error("PrimaryIndex");

}

}

treeNode = treeNodeIterator.next();

}

}
Labels:

Popular posts from this blog

What does this mean: "The form datasource query object does not support changing its AllowCrossCompany property after the form has executed the query."?

I have made a form with datasources vendtable and vendtrans. Inside vendtable_ds.executequery() looks like this: QueryBuildDataSource queryBuildDatasource ,queryBDS_VendTrans_Invoice; ; queryBuildDatasource = this.query().dataSourceTable(tablenum(vendtable)); queryBDS_VendTrans_Invoice = this.query().dataSourceTable(tablenum(vendtrans)); if (curext() == "MASTERCOMP") { this.query().allowCrossCompany(true); } else { this.query().allowCrossCompany(false); } //FilterVendorName = stringedit control on form if (FilterVendorName.text()) { queryBuildDatasource.addRange(fieldNum(VendTable,Name)).value(strfmt("*%1*", FilterVendorName.text())); } else { queryBuildDatasource.clearRange(fieldNum(VendTable,Name)); } //FilterInvoiceNumber = stringedit control on form if (FilterInvoiceNumber.valueStr() == "") { queryBDS_VendTrans_Invoice.enabled(false); } else { queryBDS_VendTrans_Invoice.enabled(true); queryBDS_VendTrans_In...
Read more

Credit Note [Dynamics AX] using X++

This post will help to create credit note for a sales order based on the invent lot id. All the invoices raised for a particular sales line – Lot Id will be raised back as a credit note. Information on Credit Note: A credit note or credit memorandum (memo) is a commercial document issued by a seller to a buyer. The seller usually issues a Credit Memo for the same or lower amount than the invoice, and then repays the money to the buyer or sets it off against a balance due from other transactions Below Code will help to create credit note for all the invoices raised against the sales line -lot id. Please note: This code can be customized as per your requirements. This is just a template to help creating credit note using X++ code. Please test the code before use. static void SR_CreateCreditNote_Sales(Args _args) { // Coded by Sreenath Reddy CustInvoiceTrans custInvoiceTrans; Dialog dialog = new Dialog(“Create credit note – for sales.”); DialogField dfInv...
Read more