public override void Execute() { RetCode rc; var nlFlag = false; gOut.WriteLine(); gEngine.PrintTitle(Title, true); var helper = Globals.CreateInstance <U>(); var j = RecordTable.GetRecordsCount(); var i = 0; foreach (var record in RecordTable.Records) { helper.Record = record; helper.ListRecord(false, false, false, false, false, false); nlFlag = true; if ((i != 0 && (i % (Constants.NumRows - 8)) == 0) || i == j - 1) { nlFlag = false; PrintPostListLineSep(); gOut.Write("{0}Press any key to continue or X to exit: ", Environment.NewLine); Buf.Clear(); rc = Globals.In.ReadField(Buf, Constants.BufSize02, null, ' ', '\0', true, null, gEngine.ModifyCharToNullOrX, null, gEngine.IsCharAny); Debug.Assert(gEngine.IsSuccess(rc)); gOut.Print("{0}", Globals.LineSep); if (Buf.Length > 0 && Buf[0] == 'X') { break; } } i++; } if (nlFlag) { gOut.WriteLine(); } gOut.Print("Done listing {0} record names.", RecordTypeName); }