home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / CSAPE32.ARJ / SOURCE / FUNCS / FNCNTRY.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-22  |  1.2 KB  |  57 lines
  1. /*
  2.     fncntry.c    gam         5/31/89
  3.  
  4.     % declaration of the ocountry_struct
  5.  
  6.     C-scape 3.2
  7.     Copyright (c) 1989 by Oakland Group, Inc.
  8.     ALL RIGHTS RESERVED.
  9.  
  10.     Revision History:
  11.     -----------------
  12.      6/06/89 gam    Created and hooked into date_funcs, sdouble_funcs,
  13.                     double_funcs, yesno_funcs, strcomma, & strdecp.
  14.      8/15/89 gam    Took out #include's of stdio.h and string.h
  15.  
  16.     12/21/89 jmd    fixed declaration of strtrans
  17.      3/28/90 jmd    ansi-fied
  18.      8/09/90 jdc    added time_fmt initialization
  19.      8/27/90 jmd    added errmsg initialization
  20.      9/13/90 jmd    added press esc msg
  21.      9/21/90 pmcm    made ocountry OGLOBAL
  22.      9/21/90 pmcm    included oakland.h for OEXTERN definition in fncntry.h
  23. */
  24.  
  25. #include "oakland.h"
  26. #include "fncntry.h"
  27.  
  28. OGLOBAL ocountry_struct ocountry = {
  29.     "Yes",
  30.     "No",
  31.     MMDDYY,
  32.     TIME_24,
  33.     '.',
  34.     ',',
  35.     "Invalid Entry",
  36.     "Press Esc to leave help, Backspace for previous help screen.",
  37.     "Press Escape"
  38. };
  39.  
  40.  
  41. char *strtrans(char *string, int letter, int replace)
  42. /*
  43.     Translates occurences of 'letter' in 'string' with 'replace'.
  44. */
  45. {
  46.     char    *place;
  47.  
  48.     for (place = string; *place != '\0'; place++) {
  49.         if (*place == (char) letter) {
  50.             *place = (char) replace;
  51.         }
  52.     }
  53.  
  54.     return(string);
  55. }
  56.  
  57.