Hi mf_galberico,
Your revised program fails with the 163 error in Server Express for me also. This is caused by the fact that you are doing a group move, and overlaying the first position of the numeric edited field F30TIT0-100-COD-BANCA field:
27 03 F30TIT0-100-COD-BANCA PIC +9(3).
with the value "6000". I believe you will get the "163 - Illegal character in numeric field " error anytime you try to use this field in a numeric move, and that first byte does not contain a "+" or "-" .
As Fano mentioned, you can suppress this checking for numeric values at runtime by using COBSW=-F. If you are building to .gnt files, you can also suppress this check with the directive NOCHECKNUM.