Re: Skip 4gl form field

Posted in 2013

Rodney Sheppard — Thu, 9 May 2013 16:05:52 +1000 — source: Usenet: comp.databases.informix

Is the code the same for 4js BDL / Informix D4GL? and would it prevent mouse clicking into the field? -------------------------------------------------------------------- Rodney Sheppard Software Engineer - Development Manager Trans-Mit Pty. Ltd. 7 Wendy Court Hampton Park, Vic 3976, Australia Phone... +61 3 87878744 Fax.........+61 3 87875722 Email...... rod@transmit.com.au Web....... www.transmit.com.au -------------------------------------------------------------------- __________________________________________________ ----- Original Message ----- From: Reuben Barclay To: informix-list@iiug.org Sent: Thursday, May 09, 2013 6:52 AM Subject: RE: Skip 4gl form field With FourJs Genero / IBM Genero we removed the need for such code many many years ago. By the looks of the code, you are trying to prevent access to the field voicemail if the value of site = "UCP". So with Genero we would code that as something like ... BEFORE INPUT CALL DIALOG.setFieldActive("voicemail", site!= "UCP") ON CHANGE site CALL DIALOG.setFieldActive("voicemail", site!="UCP") Reuben From: Rodney Sheppard [mailto:rod@transmit.com.au] Sent: Wednesday, 8 May 2013 9:02 p.m. To: informix-list@iiug.org Subject: Skip 4gl form field to skip input fields, I have used code like... before field voicemail IF GET_FLDBUF(site) = "UCP" THEN IF fgl_lastkey() = fgl_keyval("DOWN") OR fgl_lastkey() = fgl_keyval("TAB") OR fgl_lastkey() = fgl_keyval("NEXT") OR fgl_lastkey() = fgl_keyval("RIGHT") THEN NEXT FIELD firstinit END IF IF fgl_lastkey() = fgl_keyval("UP") OR fgl_lastkey() = fgl_keyval("PREVIOUS") OR fgl_lastkey() = fgl_keyval("LEFT") THEN NEXT FIELD pager END IF END IF Is tere a way to programmatically set a field attribute to NO INPUT ? ie. something like FGL_FORMFIELD_SETOPTION() Rod -------------------------------------------------------------------- Rodney Sheppard Software Engineer - Development Manager Trans-Mit Pty. Ltd. 7 Wendy Court Hampton Park, Vic 3976, Australia Phone... +61 3 87878744 Fax.........+61 3 87875722 Email...... rod@transmit.com.au Web....... www.transmit.com.au -------------------------------------------------------------------- __________________________________________________ ------------------------------------------------------------------------------ _______________________________________________ Informix-list mailing list Informix-list@iiug.org http://www.iiug.org/mailman/listinfo/informix-list