TIP: Click on subject to list as thread! ANSI
echo: os2prog
to: Rob Hamilton
from: Dan Larson
date: 1994-08-18 07:34:42
subject: RE: ANYONE USING UPM APIS

RH>Thank you Peter, Leif and Carl for your information regarding the problem I
RH>was having with UPMELOCL.  Unfortunately, I already had all that
RH>information, and the thing still won't work.  I stripped out all the
RH>extraneous stuff from my program, and left only the basics, and here it is:

RH> #include 
RH> #define  INCL_32
RH> #include 
RH> #include 
RH> VOID main(INT argc, PCHAR argv[])
RH>      {
RH>      CHAR   UserId[UPM_UIDLEN];
RH>      USHORT UserType;
RH>      SHORT  rc;
RH>      memset(&UserId, 0, UPM_UIDLEN);
RH>      UserType = 0;
RH>      rc = upmelocl(UserId, &UserType);
RH>      }

RH>I know the parameter specifications are correct for upmelocl, as they
RH>worked for upmelocu and upmeulgf, and the routines are defined exactly the
RH>same.  I checked, and there is a #pragma linkage saying that upmelocl is
RH>far16 and pascal.  I'm bewildered (etc.) that upmelocl doesn't work, but
RH>upmelocu and upmeulgf DO.  Sign me

RH>STUMPT.  B-(

RH>R;

Try calling the UPPER case function name UPMELOCL. I never got it to work until
I did so. The upper case version does a few things and then calls the lower cas

version itself. I can't remeber all of the details because I wnet through this 

few months back and just keep reusing the code I got working back then.

___
 * MR/2 1.52 NR * Pascal:  What's it Wirth?

--- WILDMAIL!/WC v4.00h

* Origin: Freezing Point BBS - WDNet HQ - Mpls MN: (1:282/85.0)
SEEN-BY: 12/2442 54/54 620/243 624/50 632/348 640/820 690/660 711/409 410 413
SEEN-BY: 711/430 807 808 809 934 712/353 623 713/888 800/1
@PATH: 282/85 1 270/101 396/1 3615/50 229/2 12/2442 711/409 54/54 711/808 809
@PATH: 711/934

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.