INC Kuwait onsite

Creating dialog box for the cancel of SalesOrder packingslip form: void clicked() {     // + My Comment (Added by incadmin - INC-vinod - Start 04/11/2018)     Dialog          dialog = new Dialog("Enter Comments");     DialogField     dialogcomment;     NotesLine       comments;     CustPackingSlipJour     CustPackingSlipJourloc;     // - My Comment -INC-Vinod - End     #ISOCountryRegionCodes     CustPackingSlipJour localCustPackingSlipJour = custPackingSlipJour.data();     // + My Comment (Added by incadmin - INC-vinod - Start 04/11/2018)     dialogcomment = dialog.addField(Extendedtypestr(Notes),"Comments");     if(dialog.run())     {         comments = dialogcomment.value();         if (             Sy...

Creating an unbound enum like ALL,OPEN,POSTED in a form, and how to do filteration: Add unbounded comboBox - Provide property enumtype as AllOpenPosted. In form -> public class FormRun extends ObjectRun {     QueryBuildRange     criteriaPosted;     AllOpenPosted       allOpenPostedValue;     NoYes               openLinesForm;     boolean             allowCreate; } void bookReSearch() {     INC_Pricecontract_ds.research(); } public void init() {     allowCreate = true;     super();     allOpenPostedValue = AllOpenPosted::Open;     INC_Pricecontract_ds.allowCreate(allowCreate);     allOpenPosted.selection(allOpenPostedValue);     allOpenPosted.selectionChanged(); } In Form->Datasource-> public void init() {     super()...

Simple string functions to fill in built-in function gaps: class INC_String { } /*  return true if "findStr" is the inital character match for "s"     */ static boolean beginsWith( str s, str findStr ) { ;     if( strscan( s, findStr, 1, strlen( s ) ) == 1 )         return true;     return false; } /*  use to do multiple string manipulations on the string passed, including case forcing and substitutions     */ static str cleanString( str s, container forceLower, container forceUpper, container subst, boolean flFixDoubleSpaces = true ) {     int ix; ;     // FIX LOWER CASE LIST     for( ix = 1; ix <= conlen( forceLower ); ix++ )     {         s = INC_String::replaceAll( s, conpeek( forceLower, ix ), strlwr( conpeek( forceLower, ix ) ) );     }     // FIX UPPER CASE LIST     for( ix = 1; ix <=...

In CustCreditLimit class need to check the salesqty to be not more than as given in custom table: static void main(Args _args) {     INC_Customercredit      customerCredit;     SalesLine               salesLineQty,salesLinesum; while select salesLineQty                 group by salesLineQty.ItemGroupId,salesLineQty.CustAccount                 where salesLineQty.SalesId          == salestableloc.SalesId     {         select customerCredit                 where customerCredit.CustAccount    == salesLineQty.CustAccount                 &&    customerCredit.ItemGroupId    == salesLineQty.ItemGroupId;         select sum(SalesQty...

Need comment of our customized means - need to write code in EditorScript class Public void template_flow_mycom(Editor editor) {     xppSource xppSource = new xppSource(editor.columnNo());     int currentLine = editor.currentLineNo();     int currentCol = editor.columnNo();     //add opening comment     Source template = "// + My Comment (Added by "+curUserId()+" - INC-vinod - Start "+date2str(today(),123,2,4,2,4,4)+")\n";     ;     //adds an empty line     template+= strRep(" ",currentCol)+ "\n";     //add closing comment with correct number of spaces     template+= strRep(" ",currentCol) + "// - My Comment -INC-Vinod - End";     editor.insertLines(template);     //move cursor to the empty line between the comments     editor.gotoLine(currentLine+2);     editor.gotoCol(currentCol+4); }

Set and Get value code: this.incParmItemtypestr(itemTypeStrLoc); public string30 incParmItemtypestr(string30    _itemTypestr = itemTypeStr) { ;     itemTypeStr = _itemTypestr;     return itemTypeStr; }

Creditinvoice Report: ContractClass: [DataMemberAttribute] class INC_Creditinvoicecontract {     RefRecId            recid; } [ DataMemberAttribute("recid")] public RefRecId parmRecid(RefRecId _recid = recid) {     recid = _recid;     return recid; } RDP Class: [SRSReportParameterAttribute(classStr(INC_Creditinvoicecontract))] class INC_CreditinvoiceDP extends SrsReportDataProviderPreProcessTempDB {     INC_Creditinvoicecontract               contract;     CustInvoiceJour                         custInvoiceJour;     CustInvoiceTrans                        custInvoiceTrans;     CustPackingSlipTrans                    custPackingSlipTrans;   ...

for displaying deliveryDateTime based on given minutes in salesparmtable display String30 deliveryDateTime() {     String30 strvalue;     if(this.INC_DeliveryTime !=0)     {         strvalue = strFmt("%1 %2",today(), time2str((timeNow() + this.INC_DeliveryTime * 60),TimeSeparator::Auto,TimeFormat::Auto));         return strvalue;     }     else     {         return '';     } }

Need to display UnitId of itemid based on ModuleType in salesline table: Public display UnitOfMeasureSymbol dispInventunit() {     InventTableModule           inventTableModule;     select inventTableModule where inventTableModule.ItemId ==  this.ItemId                                 && inventTableModule.ModuleType ==  ModuleInventPurchSales::Invent;     return inventTableModule.UnitId; }