taryn

Code for exporting to Quark

Discussion created by taryn on Apr 27, 2018
Latest reply on May 1, 2018 by taryn


Hello,

I'm very new to FileMaker, and I'm trying to help my family with a data base my father left behind(he has just passed away) and I have no idea on how to update his code so that it will function correctly with the updated filemaker and quark. Is there anyone who can point me in the right direction or could help me fix it? Here is the first few field codes:

 

Field Name: Export:

If(Get(RecordNumber)  =  1; "<v13.00><e8><#13>"; "")

  & linehead

& If(PatternCount(ND STYLE; "box") ≥ 1; "@BOX AD:" & ND_YP_CHG::ND COMPANY; line001 & line001b & line002 & line003 & line007 & line008 & ND_YP_CHG::line009

)

 

Field Name: line001:

If(PatternCount(ND STYLE; "red")  ≥ 1; "@Red:<$>";

If(PatternCount(ND STYLE; "bold")  ≥ 1; "@Bold:<$>";

If(ND_YP_CHG::Last Line = 1;"@Biz name/ll:<$>"; If ( ND_YP_CHG::ND PREFIX = "see" ; "@Listing Head Text:<$>" ; If ( nowrap ≠ "" ; "@Biz name nowrap:<$>" ; "@Biz name:<$>" ) ))

)) &

 

 

If(ND_YP_CHG::ND PREFIX ≠ ""; ND_YP_CHG::ND PREFIX & " "; "") 

 

 

& If(line001_a ≠ ""

; line001_a; ND_YP_CHG::ND COMPANY)

 

 

& If(ND_YP_CHG::ND MAIL =  ""  and  ND_YP_CHG::ND STREET combo =   "";

"<Hz9f" & ND_YP_CHG::font & ">" & If(ND_YP_CHG::ND PREFIX ≠ "see"; ND_YP_CHG::TAB & "<h89.999f$>" & ND_YP_CHG::ND PHONE 1; "") & "<a$>";

"")

& If ( ND_YP_CHG::ND Single ≠ "" ; "<Hh89.999z8f" & ND_YP_CHG::font & ">" ; "¶" )

 

Field Name: line001_a:

If(PatternCount(ND_YP_CHG::ND COMPANY; "\\") ≥ 1

 

 

; Left(ND_YP_CHG::ND COMPANY; Position(ND_YP_CHG::ND COMPANY; "\\"; 0; 1)-1)

& If(PatternCount(ND STYLE; "red")  ≥ 1; "<#13>@Red_second_line:<$>";

If(PatternCount(ND STYLE; "bold")  ≥ 1; "<#13>@Bold_second_line:<$>";

"¶@Biz name_second_line:<$>"))

 

 

& Right(ND_YP_CHG::ND COMPANY; Length(ND_YP_CHG::ND COMPANY) - Position(ND_YP_CHG::ND COMPANY; "\\"; 0; 1))

; "")

 

Field Name: line001b:

 

If ( ND_YP_CHG::ND EXTRA TEXT = "" ; "" ;

If ( (ND_YP_CHG::color   ≠ "") or (ND STYLE  = "BOLD"  or "BOLD w/text");

"@TextC:<$>" & ND_YP_CHG::ND EXTRA TEXT & "¶";

"@Text:<$>" & ND_YP_CHG::ND EXTRA TEXT & "¶")

)

 

Field Name: line002:

 

If(ND_YP_CHG::ND MAIL = "" and ND_YP_CHG::ND STREET combo = "";

"";

If(GetAsNumber(ND_YP_CHG::Last Line) = 2; If ( ND_YP_CHG::ND Single ≠ "" ; " - " ; "@Address/Mail/ll:<$>" ); If ( ND_YP_CHG::ND Single ≠ "" ; " - " ; If(ND STYLE  =  "BOLD"  or  ND STYLE  =  "BOLD w/text";"@Address/MailC:<$>" ; "@Address/Mail:<$>") ))

  & If(ND_YP_CHG::ND STREET combo = ""  and  ND_YP_CHG::ND MAIL ≠ ""; ND_YP_CHG::ND MAIL; ND_YP_CHG::ND STREET combo)

  & ND_YP_CHG::TAB & "<z9f" & ND_YP_CHG::font_bold & ">" & ND_YP_CHG::ND PHONE 1 & "<z$f$>¶")

Outcomes