RddList Function |
Namespace: XSharp.RT
FUNCTION RddList() AS ARRAY CLIPPER
[ClipperCallingConventionAttribute(new string[] { ... })] public static Array RddList()
1PROCEDURE Start() 2 LOCAL aRDD AS ARRAY 3 LOCAL wRDDs AS SHORTINT 4 LOCAL i AS SHORTINT 5 USE customer NEW 6 USE address NEW 7 USE memos VIA DBFMDX NEW 8 wRDDs:= ; RDDCount(RDT_FULL+RDT_TRANSFER+RDT_HIDDEN) 9 aRDD := ; RDDList(RDT_FULL+RDT_TRANSFER+RDT_HIDDEN) 10 FOR i := 1 UPTO wRDDs 11 QOut(aRDD[i]) 12 NEXT 13 RETURN