引用:
using Sage.CRM.WebObject;
using Sage.CRM.Blocks;
using Sage.CRM.Controls;
using Sage.CRM.Data;
using Sage.CRM.HTML;
using Sage.CRM.Utils;
常规新建内容:
AddContent(HTML.Form());
string hmode = Dispatch.EitherField("HiddenMode");
EntryGroup myscreen = Metadata.GetScreen("OEPriceNewEntry");
if (hmode == "Save")
{
Record myRec = CreateRecord("OEPrice");
myscreen.FillEntityFromContent(myRec);
myRec.SaveChanges();
Dispatch.Redirect(UrlDotNet(ThisDotNetDll, "RunOEPriceDataPage"));
}
else
{
AddContent(HTML.StartTable());
AddContent(HTML.InputHidden("HiddenMode", ""));
AddContent(HTML.BoxTitle(Metadata.GetTranslation("Tabnames", "New Record")));
AddContent(HTML.BoxContent(myscreen.GetHtmlInEditMode()));
string sUrl = "javascript:document.EntryForm.HiddenMode.value='Save';";
AddSubmitButton("Save", "Save.gif", sUrl);
//AddUrlButton("Cancel", "Cancel.gif", UrlDotNet(ThisDotNetDll, "RunCaseFailureTyreList"));
AddContent(HTML.EndTable());
}
执行sql语句:
string UpdateSql = "update failuretyre Set ft_yn='Y' where t_failuretyreid in (" + Fyid + ")";
QuerySelect iUpdate = GetQuery();
iUpdate.SelectSql(UpdateSql);
页面转向:
Dispatch.Redirect(UrlDotNet(ThisDotNetDll, "RunCaseFailureTyreList"));
添加选项卡:
在BuildContent()中使用GetTabs("……");
获取值:
string caseid = Dispatch.EitherField("case_caseid");
获取传入值:
string stroepriceID;
if (Dispatch.ContentField("oep_oepriceID") == null)
{
stroepriceID = Dispatch.ContentField("key58");
}
else
{
stroepriceID = Dispatch.ContentField("oep_oepriceID");
}
清除内容开头和结束位置的空白字符:
Fyid = Fyid.Trim();
设置页面某一项只读,内容默认:
EntryGroups myscreen = Metadata.GetScreen("FYPlanNewEntry");
Entry myentry = myscreen.GetEntry("FYP_Secterr");
myentry.ReadOnly = true;
myentry.DefaultValue = 0;
--注:当发现更改默认值无效时,可尝试设置 myentry.DefaultType = 1;
页面添加表格:
List MpitemList = Metadata.GetList("OEPItemGrid");
AddContent(HTML.StartTable());
AddContent(HTML.BoxTitle(Metadata.GetTranslation("Tabnames", "Oepitem")));
AddContent(HTML.GridData(MpitemList.GetViewHtml("oepi_oepriceid=" + stroepriceID)));
AddContent(HTML.EndTable());
查找记录:
Record recOeprice = FindRecord("OEPrice", "oep_deleted is null and oep_oepriceID=" + stroepriceID);
从记录中获取某一项的值:
recOeprice.GetFieldAsString("oep_status").Trim()
判断当前用户是否有某一数据表的某一操作权限:
if (CurrentUser.HasRights(Sage.PermissionType.Insert, "Oeprice"))//该句是判断当前用户是否有对数据表“Oeprice”有插入数据权限
{
AddUrlButton("ContinueNew", "Continue.gif", UrlDotNet(ThisDotNetDll, "RunOEPRiceNew"));
}
if (CurrentUser.IsInRange(Sage.PermissionType.Delete, "OEPrice", TerritoryId, AssignedToUserId, AssignedToTeamId, CreatedByUserId))
{
AddUrlButton("Delete", "Delete.gif", UrlDotNet(ThisDotNetDll, "RunOEPRiceDelete"));
}
获取原先查找条件语句,从而显示相应内容列表
EntryGroup OFind = SearchScreen;//该页面继承了SearchPage ,元数据中定义了SearchScreen ,所以此举为获取原先定义的EntryGroup
string mysql;
if ((CurrentUser.UserId == 87) || (CurrentUser.UserId == 158) || (CurrentUser.UserId == 1))
{
if (OFind.GetSqlForSearch() == "")
{
mysql = "Oep_status='Active'";
}
else
{
mysql = OFind.GetSqlForSearch();
}
AddContent(HTML.GridData(OEPriceGrid.GetViewHtml(mysql)));
}
else
{
if (OFind.GetSqlForSearch() == "")
{
mysql = "Oep_status='Active'";
}
else
{
mysql = OFind.GetSqlForSearch() + "and Oep_status='Active'";
}
AddContent(HTML.GridData(OEPriceGrid.GetViewHtml(mysql)));
}
设置字段的值:
recOepricenew.SetField("oep_preid", recOeprice.RecordId);
recOepricenew.SaveChanges();
记录循环:
while (!recoepitem.Eof())//recoepitem.Eof()中Eof应该是 End of 的意思 该方法返回的应是 记录是否已到最后的意思 到最后返回True
{
recoepitem.GoToNext();//到下一条
}
当前用户登录ID:
this.CurrentUser.UserId
选择连动
myentry1.OnChangeScript = "javascript:document.getElementById('FYP_shi').romove(1);document.EntryForm.HiddenMode.value='changed';self.EntryForm.submit();";
Sage CRM SDK 开发
最新推荐文章于 2024-08-03 23:07:09 发布