900-STORE-CMT

900-STORE-CMT-<FileName> commits the comment record to the database.

Using the API in a Program

Before storing a comment you should have used one of the following routines:

You can control the size of the comment by setting the CMT-<Prefix>-EXT-TEXT-SZ variable. A value of zero in this variable tells the API to trim trailing spaces.

If you will use the 900-APPEND-CMT-<FileName> API after the 900-STORE-CMT-<FileName> API, Lawson recommends that you set the size field variable.

Programming Example

This example finds a comment, retrieves the comment text, and stores the text in the database.

Note: The variable names in this example include the three-character database file prefix (<Prefix>). For example, if the program is using the file COMPANY, then the variable CMT<Prefix>-TYPE would be CMTCOM-TYPE . 
        PERFORM 900-FIND-BEGRNG-CMT-COMPANY.
        MOVE COM-COMMENTTEXT     TO CMTCOM-EXT-TEXT.
        PERFORM 900-STORE-CMT-COMPANY.