S
Stefan Drissen
Guest
Not sure if I'm understanding your question correctly, but you can apply caps from a trigger: def var ficc as char no-undo view-as fill-in. def frame fr ficc . enable all with frame fr. view frame fr. run triggers (frame fr:handle). wait-for close of frame fr. finally: message frame fr ficc view-as alert-box. end finally. procedure triggers: define input parameter i_hfr as handle no-undo. def var hw as handle no-undo. hw = i_hfr:first-child. do while valid-handle( hw ): if hw:type = "field-group" then run triggers ( hw ). else if hw:type = "fill-in" then on any-printable of hw persistent run capsit ( hw ). hw = hw:next-sibling. end. end procedure. procedure capsit: define input parameter i_hw as handle no-undo. apply caps( last-event:label ). return no-apply. end procedure.
Continue reading...
Continue reading...