![]() | ![]() Products ![]() ![]() ![]() ![]() |
Home » Technical Support » ElevateDB Technical Support » Incident Reports » Incident Reports Reported for Version 2.01 » View Incident Report |
![]() |
Reported By: Heiko Knuettel Reported On: 7/28/2008 For: Version 2.01 Build 1 |
The external function is: procedure TEDBExternalModule1.EDBExternalModuleRoutine(const RoutineName: String); begin if ansiuppercase(RoutineName)='FLAGSET' then Params.ParamByName('result').AsBoolean := flagset(Params.ParamByName('intval').AsInteger, Params.ParamByName('flag').AsInteger); end; function TEDBExternalModule1.flagset(intval, flag: Integer): Boolean; begin result := (intval and (1 shl flag))<>0; end; FUNCTION "FLAGSET" (IN "intval" INTEGER, IN "flag" INTEGER) RETURNS BOOLEAN EXTERNAL NAME "extmodule"
This web page was last updated on Wednesday, October 30, 2024 at 11:41 AM | Privacy Policy![]() © 2025 Elevate Software, Inc. All Rights Reserved Questions or comments ? ![]() |