×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
I do the following:
p_dirent = readdir(dir);
dow p_dirent <> *NULL;
WkName = d_name;
%Len(WkName) = d_namelen;
If (WkName <> '.') and (WkName <> '..');
// do stuff
EndIf;
p_dirent = readdir(dir);
enddo;
You may have already received enough answers to find your problem, though.
--
Sean Porterfield
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: Tuesday, November 20, 2012 15:16
To: rpg400-l@xxxxxxxxxxxx
Subject: MCH1210 - Receiver value too small to hold result.
I am getting a MCH1210 error
Statement in Error . . . . . . . . . . : 00001273
RPG Routine . . . . . . . . . . . . . : DRILLDOW
Number of Parameters . . . . . . . . . :
Message Type . . . . . . . . . . . . . : MCH
Additional Message Info . . . . . . . : 1210
Message Data . . . . . . . . . . . . . :
Receiver value too small to hold result.
DrillDown(DirectoryName); // MCH1210 error here!!!!!
Source listing
http://code.midrange.com/2c08ed8d39.html
Compile listing
http://code.midrange.com/598444bec7.html
Dump
http://code.midrange.com/24669d27c8.html
Rob Berendt
--
This email is confidential, intended only for the named recipient(s) above and may contain information that is privileged. If you have received this message in error or are not the named recipient(s), please notify the sender immediately and delete this email message from your computer as any and all unauthorized distribution or use of this message is strictly prohibited. Thank you.
midrange.com
