INFORMATION !PTERM to UniVerse TPARM 
Author Message
 INFORMATION !PTERM to UniVerse TPARM

I'm moving from Prime Information (PI) to UniVerse 9.4.1.2H on Win NT 4.0
(INFORMATION flavour).

My question is:
How do I convert the following PI code to UniVerse BASIC?

       CALL !PTERM('-ECHO NODELAY')
       CALL !PTERM('-HALF NOLF')
       XX =       '-ERASE ':CHAR(252)
       CALL !PTERM(XX)
       OLD.BS = STATUS()
       **
       XX =       '-ERASE ':CHAR(OLD.BS)
       CALL !PTERM(XX)
       CALL !PTERM('-ECHO DELAY')
       CALL !PTERM('-FULL')

Morten Haugen, Norway



Sat, 14 Apr 2001 03:00:00 GMT
 INFORMATION !PTERM to UniVerse TPARM

On Tue, 27 Oct 1998 08:48:33 +0100, "Morten Haugen"

Quote:

>I'm moving from Prime Information (PI) to UniVerse 9.4.1.2H on Win NT 4.0
>(INFORMATION flavour).

>My question is:
>How do I convert the following PI code to UniVerse BASIC?

>       CALL !PTERM('-ECHO NODELAY')
>       CALL !PTERM('-HALF NOLF')
>       XX =       '-ERASE ':CHAR(252)
>       CALL !PTERM(XX)
>       OLD.BS = STATUS()
>       **
>       XX =       '-ERASE ':CHAR(OLD.BS)
>       CALL !PTERM(XX)
>       CALL !PTERM('-ECHO DELAY')
>       CALL !PTERM('-FULL')

>Morten Haugen, Norway

I believe this would work...
EXECUTE "PTERM -ECHO NODELAY -HALF NOLF -ERASE ":CHAR(252)
OLD.BS = STATUS()
EXECUTE "PTERM -ERASE ":CHAR(OLD.BS):" -ECHO DELAY -FULL"

Joe Walter

http://jaw1.home.mindspring.com

- Show quoted text -



Sat, 14 Apr 2001 03:00:00 GMT
 INFORMATION !PTERM to UniVerse TPARM

Quote:

>On Tue, 27 Oct 1998 08:48:33 +0100, "Morten Haugen"

>>I'm moving from Prime Information (PI) to UniVerse 9.4.1.2H on Win NT 4.0
>>(INFORMATION flavour).

>>My question is:
>>How do I convert the following PI code to UniVerse BASIC?

>>       CALL !PTERM('-ECHO NODELAY')
>>       CALL !PTERM('-HALF NOLF')
>>       XX =       '-ERASE ':CHAR(252)
>>       CALL !PTERM(XX)
>>       OLD.BS = STATUS()
>>       **
>>       XX =       '-ERASE ':CHAR(OLD.BS)
>>       CALL !PTERM(XX)
>>       CALL !PTERM('-ECHO DELAY')
>>       CALL !PTERM('-FULL')

Pretty easy, actually...

UniVerse has full support for the PI !PTERM subroutine...

Just run this code unchanged...
--
David T. Meeks                     || "But here I am in limbo, dark and deep
Principal Software Engineer        ||  and thick with clouds o'erspread
Ardent Software, Inc.              ||  the eons tick like seconds in



Sat, 14 Apr 2001 03:00:00 GMT
 
 [ 3 post ] 

 Relevant Pages 

1. Information about Universe/Pick

2. problem converting from Prime Information to UniVerse for NT

3. Pick, Unidata, Universe, Prime Information

4. Differences between Universe and Information??? (fwd)

5. Looking for uniVerse/INFORMATION/PICK/Reality/Unidata users

6. Prime Information to uniVerse NT Conversions Tools

7. Need some information on UNIVERSE

8. Need some information on UNIVERSE

9. NT Universe converting to Linux Universe

10. universe on rs6000 to universe NT question

11. Problem W/ UniVerse Obejcts and Windows 2000 Server (UniVerse 9.4 for NT)

12. Restore Universe/Unix uvbackup to Universe/NT?


 
Powered by phpBB® Forum Software