Consultor Eletrônico



Kbase P17178: How to manipulate a MEMPTR variable type with character stri
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   30/01/2003
Status: Unverified

GOAL:

How to manipulate a MEMPTR variable type with character strings?

FIX:

Below is a sample code to demonstrate the use of a MEMPTR variable type with strings.

DEFINE VARIABLE vmptrTest AS MEMPTR NO-UNDO.
DEFINE VARIABLE vcTest AS CHARACTER NO-UNDO.

SET-SIZE(vmptrTest) = 50.

PUT-STRING(vmptrTest,1) = "This character data is used for testing purposes!".

ASSIGN vcTest = GET-STRING(vmptrTest,1).

MESSAGE vcTest
VIEW-AS ALERT-BOX INFO BUTTONS OK.

SET-SIZE(vmptrTest) = 0.