Consultor Eletrônico



Kbase 20718: Error 6063: Native 4GL Compile With IBM297 AS/400
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   10/16/2008
Status: Unverified

FACT(s) (Environment):

IBM AS/400
Progress 9.x

SYMPTOM(s):

Error: The table to convert -cpinternal to -cpstream was not found in <filename>. (1546)

Error: You are using -cpinternal <code-page> and -cpstream <code-page>. (1535)

Error: Code page conversion table for <table-name> to <table-name> was not found in <file-name>. (6063)

Errors when using AS/400 with French EBCDIC code page IBM297

CAUSE:

In Progress/400 DataServer versions earlier than 9.1, Native 4GL code page conversions were handled by the AS/400. With the introduction of Progress/400 Version 9.1, code page conversions are implemented on the AS/400 by a convmap.cp file that resides in the AS/400 DataServer installation directory.
Currently, the convmap.cp file does not allow for all possible EBCDIC conversions. Consequently, if using an AS/400 with the French EBCDIC code page IBM297, these errors may be encounted when trying to compile a native 4GL program.

FIX:

Perform the following steps to resolve the problem:
1) Save the current convmap.cp in the DataServer installation
directory for recovery, and also the convmap.dat and
convmap.cp in the Windows installation.

2) Create a new .dat file called (EBCAS400.dat) in the
(prolang/convmap) directory on the Windows installation and
add the following conversion table:

#---------------------------------------------------------------------------
# This contains the data needed to convert from
# ibm037 to ibm297
CONVERT
SOURCE-NAME "IBM037"
TARGET-NAME "IBM297"
TYPE "1"
/*000-015*/ 000 001 002 003 004 005 006 007 008 009 010 011 012 013 014 015
/*016-031*/ 016 017 018 019 020 021 022 023 024 025 026 027 028 029 030 031
/*032-047*/ 032 033 034 035 036 037 038 039 040 041 042 043 044 045 046 047
/*048-063*/ 048 049 050 051 052 053 054 055 056 057 058 059 060 061 062 063
/*064-079*/ 064 065 066 067 124 069 070 071 224 073 144 075 076 077 078 090
/*080-095*/ 080 192 082 083 208 085 086 087 088 089 181 091 092 093 094 176
/*096-111*/ 096 097 098 099 100 101 102 103 104 105 221 107 108 109 110 111
/*112-127*/ 112 113 114 115 116 117 118 119 120 160 122 177 068 125 126 127
/*128-143*/ 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143
/*144-159*/ 186 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
/*160-175*/ 121 189 162 163 164 165 166 167 168 169 170 171 172 173 174 175
/*176-191*/ 074 123 178 179 180 187 182 183 184 185 095 079 188 161 190 191
/*192-207*/ 081 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207
/*208-223*/ 084 209 210 211 212 213 214 215 216 217 218 219 220 106 222 223
/*224-239*/ 072 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239
/*240-255*/ 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255
ENDTABLE
ENDCONVERT

3) Add the EBCAS400.dat to the end of convmap.dat as:

# AS/400 EBCIDIC conversions
INCLUDE
INCLUDE-FILE EBCAS400.dat

4) Recompile the convmap.dat file with PROUTIL.

For example:

proutil -C codepage-compiler convmap.dat convmap.cp

5) Binary FTP the complied (convmap.cp) file to the AS/400
installation directory. The native 4GL compilation should work now.