... EndIf Next ntxt:="" ltcambio := .F. otxt:=FCreate( op:temp+"tcambio.txt" ) For a:=iLinea TO nLine oWait:Say( 1,3,"Espere, Convirtiendo response..."+Space(30) ) SysRefresh() linetxt:=Rtrim(memoline(cCode,80,a,3,.t.)) If Left(Rtrim(linetxt),5)="Notas" Exit ...