{
{    The purpose of this procedure is to store a choice and a response string
{  into an action menu descriptor.
{
{       OFP$STORE_MENU_CHOICE_R1 (MENU_ID, ACTIVE_OPERATOR_CLASSES, CHOICE,
{             RESPONSE_STRING, STATUS)
{
{ MENU_ID: (input) This parameter specifies the unique identifier of the menu
{       descriptor into which a choice is to be stored.
{
{ ACTIVE_OPERATOR_CLASSES: (input) This parameter specifies the set of operator
{       classes in which the caller is active.
{
{ CHOICE: (input) This parameter specifies the choice to be stored in the
{       menu descriptor.
{
{ RESPONSE_STRING: (input) This parameter specifies the response string to be
{       stored in the menu descriptor.
{
{ STATUS: (output) This parameter specifies the status of the request.
{
{       CONDITION: ofe$invalid_menu_id
{
