Kbase P21927: How can I save on a file a print on the display?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  27/03/2003 |
|
Status: Unverified
GOAL:
How to save the current contents of an editor widget to a file?
FIX:
Use the SAVE-FILE method. A sample of this could be:
DEFINE VARIABLE cFILENAME AS CHARACTER NO-UNDO.
DEFINE VARIABLE OKpressed AS LOGICAL NO-UNDO.
SYSTEM-DIALOG GET-FILE cFILENAME
UPDATE OKpressed SAVE-AS.
IF OKpressed THEN
EDITOR-1:SAVE-FILE(cFILENAME).