Attrezzature Hardy

I0 MESSAGE ISAMREAD,20,TIPOCF='C'!CODCF=#101,RAGSOC I0

CODTAB[16,30] MESSAGE ISAMREAD,47,CODART=#101,DESCR D0 CODTAB[1,15]

USE HAATT SELECT STR(BETWEEN(I0,#CODCF,#CODCF))