Write a primitive as if it were vectorised (ie. regardless of its actual shape).

CALL DAT_PUTVx( LOC, EL, VALUE, STATUS )

LOC = CHARACTER $\ast$ ( DAT__SZLOC ) (Given)

EL = INTEGER (Given)

VALUE = ?( EL ) (Given)

STATUS = INTEGER (Given and Returned)

There is a routine for each standard data type; to call them, replace x by C (Character), D (Double), I (Integer), L (Logical), R (Real). See DAT_PUT notes on character conversion.