home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / cedit2.zip / Global_Set.DOC < prev    next >
Text File  |  1993-11-05  |  923b  |  32 lines
  1. Hello, Hope this is of use.
  2.  
  3. Global_Set is a REXX procedure to standardize (and save me time 
  4. recoding everywhere) redundant initailizations.
  5. See below for usage:
  6.  
  7. /* In Calling Program */
  8. Initialize: Procedure Expose Global. LocalGlobal.
  9.    if Global_Set() <> 0 then do
  10.       Say 'Unable to Initialize!'
  11.       exit -1
  12.    end
  13.    numvar = rxVlist(, 'G', 'GlobalQueue')
  14.  
  15. What it does:
  16. 1) Sets ANSI Colors
  17. 2) Loads REXXUTIL functions
  18. 3) Loads YDBAUTIL functions 
  19.    -- Needed to transfer Stem data to calling
  20. 4) Temporarily loads a DLL created by David Brouse (a co-worker of 
  21. mine)
  22.    -- Returns information from IBM Lan Server about the USER logged
  23.       on.
  24.  
  25. Be Aware:
  26. 1) You MUST have the YDBAUTIL.DLL for this routine to work.
  27.    -- On OS/2 Sharware BBS as RXU11.zip
  28. 2) You may need to comment or change the User information if you don't
  29. have a network or you don't have IBM Lan Server.
  30.  
  31.  
  32.