Hi Michael;
The "ContextKeyword" is a client command. It is valid for the Web environment but not for mobile devices.
For example ...
ContextKeyword lo_cs // Context Pointer
sr_pass_data lo_sr // Message structure
Environment lo_env // Environment pointer
lo_ptr = SetPointer (HourGlass!) // Show user 2 wait
IF ib_native_app = TRUE OR &
THIS.of_get_client_type( ) = "WEB" THEN // Native PB or Web?
// Various DOS Environment Variable settings by "KeyWord"
THIS.GetContextService ( "ContextKeyWord", lo_cs) // YES=>Load pointer to CS object
ls_keyword = "PATH"
lo_cs.GetContextkeywords ( ls_keyword, ls_values )
THIS.of_check_context ( ls_values )
is_system_path = ls_values[1]
ls_msg = fn_replace_all ( is_system_path, ";", "; " )
ls_msg = TRIM ( ls_msg )
// This is a lot of information. Only write this if in DEBUG mode!
IF THIS.of_is_debug_mode( ) = TRUE THEN
THIS.of_write_log (Space ( 4 ) + ls_keyword + " - " + ls_msg )
END IF
ls_keyword = "USERPROFILE"
lo_cs.GetContextkeywords ( ls_keyword, ls_values )
THIS.of_check_context ( ls_values )
is_user_profile_path = ls_values[1]
IF THIS.of_is_debug_mode( ) = TRUE THEN
THIS.of_write_log (Space ( 4 ) + ls_keyword + " - " + ls_values [ 1 ] )
END IF
Regards ... Chris