Copy a record to a trashcan and then delete it
──────────────────────────────────────────────────────────────────────────────

 Syntax

        H_TrashCan( cTable , lSecond , cReason , cDesc )

 Arguments:

      cTable    - Table to be audited
      lSecond   - If .T., use two indexes
      cReason   - Reason for deletion ( code - C2 )
      cDesc     - Reason if code is other - C40

 Returns:

      NIL

 Description:

      The current record in the table cTable is appended to
      TABLES\TRASHCAN\cTable

 Examples:



 Header File: H_LIB52.CH

 Source: TRASHCAN.PRG

 Author:  Martin Colloby