|
Jan Grove Vejlstrup <jgv@xxxxxxxx>ExtProc('Qp0lGetPathFromFileID')
23-12-2015 11:12
Re: Exact Name of File in Root-Part of IFS
Carsten,
I can't get my little program to work:
H DFTACTGRP(*NO) ACTGRP(*NEW)
/copy ifsio_h
d Qp0lGetPathFromFileID...
d pr *
d bufPointer * value
d size 10u 0 value
d fileid 16a
d Qp0lFID_j ds qualified
d 8a inz(*allx'00')
d gid 10u 0
d fid 10u 0
d MyStat s like(statds64)
d i s 10i 0
d ifsPath s 100a varying
d pathFromApi s 1000a based(p_pathFromApi)
/free
*inlr = *on;
ifsPath = '/jgvtmp/is511551.JPG';
i = stat64(ifsPath : %addr(MyStat));
p_statds64 = %addr(MyStat);
Qp0lFID_j.gid = statds64.st_ino_gen_id;
Qp0lFID_j.fid = statds64.st_ino;
p_pathFromApi = Qp0lGetPathFromFileID (p_pathFromApi:
%size(pathFromApi)
: Qp0lFID_j);
return;
/end-free
The pointer p_pathFromApi that is returned, is *NULL. I've checked fid
and gid with Qp0lGetAttr. They are identical. What am I doing wrong?
Thank you very much in advance.
Best regards
Jan
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.