FWD » Core Development » User Interface

package com.goldencode.testcases.delete;

import com.goldencode.p2j.util.*;

import com.goldencode.testcases.ui.delete.*;

import com.goldencode.p2j.ui.*;

import com.goldencode.p2j.persist.*;

import com.goldencode.testcases.dmo._temp.*;

import com.goldencode.p2j.persist.lock.*;

import static com.goldencode.p2j.util.BlockManager.*;

import static com.goldencode.p2j.ui.LogicalTerminal.*;

/**

 * Business logic (converted to Java from the 4GL source code

 * in delete/browse2.p).

 */

public class Browse2

{

   TempRecord1.Buf tt = TemporaryBuffer.define(TempRecord1.Buf.class, "tt", "tt", false);

   Browse2X xFrame = GenericFrame.createFrame(Browse2X.class, "x");

   Browse2F fFrame = GenericFrame.createFrame(Browse2F.class, "f");

   Browse2Y yFrame = GenericFrame.createFrame(Browse2Y.class, "y");

   final QueryWrapper query0 = new QueryWrapper("q", true);

   integer idx = new integer(0);

   character items = new character("");

   /**

    * External procedure (converted to Java from the 4GL source code

    * in delete/browse2.p).

    */

   public void execute()

   {

      externalProcedure(new Block()

      {

         public void body()

         {

            fFrame.openScope();

            xFrame.openScope();

            yFrame.openScope();

            RecordBuffer.openScope(tt);

            FrameElement[] elementList0 = new FrameElement[]

            {

               new Element(new FieldReference(tt, "txt"), fFrame.widgetBTxtColumn())

            };

            fFrame.widgetb().registerQuery(query0, elementList0);

            tt.create();

            tt.setTxt(new character("1st"));

            tt.create();

            tt.setTxt(new character("3rd"));

            EventList list0 = new EventList();

            list0.addEvent("RETURN", xFrame.widgetIdx());

            registerTrigger(list0, TriggerBlock0.class, Browse2.this);

            EventList list1 = new EventList();

            list1.addEvent("RETURN", yFrame.widgetItems());

            registerTrigger(list1, TriggerBlock1.class, Browse2.this);

            query0.assign(new AdaptiveQuery(tt, (String) null, null, "tt.id asc"));

            query0.open();

            fFrame.enable();

            FrameElement[] elementList1 = new FrameElement[]

            {

               new WidgetElement(xFrame.widgetIdx())

            };

            xFrame.enable(elementList1);

            FrameElement[] elementList2 = new FrameElement[]

            {

               new WidgetElement(yFrame.widgetItems())

            };

            yFrame.enable(elementList2);

            EventList list2 = new EventList();

            list2.addEvent("WINDOW-CLOSE", currentWindow());

            LogicalTerminal.waitFor(null, list2);

         }

      });

   }

   public class TriggerBlock0

   extends Trigger

   {

      public void body()

      {

         xFrame.assignScreenValue(new Element(idx, xFrame.widgetIdx()));

         messageBox(idx, ALERT_INFO, BTN_OK, (String) null);

         fFrame.widgetBTxtColumn().delete(idx);

      }

   }

   public class TriggerBlock1

   extends Trigger

   {

      public void body()

      {

         yFrame.assignScreenValue(new Element(items, yFrame.widgetItems()));

         messageBox(items, ALERT_INFO, BTN_OK, (String) null);

         fFrame.widgetBTxtColumn().delete(items);

      }

   }

}