Create PROCEDURE LLENAR_HECHOS9