Code: [#Menu: Gateway Of Tally] Add : Item : Contact List : Menu : QuotationMenu [Menu: QuotationMenu] Add : Item :Contact List : Alter : Contact Name [Report: Contact Name] Form : Contact Name Object : Company Variable : vContactName : String Set : vContactName : "" [Form: Contact Name] Part : FormSubTitle, Contactman ;Button : Delete All, Remove Line, Restore Line, Restore All,Report Operations Width : 95% Screen Height : 100% Screen Background : @@SV_CHEQUE Local : Field : Form SubTitle : Info : $$LocaleString:"CONTACT LIST" Local : Field : Form SubTitle : Color : LeafGreen Local: Field:Form SubTitle : Style : Large SerIf Bold Buttons : PrintButton, ExportButton Add: Button: ContactNamefilter [Part: Contactman] Lines : PKM Title,PKM Salesman Repeat : PKM Salesman:mydbcontactperson Break on: $$IsEmpty:$contactNamedetails Scroll : Vertical Height : 90% Screen [Line: PKMTitle] Fields:SrNoFld, ContactNameFld, ContactMobFld,ContactEmailFld Border:Thick Bottom [Field:SrNoFld] Use:Name Field Set as:"Sr.No." Width:5% Screen Style:Large Bold Color:"Yellow" Read Only:Yes Skip:Yes Align:Center Background :"Blue" Border:Thin Right [Field: ContactNameFld] Use:Name Field Set as:"Contact Name" Width:50% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Field: ContactMobFld] Use:Name Field Set as:"Contact No." Width:10% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Field: ContactEmailFld] Use:Name Field Set as:"E - Mail" Width:30% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Line: PKM Salesman] Fields : PKMSNo, PKMSalemanName,PKMSalemanMob,PKMSalemanEmail Border: Thin Box [Field:PKMSNo] Use:Number Field Set as:$$Line Read Only:Yes Skip Forward:Yes Width:5% Screen Border:Thin Box Align:Center [Field: PKMSalemanName] Use : Short Name Field Storage : contactNamedetails Unique : Yes Width : 50% Screen Border:Thin Box [Field: PKMSalemanMob] Use : Short Name Field Storage : SalemanMob Unique : Yes Width:10% Screen Style : Normal Bold Border:Thin Box [Field: PKMSalemanEmail] Use : Short Name Field Storage : SalemanEmail Unique : Yes Width:30% Screen Style : Normal Case : Lower Case Color:Blue [System: UDF] mydbcontactperson : Aggregate: 998 contactNamedetails : String : 1200 ;: Yes SalemanMob:String: 1300 ;: Yes SalemanEmail:String: 1301 ;: Yes [Collection : SalemanMobCollection] Childof : ##SVCurrentCompany [Collection : ContactNameCollection] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST(Create New Contact = Alt+C) FullHeight : Yes [Button:ContactNamefilter] Key : F4 Action : Alter: ContactNamefilter Title : Contact List [Report:ContactNamefilter] Form : ContactNamefilter [Form:ContactNamefilter] Part : ContactNamefilter No Confirmation : Yes [Part:ContactNamefilter] Line : ContactNamefilter [Line:ContactNamefilter] Field : Medium Prompt,ContactNamefilter Option : alter on enter Local : Field : Medium Prompt : Set as : "Select Contact Name: " Local : Field : Medium Prompt : Color :Blue Local : Field : Medium Prompt : Style :Normal Bold [Field:ContactNamefilter] Table : ContactNameCollection1,EndOfList ShowTable : Always Use : Name Field Width : 20 Border : Thin Box Variable : vContactName Modifies : vContactName [Collection : ContactNameCollection1] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Title: "Contact List" Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST FullHeight : Yes Filter : ContactNamefilter Fetch : mydbcontactperson,contactNamedetails,SalemanMob,SalemanEmail [Variable:vContactName] Type : String [System:Variable] vContactName : "" [System: Formula] ContactNamefilter : $contactNamedetails = ##vContactName Or $$IsSysName:##vContactName Hey, I am not getting filter option's result....
Code: [#Menu: Gateway Of Tally] Add : Item : Contact List : Menu : QuotationMenu [Menu: QuotationMenu] Add : Item :Contact List : Alter : Contact Name [Report: Contact Name] Form : Contact Name Object : Company Variable : vContactName : String Set : vContactName : "" [Form: Contact Name] Part : FormSubTitle, Contactman ;Button : Delete All, Remove Line, Restore Line, Restore All,Report Operations Width : 95% Screen Height : 100% Screen Background : @@SV_CHEQUE Local : Field : Form SubTitle : Info : $$LocaleString:"CONTACT LIST" Local : Field : Form SubTitle : Color : LeafGreen Local: Field:Form SubTitle : Style : Large SerIf Bold Buttons : PrintButton, ExportButton Add: Button: ContactNamefilter [Part: Contactman] Lines : PKM Title,PKM Salesman Repeat : PKM Salesman:mydbcontactperson Break on: $$IsEmpty:$contactNamedetails Scroll : Vertical Height : 90% Screen [Line: PKMTitle] Fields:SrNoFld, ContactNameFld, ContactMobFld,ContactEmailFld Border:Thick Bottom [Field:SrNoFld] Use:Name Field Set as:"Sr.No." Width:5% Screen Style:Large Bold Color:"Yellow" Read Only:Yes Skip:Yes Align:Center Background :"Blue" Border:Thin Right [Field: ContactNameFld] Use:Name Field Set as:"Contact Name" Width:50% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Field: ContactMobFld] Use:Name Field Set as:"Contact No." Width:10% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Field: ContactEmailFld] Use:Name Field Set as:"E - Mail" Width:30% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Line: PKM Salesman] Fields : PKMSNo, PKMSalemanName,PKMSalemanMob,PKMSalemanEmail Border: Thin Box [Field:PKMSNo] Use:Number Field Set as:$$Line Read Only:Yes Skip Forward:Yes Width:5% Screen Border:Thin Box Align:Center [Field: PKMSalemanName] Use : Short Name Field Storage : contactNamedetails Unique : Yes Width : 50% Screen Border:Thin Box [Field: PKMSalemanMob] Use : Short Name Field Storage : SalemanMob Unique : Yes Width:10% Screen Style : Normal Bold Border:Thin Box [Field: PKMSalemanEmail] Use : Short Name Field Storage : SalemanEmail Unique : Yes Width:30% Screen Style : Normal Case : Lower Case Color:Blue [System: UDF] mydbcontactperson : Aggregate: 998 contactNamedetails : String : 1200 ;: Yes SalemanMob:String: 1300 ;: Yes SalemanEmail:String: 1301 ;: Yes [Collection : SalemanMobCollection] Childof : ##SVCurrentCompany [Collection : ContactNameCollection] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST(Create New Contact = Alt+C) FullHeight : Yes [Button:ContactNamefilter] Key : F4 Action : Alter: ContactNamefilter Title : Contact List [Report:ContactNamefilter] Form : ContactNamefilter [Form:ContactNamefilter] Part : ContactNamefilter No Confirmation : Yes [Part:ContactNamefilter] Line : ContactNamefilter [Line:ContactNamefilter] Field : Medium Prompt,ContactNamefilter Option : alter on enter Local : Field : Medium Prompt : Set as : "Select Contact Name: " Local : Field : Medium Prompt : Color :Blue Local : Field : Medium Prompt : Style :Normal Bold [Field:ContactNamefilter] Table : ContactNameCollection1,EndOfList ShowTable : Always Use : Name Field Width : 20 Border : Thin Box Variable : vContactName Modifies : vContactName [Collection : ContactNameCollection1] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Title: "Contact List" Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST FullHeight : Yes Filter : ContactNamefilter Fetch : mydbcontactperson,contactNamedetails,SalemanMob,SalemanEmail [Variable:vContactName] Type : String [System:Variable] vContactName : "" [System: Formula] ContactNamefilter : $contactNamedetails = #ContactNamefilter Or $$IsSysName:##vContactName In this code, how to remove the Email field ??
Code: [#Menu: Gateway Of Tally] Add : Item : Contact List : Menu : QuotationMenu [Menu: QuotationMenu] Add : Item :Contact List : Alter : Contact Name [Report: Contact Name] Form : Contact Name Object : Company Variable : vContactName : String Set : vContactName : "" [Form: Contact Name] Part : FormSubTitle, Contactman ;Button : Delete All, Remove Line, Restore Line, Restore All,Report Operations Width : 95% Screen Height : 100% Screen Background : @@SV_CHEQUE Local : Field : Form SubTitle : Info : $$LocaleString:"CONTACT LIST" Local : Field : Form SubTitle : Color : LeafGreen Local: Field:Form SubTitle : Style : Large SerIf Bold Buttons : PrintButton, ExportButton Add: Button: ContactNamefilter [Part: Contactman] Lines : PKM Title,PKM Salesman Repeat : PKM Salesman:mydbcontactperson Break on: $$IsEmpty:$contactNamedetails Scroll : Vertical Height : 90% Screen [Line: PKMTitle] Fields:SrNoFld, ContactNameFld Right Fields : ContactMobFld Border:Thick Bottom [Field:SrNoFld] Use:Name Field Set as:"Sr.No." Width:5% Screen Style:Large Bold Color:"Yellow" Read Only:Yes Skip:Yes Align:Center Background :"Blue" Border:Thin Right [Field: ContactNameFld] Use:Name Field Set as:"Contact Name" Width :80% Screen Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Field: ContactMobFld] Use:Name Field Set as:"Contact No." Full Width :Yes Color:"Yellow" Read Only:Yes Skip:Yes Style:Large Bold Align:Center Background :"Blue" Border:Thin Right [Line: PKM Salesman] Fields : PKMSNo, PKMSalemanName,PKMSalemanMob Border: Thin Box [Field:PKMSNo] Use:Number Field Set as:$$Line Read Only:Yes Skip Forward:Yes Width:5% Screen Border:Thin Box Align:Center [Field: PKMSalemanName] Use : Short Name Field Storage : contactNamedetails Unique : Yes Width :80% Screen Border:Thin Box [Field: PKMSalemanMob] Use : Short Name Field Storage : SalemanMob Unique : Yes Full Width :Yes Style : Normal Bold Border:Thin Box [System: UDF] mydbcontactperson : Aggregate: 998 contactNamedetails : String : 1200 ;: Yes SalemanMob:String: 1300 ;: Yes [Collection : SalemanMobCollection] Childof : ##SVCurrentCompany [Collection : ContactNameCollection] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST(Create New Contact = Alt+C) FullHeight : Yes [Button:ContactNamefilter] Key : F4 Action : Alter: ContactNamefilter Title : Contact List [Report:ContactNamefilter] Form : ContactNamefilter [Form:ContactNamefilter] Part : ContactNamefilter No Confirmation : Yes [Part:ContactNamefilter] Line : ContactNamefilter [Line:ContactNamefilter] Field : Medium Prompt,ContactNamefilter Option : alter on enter Local : Field : Medium Prompt : Set as : "Select Contact Name: " Local : Field : Medium Prompt : Color :Blue Local : Field : Medium Prompt : Style :Normal Bold [Field:ContactNamefilter] Table : ContactNameCollection1,EndOfList ShowTable : Always Use : Name Field Width : 20 Border : Thin Box Variable : vContactName Modifies : vContactName [Collection : ContactNameCollection1] Type : mydbcontactperson : Company Childof : ##SVCurrentCompany Title: "Contact List" Add : SubTitle :$$LocaleString:"Contact Name" Add : Format : $contactNamedetails, 50 Title : CONTACT LIST FullHeight : Yes Filter : ContactNamefilter Fetch : mydbcontactperson,contactNamedetails,SalemanMob [Variable:vContactName] Type : String [System:Variable] vContactName : "" [System: Formula] ContactNamefilter : $contactNamedetails = #ContactNamefilter Or $$IsSysName:##vContactName