Example 1:
private void TestFunction()
{
#region Local Variables
SalString sFullName = ":i_hWndFrame." + Ifs.Fnd.ApplicationForms.Int.QualifiedItemNameGet(this);
SalString lsStmt = "";
Dictionary<string, string> dBindings = new Dictionary<string, string>();
#endregion
#region Actions
dBindings.Clear();
dBindings.Add("Contract", this.colsContract.QualifiedBindName);
dBindings.Add("CatalogNo", this.colsCatalogNo.QualifiedBindName);
dBindings.Add("TempMinQty", QualifiedVarBindName("sTempMinQty")); -- this is public window variable
lsStmt = @"{TempMinQty} := &AO.Sales_Part_API.Get_Minimum_Qty({Contract} IN, {CatalogNo} IN)";
DbPLSQLBlock(lsStmt, dBindings);
if (this.colnBuyQtyDue.Number < this.nCTempMinQty)
{
this.colnBuyQtyDue.Number = this.nCTempMinQty;
this.colnBuyQtyDue.EditDataItemStateSet(Ifs.Fnd.ApplicationForms.Const.EDIT_Changed);
this.colnRevisedQtyDue.Number = this.nCTempMinQty;
this.colnRevisedQtyDue.EditDataItemStateSet(Ifs.Fnd.ApplicationForms.Const.EDIT_Changed);
}
#endregion
}
Example 2:
private void TestFunction()
{
#region Properties
SalString sFullName = ":i_hWndFrame.dlgCAdjustConfig.";
SalString sStat = "";
IDictionary<string, string> dBindings = new Dictionary<string, string>();
SalBoolean bOk = false;
#endregion
#region Actions
dBindings.Clear();
dBindings.Add("PartNo", QualifiedVarBindName("sPartNo"));
dBindings.Add("ConfigId", QualifiedVarBindName("sConfigurationId"));
dBindings.Add("Contract", QualifiedVarBindName("sContract"));
dBindings.Add("Res", QualifiedVarBindName("sRes"));
sStat = sFullName + "dfnNoOfSheets := &AO.Inventory_Part_Config_API.Get_No_Of_Sheets({PartNo} IN, {ConfigId} IN, {Contract} IN);";
DbPLSQLBlock(sStat, dBindings);
#endregion
}
Example 3:
DbPLSQLBlock("{0} := Some_API.Function_Call({1} IN, {2} IN)",
QualifiedVarBindName("sPartNo"),
this.colsContract.QualifiedBindName,
this.colsCatalogNo.QualifiedBindName));
תגובות