ROUTINE GlobalLock minarg=1 maxarg=1 stackpop=called module=Kernel32 returns=long; arg 1 num input byvalue format=pib4.; * HGLOBAL hMem // address of the global memory object