Hello everyone,
I have a script where I am trying to get the format of a column and then apply that to a textbox that is in a table box.
I tried using this col_for=col<< Get Format; but I can't use what it returns in this loop
For Each({col_name}, column_names,
col = Column(dty, col_name);
col_for=(col<< Get Format);
insertinto(col_format_text,col_for);
insertinto(col_width,col<< Get Display Width);
insertinto(col_wrap,col << Get Display Width);
);
I get an error when I try and add the col_for into the list.
The reason I am doing this is that I am later trying to use the list to set the textbox format later with this:
for(j=1, j<=n items(column_names), j++,
For(i=1,i<= qty_of_rows, i++,
col_list[j] << append(Text Box(col_var_list[j][i]),<<SET format=""></SET>
The full script I am working on is this and the intent is to be able to easily save a data table to a PDF for printing. This would grab the formatting of the data table and apply it to the table box columns:
dty=current data table();
createdate=today();
column_names=dty<<GET column="" names=""><MM><DL><DD> <HH24><:><MM>"),<<SET width="">
<P><SPAN>I attached a table that I have been working with along with this script.</SPAN></P>
<P> </P>
<P><SPAN>Thanks for any help!</SPAN></P>
<P> </P>
<P><SPAN>Steve</SPAN></P>
<P> </P></SET><LINGO-LABS id="lingo-labs-881062" slang="en-US" mode="UPDATE"><LINGO-LABEL>Automation and Scripting</LINGO-LABEL><LINGO-LABEL>Sharing and Communicating Results</LINGO-LABEL></LINGO-LABS></MM></HH24></DD></DL></MM></GET>
