OpenCOBOL 1.1pre-rel
|
00001 /* 00002 * Copyright (C) 2002-2009 Keisuke Nishida 00003 * Copyright (C) 2007-2009 Roger While 00004 * 00005 * This library is free software; you can redistribute it and/or 00006 * modify it under the terms of the GNU Lesser General Public License 00007 * as published by the Free Software Foundation; either version 2.1, 00008 * or (at your option) any later version. 00009 * 00010 * This library is distributed in the hope that it will be useful, 00011 * but WITHOUT ANY WARRANTY; without even the implied warranty of 00012 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00013 * GNU Lesser General Public License for more details. 00014 * 00015 * You should have received a copy of the GNU Lesser General Public 00016 * License along with this library; see the file COPYING.LIB. If 00017 * not, write to the Free Software Foundation, 51 Franklin Street, Fifth Floor 00018 * Boston, MA 02110-1301 USA 00019 */ 00020 00021 #ifndef COB_STRINGS_H 00022 #define COB_STRINGS_H 00023 00024 #include <libcob/common.h> 00025 00026 extern void cob_inspect_init (cob_field *, const int); 00027 extern void cob_inspect_start (void); 00028 extern void cob_inspect_before (const cob_field *); 00029 extern void cob_inspect_after (const cob_field *); 00030 extern void cob_inspect_characters (cob_field *); 00031 extern void cob_inspect_all (cob_field *, cob_field *); 00032 extern void cob_inspect_leading (cob_field *, cob_field *); 00033 extern void cob_inspect_first (cob_field *, cob_field *); 00034 extern void cob_inspect_trailing (cob_field *, cob_field *); 00035 extern void cob_inspect_converting (cob_field *, cob_field *); 00036 extern void cob_inspect_finish (void); 00037 00038 extern void cob_string_init (cob_field *, cob_field *); 00039 extern void cob_string_delimited (cob_field *); 00040 extern void cob_string_append (cob_field *); 00041 extern void cob_string_finish (void); 00042 00043 extern void cob_unstring_init (cob_field *, cob_field *, const size_t); 00044 extern void cob_unstring_delimited (cob_field *, const int); 00045 extern void cob_unstring_into (cob_field *, cob_field *, cob_field *); 00046 extern void cob_unstring_tallying (cob_field *); 00047 extern void cob_unstring_finish (void); 00048 00049 #endif /* COB_STRINGS_H */