sábado, 8 de febrero de 2020

Como Usar Continue en VFP

Como Usar Continue en VFP, se utiliza después de que LOCATE logra encontrar un registro, para continuar la operación de LOCATE. CONTINUE mueve el puntero del registro al siguiente registro para el cual la expresión lógica especificada en el LOCATE anterior se evalúa a Verdadero (.T.).

CONTINUE hace que se vuelva a evaluar el último comando LOCATE. El programa comprueba si el nuevo valor contenido en cIniciales ya existe en el campo id_persona de otro registro. Si es así, FOUND( ) seguirá devolviendo el valor .T. y se volverá a ejecutar el código contenido en el bucle DO WHILE. Si el nuevo valor contenido en cIniciales es efectivamente único, FOUND( ) devolverá el valor .F. y la ejecución del programa continuará con la línea de código que figura a continuación de ENDDO.

CONTINUE puede repetirse hasta que se encuentre el final del archivo, o hasta que se alcance el final del ámbito especificado con LOCATE.

Si CONTINUE logra encontrar un registro, RECNO( ) devuelve el número de registro del mismo, FOUND( ) devuelve un valor de Verdadero (.T.), y EOF( ) devuelve un valor de Falso (.F.).

Si CONTINUE no logra encontrar un registro, RECNO( ) devuelve el número de registros de la tabla más uno, FOUND( ) devuelve Falso (.F.), y EOF( ) devuelve Verdadero (.T.).


SET TALK OFF SET CONFIRM OFF SET SAFETY off SET DELETED on Create Table vispre Free (i1 c(20),i2 c(20), i3 c(20),i4 c(20),i5 c(20), i6 c(20), i7 c(20) ) Set Devi To File "temp.txt" x=1 @ x,3 Say "Pais Continente" x=x+1 @ x,1 say REPLICATE("-",30) Select paises Go Top Do While !Eof() @ x,3 Say pais+" "+continente Skip Enddo Set Devi To Screen Select "vispre" Append From "temp.txt" Sdf Thisform.grid1.RecordSource="vispre" Go Top Thisform.Refresh Thisform.grid1.column1.text1.SetFocus






1 comentarios:

  1. If you're looking to lose kilograms then you have to start using this brand new tailor-made keto meal plan diet.

    To create this keto diet service, certified nutritionists, fitness couches, and top chefs have joined together to develop keto meal plans that are productive, convenient, economically-efficient, and delicious.

    Since their grand opening in 2019, 1000's of clients have already completely transformed their body and health with the benefits a certified keto meal plan diet can offer.

    Speaking of benefits: in this link, you'll discover eight scientifically-certified ones provided by the keto meal plan diet.

    ResponderEliminar