Create PROCEDURE LLENAR_TIEMPO4