/*------------------------------------------------------------------------ File : testGetLogFilePath.p Purpose : Syntax : Description : Author(s) : walter.riechsteiner Created : Fri May 21 10:43:59 CEST 2021 Notes : ----------------------------------------------------------------------*/ /* *************************** Definitions ************************** */ BLOCK-LEVEL ON ERROR UNDO, THROW. DEFINE VARIABLE cPath AS CHARACTER NO-UNDO. DEFINE VARIABLE cString AS CHARACTER NO-UNDO. /* ******************** Preprocessor Definitions ******************** */ /* *************************** Main Block *************************** */ { super/funktionen.i } cString = 'wari' + CHR(01) + '' + CHR(01) + '1000'. RUN ANMELDUNG ( INPUT cString ). cpath = DYNAMIC-FUNCTION ('getLogFilePfad':U) NO-ERROR. MESSAGE cpath VIEW-AS ALERT-BOX.