FastSort Manual

Sorting in Parallel
FastSort Manual—429834-003
6-25
Parallel Sorting From TAL Programs
!-----------------------------------------------------------!
! Return statistics and check the sort completion. !
!-----------------------------------------------------------!
error := SORTMERGESTATISTICS (ctlblk,length,stat);
IF error THEN ! Check for SORTMERGESTATISTICS error.
BEGIN
length := SORTERRORSUM (ctlblk,
error^buf, error^code,
error^source,
sub^index, sub^cpu^pin);
! Process the SORTMERGESTATISTICS error.
END;
END; ! of the MAIN procedure !
!-----------------------------------------------------------!
Example 6-3. TAL Example of a Parallel Sort Run (page 3 of 3)