Re: Return in Input block
Posted in 1997
Topics: Stored Procedures & SPL, Connectivity: ESQL/C, 4GL & Embedded SQL
1.Please put the input in loop. or 2. use NEXT FIELD clause after field f005. Nagesh cnhx@polisoft.fr Monday December 22, 1997 08:08 AM Please respond to cnhx@polisoft.fr To: informix-list@rmy.emory.edu cc: (bcc: Nagesh Daliparthy/PI/Prudential) Subject: Return in Input block Hi, In field f005 if I send a RETURN key, I exit of the INPUT block (I want do that with the CTRL-P key). Why ? If I have a RETURN key, I want to go to the next line. Here my code -> 4GL ------ OPEN WINDOW w_l010 AT 03,03 WITH FORM "f_L010" ATTRIBUTE(FORM LINE FIRST, BORDER) DISPLAY " " AT 06,01 ATTRIBUTE(UNDERLINE, DIM) DISPLAY " Paragraphe Libre " AT 07,01 ATTRIBUTE(UNDERLINE, REVERSE, DIM) INPUT date1, date2, intitule2, remarque, libre FROM ve_l010.date1, ve_l010.date2, ve_l010.intitule, ve_l010.rem, ve_l010. libre ON KEY (CONTROL-P) EXIT INPUT END INPUT CLOSE WINDOW w_l010 -> f_L010.PER ------------- DATABASE indus SCREEN { Date 1 er Courrier Prestations : [f001 ] Date 2 iime Courrier Prestations : [f002 ] Intituli de la personne : [f003 ] Remarque : [f004 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] >[f005 ] } END TABLES indu ATTRIBUTES f001 = formonly.date1 TYPE DATE, REQUIRED, FORMAT = "dd/mm/yyyy", AUTONEXT; f002 = formonly.date2 TYPE DATE, REQUIRED, FORMAT = "dd/mm/yyyy", AUTONEXT; f003 = formonly.intitule, REQUIRED, COMMENTS=" Ex: Monsieur Le Directeur, Messieurs ....", AUTONEXT; f004 = formonly.rem, COMMENTS = " Ex: Rappel, Envoi Recommand{e, A.R ....", AUTONEXT; f005 = formonly.libre TYPE CHAR, WORDWRAP COMPRESS; END INSTRUCTIONS DELIMITERS " " SCREEN RECORD ve_L010(date1, date2, intitule, rem, libre) Amicalement Net.