Kbase P6552: A sample use of a RESULTS integration point procedure.
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
2/24/2003 |
|
Status: Unverified
GOAL:
How to define an integration procedure for a Results integration point?
FACT(s) (Environment):
Windows 32 Intel
FACT(s) (Environment):
Windows NT 32 Intel/Windows 2000
FACT(s) (Environment):
Progress 8.x
FACT(s) (Environment):
Progress 9.x
FIX:
The following code demonstrates the use a RESULTS integration point procedure to to turn off the "RESULTS -> Query -> New -> Form" and the "RESULTS -> Query ->View -> As Form" options completely:
1. Save the following procedure as SomeName.p in your RESULTS working directory.
DEFINE INPUT PARAMETER featureList AS CHARACTER NO-UNDO.
DEFINE INPUT PARAMETER userName AS CHARACTER NO-UNDO.
DEFINE INPUT-OUTPUT PARAMETER canUseList AS CHARACTER NO-UNDO.
DEFINE VARIABLE qbf-i AS INTEGER NO-UNDO.
DO qbf-i = 1 TO NUM-ENTRIES(featureList):
IF
ENTRY(qbf-i,featureList) = "AdminIntegration":u OR
ENTRY(qbf-i,featureList) = "FormView":u OR
ENTRY(qbf-i,featureList) = "NewFormView":u
THEN
ENTRY(qbf-i, canUseList) = "false":u.
END.
RETURN.
2. Click Query from RESULTS main menu
3. Click Customize from the Query drop down menu
4. Click Integration Procedures from the Customize Submenu
5. Select Feature Security from the Integration Procedures dialog box.
6. Type SomeName.p in the ·Procedure For: Feature Security· Fill-In.
7. Click OK to exit the Integration Procedures dialog box.
8. Exit Results to make the changes take effect.
9. Restart RESULTS and confirm that:
A. Integration Procedures option is not available from the Query
=>Customize menu
B. Form option is not available from the Query =>New menu
C. The View As Form option is not available from the Query => View menu
The above procedure may be expanded to restrict any of the default Results Feature List.
Making the "Integration Procedures" option not available protects our restrictions from being overridden.
Make the above restrictions more secure by deploying a compiled version of the procedure "SomeName.p" that is hidden or otherwise protected against deletion and/or modification.