DSICLOCK    ICR (5372)

This can be a closed form of a global or it can be a
file number.  If it is a file number, then IFN is also required.  The file
number can be the file number of the entire file or the subfile number of
corresponding to the ^DD() value.  If it is a subfile, then the IFN parameter
must be set accordingly.

This is the internal entry number (record number) of
the record that you wish to lock or unlock in the file specified in the REF
parameter.  IFN is required if the REF parameter is a file or subfile number.

IFN is the IEN if you are locking the entire record.  If you are locking a
subrecord in a multiple, the IFN must be a proper IENS at the appropriate
level as documented in the Fileman DBS manuals.

This flag indicates whether or not the global
reference should be locked or unlocked.  The default value is 1 which means to
lock the global.  If it has a value of -1 then unlock the global reference.

Boolean flag to denote calling as a function (=1) vs
calling from the rpc.

Returns 1 if successful, else returns -1^error
message.