home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / rxasyn20.zip / RXVPFUNC.H < prev   
Text File  |  1994-12-27  |  3KB  |  66 lines
  1. /*****************************************************************************/
  2. /*                                                                           */
  3. /*  MODULE         RXVPFUNC.H                                                */
  4. /*                                                                           */
  5. /*  VERSION        Version 2.0 - 26th Dec 1994                               */
  6. /*                                                                           */
  7. /*  COPYRIGHT      Copyright (c) 1993, 1994 by Crucial Applications          */
  8. /*                             All rights reserved.                          */
  9. /*                                                                           */
  10. /*  DESCRIPTION    Header file for RXVPFUNC.C Rexx Variable Pool Functions   */
  11. /*                                                                           */
  12. /*****************************************************************************/
  13.  
  14. #ifndef RXVPFUNC_H_INCLUDED
  15. #define RXVPFUNC_H_INCLUDED
  16.  
  17. /*********************************************************************/
  18. /* General definitions                                               */
  19. /*********************************************************************/
  20.  
  21. #define  ROUTINE_VALID             0   /* Successful completion      */
  22. #define  ROUTINE_INVALID          40   /* Raise Rexx error           */
  23.  
  24. #define  RC_REXX_FALSE             0   /* Rexx result for false      */
  25. #define  RC_REXX_TRUE              1   /* Rexx result for true       */
  26.  
  27. /*********************************************************************/
  28. /* Some useful macros.                                               */
  29. /*********************************************************************/
  30.  
  31. #define BUILDRXSTRING(t,s) { \
  32.    strcpy((t)->strptr,(s)); \
  33.    (t)->strlength = strlen((t)->strptr); \
  34. }
  35.  
  36. #define BUILDRXDOSRET(t,i) { \
  37.    sprintf((t)->strptr, "%d", i); \
  38.    (t)->strlength = strlen((t)->strptr); \
  39. }
  40.  
  41. /*********************************************************************/
  42. /* Prototypes                                                        */
  43. /*********************************************************************/
  44.  
  45. VOID   InitVar(   PSHVBLOCK pRexxVar, PSHVBLOCK pNextPtr, PSZ VarName );
  46. APIRET FetchVar(  PSHVBLOCK pRexxVar );
  47. VOID   EditVar(   PSHVBLOCK pRexxVar, USHORT VarType, PVOID VarValue );
  48. APIRET UpdateVar( PSHVBLOCK pRexxVar );
  49. VOID   FreeVar(   PSHVBLOCK pRexxVar );
  50.  
  51. APIRET NewRexxValue( PSZ VarName, USHORT VarType, PVOID VarValue );
  52. APIRET GetRexxValue( PSZ VarName, USHORT VarType, PVOID VarValue );
  53. APIRET SetRexxValue( PSZ VarName, USHORT VarType, PVOID VarValue );
  54.  
  55. APIRET NewStemValue( PSZ VarStem, USHORT VarNumb, USHORT VarType, PVOID VarValue );
  56. APIRET GetStemValue( PSZ VarStem, USHORT VarNumb, USHORT VarType, PVOID VarValue );
  57. APIRET SetStemValue( PSZ VarStem, USHORT VarNumb, USHORT VarType, PVOID VarValue );
  58.  
  59. /*********************************************************************/
  60.  
  61. #endif
  62.  
  63. /*********************************************************************/
  64. /* END MODULE                                                        */
  65. /*********************************************************************/
  66.