http://www.ousob.com --- Legacy Redefined #include <stdlib.h> #include <string.h> #include <extend50.h> CLIPPER b_getenv() { char *retPtr = NULL; char *envVar = strupr( _parc(1) ); if( !ISCHAR(1) ){ _retc(retPtr); return; } retPtr = getenv(envVar); _retc(retPtr); }