RE: [MI400] HELP...teraspace errors using MI code

[Njal Fisketjon <njal.fisketjon@xxxxxxxxxxxx>]

> Ok, perhaps this is not an MI problem after all.  I've found that if I
> rename the library containing the file the program is updating to a
> different name, the process works fine.  Rename it back to
> original and it
> fails.  Any suggestions..??

Since the space size has been changed from 127516 to 225016 it may be that
the failing
library contains a space of the old (small) size for the given file.
Space name is 20 characters <file><mbr>

DCL SPCPTR SPCTMPL-SPP  AUTO INIT(SPCTMPL);
DCL DD     SPCTMPL      CHAR(160) AUTO;
DCL DD     *            BIN(4)   DEF(SPCTMPL) POS(1)  INIT(160);
DCL DD     *            CHAR(2)  DEF(SPCTMPL) POS(9)  INIT(X'19EE');
DCL DD     SPCTMPL-NAME CHAR(30) DEF(SPCTMPL) POS(11);
DCL DD     *            CHAR(4)  DEF(SPCTMPL) POS(41) INIT(X'E2000000');
DCL DD     *            CHAR(4)  DEF(SPCTMPL) POS(45) INIT(X'00000000');

/*   DCL DD     *            BIN(4)   DEF(SPCTMPL) POS(49) INIT(127516); */

     DCL DD     *            BIN(4)   DEF(SPCTMPL) POS(49) INIT(225016);

DCL DD     *            CHAR(1)  DEF(SPCTMPL) POS(53) INIT(X'FF');
DCL DD     *            CHAR(4)  DEF(SPCTMPL) POS(54) INIT(X'03000000');
DCL DD     *            CHAR(1)  DEF(SPCTMPL) POS(58) INIT(X'00');
DCL DD     *            CHAR(2)  DEF(SPCTMPL) POS(59) INIT(X'FF00');
DCL DD     *            BIN(4)   DEF(SPCTMPL) POS(61) INIT(0);
DCL SYSPTR CTX-SYP               DEF(SPCTMPL) POS(65);