Examples: AddCommand


The following example adds individual commands to the various content areas for an the Area Page in the sample integrating application.

local AreaPageXMLState XMLState;

call Command_HideAndDisable, command CustomizeHomePage of form Command_System;

{Add items to the Area page}
call Create of form syAreaPageXML, XMLState, "Sample";

{Add items if needed}
if not empty(XMLState:XMLDoc) then
	{Cards}
	call AddContentArea of form syAreaPageXML, XMLState, getmsg(9823) {Cards}, IMAGE_CARDS of form syAreaPageXML, true, 1;
	call AddCommand of form syAreaPageXML, XMLState, command IG_Lead_Maintenance of form Command_IG_Sample;

	{Reports}
	call AddContentArea of form syAreaPageXML, XMLState, getmsg(451) {Reports}, IMAGE_REPORTS of form syAreaPageXML, true, 1;
	call AddCommand of form syAreaPageXML, XMLState, command IG_Lead_Reports of form Command_IG_Sample;

	{Inquiry}
	call AddContentArea of form syAreaPageXML, XMLState, getmsg(4426) {Inquiry}, IMAGE_INQUIRY of form syAreaPageXML, true, 2;
	call AddCommand of form syAreaPageXML, XMLState, command IG_Lead_Inquiry of form Command_IG_Sample;

	{Setup}
	call AddContentArea of form syAreaPageXML, XMLState, getmsg(860) {Setup}, IMAGE_SETUP of form syAreaPageXML, true, 2;
	call AddCommand of form syAreaPageXML, XMLState, command IG_Contact_History_Setup of form Command_IG_Sample;
end if;

{Display the Area Page}
call Display of form syAreaPageXML, XMLState;


Documentation Feedback