ca.portal.admin

Re: Get storage

Discussion created by ca.portal.admin on Jul 22, 2009
Here is my code. (No IF.)

---------------------------------------
GET STORAGE =20
LENGTH WS-STORAGE-LENGTH =20
POINTER WS-STORAGE-POINTER=20
KEEP LONG USER =20
VALUE WS-STORAGE-INIT =20
STGID WS-STORAGE-ID.=20
--------------------------------------- =20

And here are the error messages. If I comment out the length, then I =
get a similar error on the pointer. I also tried coding a value for the =
length (instead of a field), but it did not help.

---------------------------------------
00001 000000*RETRIEVAL =
=20
00579 LENGTH WS-STORAGE-LENGTH =
=20
| =
=20
E DML004 SYNTAX ERROR =
=20
| =
=20
E DML004 SYNTAX ERROR =
=20
=
=20
* * * MESSAGE SUMMARY FOR PROGRAM S079K076 * * * =
=20
E DML004 SYNTAX ERROR LINE 579 =
COL 16
E DML004 SYNTAX ERROR LINE 579 =
COL 16 =20
---------------------------------------

Outcomes