DECLARE INTEGER GetFileSecurity IN advapi32;
        STRING lpFileName, INTEGER RequestedInformation,;
        STRING @pSecurityDescriptor, INTEGER nLength,;
        INTEGER @lpnLengthNeeded

LOCAL cDescriptor, nBufsize
cDescriptor=REPLICATE(Chr(0), 256)
nBufsize=0

= GetFileSecurity(cFile, OWNER_SECURITY_INFORMATION,;
        @cDescriptor, LEN(cDescriptor), @nBufsize)

DECLARE INTEGER GetFileSecurity IN advapi32;
        STRING lpFileName, INTEGER RequestedInformation,;
        INTEGER pSecurityDescriptor, INTEGER nLength,;
        INTEGER @lpnLengthNeeded