コード例 #1
0
        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);
        }