Objetivo:

Ordenar as Notas em Ordem Decrescente, do Maior ao Menor

Requisitos:

Sem utilizar o Comando SORT
Sem utilizar Sorted Table

Dicas:

Sem Dicas.

Partindo do seguinte código:

TYPES: BEGIN OF ty_students, "CRIA A WORK AREA EM QUE MINHA TABELA VAI SE BASEAR."
         id         TYPE i,                 "ID DO ALUNO."
         name       TYPE string,          "NOME DO ALUNO."
         discipline TYPE string,    "DISCIPLINA DO ALUNO."
         note       TYPE i,               "NOTA DO ALUNO."
       END OF ty_students.          "ENCERRA A WORK AREA."


DATA lt_students TYPE TABLE OF ty_students. "TABELA INTERNA RECEBE OS CAMPOS DA ESTRUTURA COMO COLUNAS."


lt_students = VALUE #( "INSERE VALORES À TABELA INTERNA."
  ( id = 1 name = 'John' discipline = 'Math' note = 8 )
  ( id = 2 name = 'Maria' discipline = 'Portuguese' note = 7 )
  ( id = 3 name = 'Carlos' discipline = 'Science' note = 6 )
  ( id = 4 name = 'Ana' discipline = 'History' note = 9 )
  ( id = 5 name = 'Sophia' discipline = 'Physics' note = 5 )
  ( id = 6 name = 'Pedro' discipline = 'Chemistry' note = 4 )
  ( id = 7 name = 'Laura' discipline = 'Biology' note = 10 )
  ( id = 8 name = 'Gabriel' discipline = 'Geography' note = 1 ) ).

Ordenando Tabela Interna sem SORT

Ordenar Tabela Interna