-- INFORMIX Dynamic 4GL Demonstration
--
-- @(#)$Id: logo.per,v 1.4 1998/07/12 20:35:57 jleffler Exp $
--
-- $Product: INFORMIX Dynamic 4GL Demonstration Version 2.00.UC8 (1998-08-25) $

DATABASE formonly
SCREEN
{
[f1                      ]     [ca                                    ]
                               [dir                                   ]

  [d1                                       ][p1        ] [f2                ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
  [d1                                       ][p1        ]
}

ATTRIBUTES
f1 = formonly.f1
     --#, widget="BMP";
f2 = formonly.f2
     --#, widget="BMP";
ca = formonly.nombre;
dir= formonly.direccion;

d1= formonly.nombre_programa;
p1= formonly.programa;

instructions
 screen record sdesplega[9] (nombre_programa,programa)
delimiters " "
END