...
| Code Block |
|---|
D getenv PR * ExtProc('getenv')
D name * Value Options(*String)
D useragent s 250A
/Free
useragent = %str(getenv('HTTP_USER_AGENT'));
If %scan('Android' : useragent) > 0;
// This is an Android device
EndIf;
/End-Free
|
...