Repasando temas del foro, he intentado aplicar, sin éxito, las soluciones aportadas al tema que con éste mísmo título planteó el compañero Breew (19/2/2017).
No consigo que me funcione:
Código COBOL:
MOVE POW-SORTORDER-ASC TO 'SortOrder' OF LISTVIEW.
MOVE POW-ARG-COLUMNINDEX TO "SortColumn" of LISTVIEW.
IF POW-ARG-COLUMNINDEX = 1 OR 4 OR 5 THEN MOVE POW-SORTKIND-NUMERIC TO 'SortKind' OF LISTVIEW
ELSE
MOVE POW-SORTKIND-TEXT TO 'SortKind' OF LISTVIEW END-IF
MOVE POW-ARG-COLUMNINDEX TO 'SortKind' OF LISTVIEW.
Muchas gracias.
|
|