FiveTech Software tech support forums

... que no se si funcionará en fwppc, de todas maneras te escribo el nombre de la funcion de como quedaria tu funcion LOCALIZA: Function Localiza(cKey,oTbr,nKey) Local nSeekrec:=0,xTbr xTbr:=oTbr nSeekec:=recno() if GetASyncKey(VK_BACK) --> Esta es la funcion cKey:=substr(cKey,1,Len(cKey)-1) ...

... xValue, 1 ) ) + 1 ) ) CASE ( cType == "N" ) xValue++ CASE ( cType == "D" ) xValue++ ENDCASE xNext := xValue RETURN( xNext ) FUNCTION Moveb(cAlias,cKey,nReg) LOCAL nNext:=0 IF nReg=0 .OR. (cAlias)->(LastRec())=0 .OR. !(&((cAlias)->(IndexKey(0)))=cKey) (cAlias)->(DbSkip(0)) ELSEIF nReg>0 ...

... xValue, 1 ) ) + 1 ) ) CASE ( cType == "N" ) xValue++ CASE ( cType == "D" ) xValue++ ENDCASE xNext := xValue RETURN( xNext ) FUNCTION Moveb(cAlias,cKey,nReg) LOCAL nNext:=0 IF nReg=0 .OR. (cAlias)->(LastRec())=0 .OR. !(&((cAlias)->(IndexKey(0)))=cKey) (cAlias)->(DbSkip(0)) ELSEIF nReg>0 ...