Click above to get retro games delivered to your door ever month!

userconfig()


Syntax:     userconfig(<@pEc>)

Purpose:    Load printer escape codes from user database

Arguments:  <@pEc> is the printer escape code array.  It must be passed
            by reference

Returns:    Fills array with escape codes

Note:       pEc[34] is created after a call to cfgmemvar()
            If a new user is accessing the system for the first time,
            userconfig() will not find his/her user ID in the user
            database.  In this case, a record will be created for the
            user with HP Laserjet III as the default printer and the
            HP III escape codes will be loaded into pEc.

            Printer Escape Codes

               pEc[1] == name
               pEc[2] == port
               pEc[3] == file name to redirect to
               pEc[4] == network destination
               pEc[5] == double wide on
               pEc[6] == double wide off
               pEc[7] == italics on
               pEc[8] == italics off
               pEc[9] == bold on
              pEc[10] == bold off
              pEc[11] == pica
              pEc[12] == elite
              pEc[13] == superscript on
              pEc[14] == superscript off
              pEc[15] == subscript on
              pEc[16] == subscript off
              pEc[17] == underline on
              pEc[18] == underline off
              pEc[19] == compressed on
              pEc[20] == compressed off
              pEc[21] == draft
              pEc[22] == letter quality
              pEc[23] == ibm extended character set
              pEc[24] == portrait
              pEc[25] == landscape
              pEc[26] == form length 8
              pEc[27] == form length 11
              pEc[28] == form length 14
              pEc[29] == lines / inch = 6
              pEc[30] == lines / inch = 8
              pEc[31] == user field 1
              pEc[32] == user field 2
              pEc[33] == initialization string
              pEc[34] == termination string

Library:    TC_SYS.LIB

----------------------------------- Example ----------------------------------

   setenv(.t.)

   if( !cfgmemvar() )
       b_errmsg(12," Unable to open configuration file! ","15/1")
       eoj()
   endi

   if( !userconfig(@pEc) )
       b_errmsg(12," Unable to open user file! ","15/1")
       eoj()
   endi