ASQL()
Devuelve en tipo de datos Arreglo bidimensional el contenido del cursor generador por la consulta SQL. Ejemplo: aSql:=ASQL(“SELECT CAMPO FROM XTABLA”). aSql Contiene la lista de datos. MsgAlert(aSql[1,1]), muestra la primera columna y columna. Para evaluar la respuesta puede utilizar: ViewArray(aSql)
DO(bWhile,bFor,bRun)
Ejecuta en forma cíclica según el proceso indicado en si se cumple la condición de hasta que se cumpla.
#DPXBASE.CH
FUNCTION MAIN()
LOCAL nTotal:=0,oCursor
oCursor:=OpenTable(“ SELEC DOC_NETO,DOC_FECHA FROM DPDOCCLI”,.T.)
DO({||!oCursor:Eof()},;
{||oCursor:DOC_FECHA=oDp:dFecha},;
{||nTotal:=nTotal+oCursor:DOC_NETO,oTablas:skip(1)})
Totaliza el Monto neto según los documentos emitidos según la fecha del sistema.