4gl question

IBM INFORMIX-4GL Version 7.32.FC2X5 Pcode Version 732 This test sample prints "OA" when executed which surprised me. The code_desc table is empty. I would have expected a null value. main define ws_input char(2), ws_sec_type char(2) let ws_sec_type = 'OA' select desc into ws_sec_type from code_desc where code = 1 and type = 'SECTYP' display ws_sec_type end main Or am I losing it? Mark Denham Senior Technical Developer Lincoln Financial 603-226-5483 Notice of Confidentiality: **This E-mail and any of its attachments may contain Lincoln National Corporation proprietary information, which is privileged, confidential, or subject to copyright belonging to the Lincoln National Corporation family of companies. This E-mail is intended solely for the use of the individual or entity to which it is addressed. If you are not the intended recipient of this E-mail, you are hereby notified that any dissemination, distribution, copying, or action taken in relation to the contents of and attachments to this E-mail is strictly prohibited and may be unlawful. If you have received this E-mail in error, please notify the sender immediately and permanently delete the original and any copy of this E-mail and any printout. Thank You.**