nameLookup(char **ppStrArray, char *pfindName);
|
DEFINE VARIABLE cFindName AS CHARACTER NO-UNDO.
DEFINE VARIABLE cNames AS CHARACTER NO-UNDO EXTENT 50. RUN nameLookup (cNames, cFindName). PROCEDURE nameLookup EXTERNAL "myApp.dll" PERSISTENT: DEFINE INPUT PARAMETER ppStrArray AS HANDLE TO CHARACTER. DEFINE INPUT PARAMETER pfindName AS CHARACTER. END. |
DEFINE VARIABLE cFindName AS CHARACTER NO-UNDO.
DEFINE VARIABLE cNames AS CHARACTER NO-UNDO EXTENT 50. DEFINE VARIABLE hCall AS HANDLE NO-UNDO. CREATE CALL hCall. ASSIGN hCall:CALL-NAME = "nameLookup" hCall:LIBRARY = "myApp.dll" hCall:CALL-TYPE = DLL-CALL-TYPE hCall:RETURN-VALUE-DLL-TYPE = "CHARACTER" hCall:PERSISTENT = TRUE hCall:NUM-PARAMETERS = 2. hCall:SET-PARAMETER(1, "CHARACTER", "INPUT", cNames). hCall:SET-PARAMETER(2, "CHARACTER", "INPUT", cFindName). hCall:INVOKE( ). |