! @(#)rankcorr.prg	17.1.1.1 (ES0-DMD) 01/25/02 17:12:29


! ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
!
! .IDENTIFICATION
!
! PROCEDURE : RANKCORR.PRG
! M Peron                                   891111
!
! .PURPOSE
!
! execute the command :
! 
! ASSOCIATE/RANK table col1 col2 [method]
!
! ------------------------------------------------------------
!
DEFINE/PARAM P4 K C " Enter method K (Kendall) or S (Spearmann)"
WRITE/KEYW ACTION/C/1/1 'P4'
RUN APP_EXE:RANKCORR