need to get WareHouse lookup based on "ItemType", which needs to match InventLocation "ItemType"

While creating SalesOrder, need to get WareHouse lookup based on "ItemType",
which needs to match InventLocation "ItemType"

step 1: Add new field in "InventLocation" Table and drag field in particular form level.
Step 2: In SalesCreateOrder form -> Datasource -> SalesTable -> Fields -> InventLocationId -> Lookup( )
        public void lookup(FormControl _formControl, str _filterStr)
       {   
         SysTableLookup          sysTableLookup = SysTableLookup::newParameters(tableNum(InventLocation),_formControl);
         Query                   query = new Query();
         QueryBuildDataSource    queryBuildDataSource = query.addDataSource(tableNum(InventLocation));
   
        queryBuildDataSource.addRange(fieldNum(InventLocation, ItemType)).value(queryValue(salesTable.ItemType));
        sysTableLookup.addLookupfield(fieldNum(InventLocation, InventLocationId));
        sysTableLookup.addLookupfield(fieldNum(InventLocation,Name));
        sysTableLookup.addLookupfield(fieldNum(InventLocation,InventSiteId));
        sysTableLookup.parmQuery(query);
        sysTableLookup.performFormLookup();   
       }

Comments

Post a Comment

Popular posts from this blog

In CustCreditLimit class need to check the salesqty to be not more than as given in custom table

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...
Read more

Creditinvoice report

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;   ...
Read more

Simple string functions to fill in built-in function gaps

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 <=...
Read more