10.07.2015 Views

Programming Guide - Actian

Programming Guide - Actian

Programming Guide - Actian

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

How You Can Ensure Compatibility Between the Assistant and ApplyTemplateThe full text of the frame assistant procedure is as follows:Procedure Create_Dyn_Fld(fs = FrameSource not null,return_code = integer not null,batch_mode = integer not null)=declaretrim_field = FreeTrim default null;text_string = StringObject;topcomposite = CompositeField default null;status = integer not null;find_top_composite = procedure returning CompositeField;enddeclarebeginif batch_mode = TRUE thentext_string.value = 'Hello, world!';elsestatus = curprocedure.replypopup(messagetext= 'Enter text string.',reply = text_string);if status != PU_OK thenreturn_code = ER_FAIL;return;endif;endif;topcomposite = callprocfind_top_composite(composite = fs.topform);trim_field.ParentField = topcomposite;return_code = ER_OK;return;end;procedure find_top_composite(composite = compositefield;)=declarechild = compositefield default null;i = integer not null;enddeclarebeginif composite.name = 'FreetrimComposite' thenreturn composite;endif;for i = 1 to composite.childfields.lastrow() doif composite.childfields[i].isa(class =CompositeField) = TRUE thenchild = find_top_composite(composite =composite.childfields[i]);if child IS NOT NULL thenreturn child;endif;endif;430 <strong>Programming</strong> <strong>Guide</strong>

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!