<html>
<head> <title>AT LAST .. ENDAT</title> </head> <BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#0099FF" VLINK="#AA0000"> <p align="left">⚠ <b>
<span>AT LAST .. ENDAT</span>⚠ </b>
</p>
<p align="left">⚠ <b>
Definicin⚠ </b>
</p>
<p align="left">La sentencia AT LAST .. ENDAT slo puede
ser utilizada dentro de un bucle⚠ <a href="loop_endloop.htm" tppabs="loop_endloop.htm">
LOOP .. ENDLOOP⚠ </a>
e identifica un bloque de proceso. La sentencia se ejecuta con el ltimo valor o ltimo registro de la sentencia⚠ <a href="loop_endloop.htm" tppabs="loop_endloop.htm">
LOOP .. ENDLOOP⚠ </a>
.</p>
<p align="left">⚠ <b>
Sintaxis:⚠ </b>
</p>
⚠ <b>
AT LAST.⚠ </b>
</p>
<p align="left"> <bloque-sentencias></p>
<p align="left">ENDAT.</p>
<p>La sentencia AT LAST se cierra con ENDAT, identificando de
esta forma un bloque de proceso. En un bloque AT LAST .. ENDAT el rea de trabajo no se rellena con la lnea actual de la tabla interna. Todos los campos que no forman parte de la clave estndar de la tabla toman el valor inicial. Para la condicin de lnea LAST el sistema sobrescribe todos los campos de la clave estndar, que se encuentran a la derecha del campo <campo> con asterisco (*). No se debe utilizar la sentencia AT LAST .. ENDAT en combinacin con la sentencia⚠ <a href="loop_endloop.htm" tppabs="loop_endloop.htm">
LOOP .. ENDLOOP⚠ </a>
con las clusulas FROM, TO o WHERE.</p>
<p>⚠ <b>
Ejemplo 1:⚠ </b>
</p>
NAME(30), PRODUCT(20), SALES TYPE I, END OF COMPANIES.
...
LOOP AT COMPANIES.AT NEW NAME. NEW-PAGE. ENDAT. WRITE: / COMPANIES-PRODUCT, COMPANIES-SALES. AT LAST. SUM. WRITE: / COMPANIES-NAME, COMPANIES-SALES. ENDAT.
ENDLOOP.</pre>
<p align="left">⚠ <b>
Vease tambin: ⚠ </b>
⚠ <a href="loop_endloop.htm" tppabs="loop_endloop.htm">
LOOP⚠ </a>
.</p>
</body>
</html>