1705 FOR J=1 TO NCM