RTOUCH
- ************************************************* - PEARL-Subroutine: * - * - RTOUCH(file DATION ALPHIC IDENT) - RETURNS(CHAR(20))* - * - NAME: RTOUCH1.1 * - * - This function reads the fileinfo using * - the given Dation and delivers a string * - of the type "hh:mm:ss dd-mm-yyyy" * - Clock and date are separated by 2 Blanks. * - * - The procedure will not change the state of * - the file at all. If the operation cannot be* - executed without error, an empty string * - (all blanks) will be produced * - * - Author and (c) 2000 Gerth * - ------------------------------------------------* - History: * - * - 1.0 27.04.2000 Date of birth (Ge) * - 1.1 24.08.2000 17er-Slice with $80 (Wo)*1/1 - *************************************************