<?xml version="1.0" encoding="UTF-8"?>
<process xmlns:blue="http://www.e-marson.com/bluelemon">
<descriptor>
<name>com/emarson/lemonade/examples/mobank/AuthenticationScreen</name>
<version>1.0</version>
<description>
This is the screen with two text fields to specify userId and password.
Both the fields are required.
</description>
<vendor>E-MARSON</vendor>
</descriptor>
<path>
<subprocess name="action for 'Exit'">
<source>com/emarson/lemonade/templates/ExitFromApplication</source>
<resultTo>actionForExit</resultTo>
</subprocess>
<subprocess name="action for 'Continue'">
<source>com/emarson/lemonade/examples/mobank/Validate</source>
<resultTo>readFieldsAndProceed</resultTo>
</subprocess>
<action name="a form to specify user data">
<type>general/bluelemon/code</type>
<definition resultTo="screen">
<blue:newInstance module="com/emarson/lemonade/bluelemon/midp1/TextField"
toVariable="userIdField"/>
<blue:call object="userIdField" method="initialize">
<blue:argument type="String" value="User ID:"/>
<blue:argument type="String" value=""/>
<blue:argument type="byte" value="8"/>
<blue:argument type="byte" value="TextField.ANY"/>
</blue:call>
<blue:newInstance module="com/emarson/lemonade/bluelemon/midp1/TextField"
toVariable="passwordField"/>
<blue:call object="passwordField" method="initialize">
<blue:argument type="String" value="Password:"/>
<blue:argument type="String" value=""/>
<blue:argument type="byte" value="16"/>
<blue:argument type="int" value="TextField.ANYORPASSWORD"/>
</blue:call>
<blue:newInstance module="com/emarson/lemonade/bluelemon/midp1/Form"
toVariable="form"/>
<blue:call object="form" method="initialize">
<blue:argument type="String" value="moBank - log in"/>
</blue:call>
<blue:call object="form" method="appendItem">
<blue:argument type="variable" name="userIdField"/>
</blue:call>
<blue:call object="form" method="appendItem">
<blue:argument type="variable" name="passwordField"/>
</blue:call>
<blue:call manager="UtilsManager" method="getActionCommand"
toVariable="command">
<blue:argument type="String" value="Exit"/>
<blue:argument type="byte" value="ActionCommand.EXIT"/>
<blue:argument type="byte" value="0"/>
<blue:argument type="byteArr" contextKey="actionForExit"/>
</blue:call>
<blue:call object="form" method="addCommand">
<blue:argument type="variable" name="command"/>
</blue:call>
<blue:call manager="UtilsManager" method="getActionCommand"
toVariable="command">
<blue:argument type="String" value="Continue"/>
<blue:argument type="byte" value="ActionCommand.OK"/>
<blue:argument type="byte" value="0"/>
<blue:argument type="byteArr" contextKey="readFieldsAndProceed"/>
</blue:call>
<blue:call object="form" method="addCommand">
<blue:argument type="variable" name="command"/>
</blue:call>
<blue:call manager="GeneralManager" method="setCurrent">
<blue:argument type="variable" name="form"/>
</blue:call>
</definition>
</action>
<finish name="done">
<return>screen</return>
</finish>
</path>
</process>