Esempio n. 1
0
        /// <summary> Opens the prompt browse for QCL Procedures. </summary>
        /// <returns></returns>
        protected override IQOpResult <int> OpenEditor(int defaultValue, IQVarElementTarget target)
        {
            OnBeforeClarionEditorInvoke(this);
            int proId = CallClarion.CallPromptBro("CHG1", true, 2, false, Strings.Group);

            OnAfterClarionEditorInvoke(this);

            //If the user hit "close", don't update the primaryKeyValue
            return((proId != 0)
                       ? new IQOpResult <int> {
                Result = OpResultEnum.Completed, Value = proId
            }
                       : new IQOpResult <int> {
                Result = OpResultEnum.Cancelled
            });
        }
Esempio n. 2
0
        /// <summary> Opens the prompt browse for document types. </summary>
        /// <returns></returns>
        protected override IQOpResult <int> OpenEditor(int defaultValue, IQVarElementTarget target)
        {
            OnBeforeClarionEditorInvoke(this);
            int docTypeId = CallClarion.CallPromptBro("ESC7", true, 2, false, Strings.DocumentType);

            OnAfterClarionEditorInvoke(this);
            var entity = Prompt.GetEntityByID(docTypeId);

            //If the user hit "close", don't update the primaryKeyValue)
            return((docTypeId != 0)
                                           ? new IQOpResult <int> {
                Result = OpResultEnum.Completed, Value = entity.Enum
            }
                                           : new IQOpResult <int> {
                Result = OpResultEnum.Cancelled
            });
        }