LINESPACING 1.2

// Loop the congregations (A - Z)
LOOP FROM "Congregations" NODATERANGE SORTBY "Congregations"
  FONT BOLD
  TEXT "***"
  EOL

  FIELD "Congregations"
  EOL

  FONT NOBOLD
  TEXT "Coordinator:"
  TAB =5>
  FIELD "Coordinator"
  EOL

  TEXT "Telephone:"
  TAB =5>
  FIELD "CoordinatorMemo1"
  EOL

  TEXT "Email:"
  TAB =5>
  FIELD "CoordinatorMemo2"
  EOL

  // List Speakers
  LOOP FROM "Congregation Speakers" NODATERANGE WHERE "Congregation" IS CURRENT."Congregations" SORTBY "Speaker"
    FONT BOLD
    FIELD "Speaker"
    FONT NOBOLD

    TEXT ": "
    // Loop speakers talk numbers
    LOOP FROM "Congregation Speaker Talks" NODATERANGE WHERE "congregation" IS CURRENT."Congregation" AND "speaker" IS CURRENT."Speaker" SORTBY "talkno"
      IF "$RowNumber" ISMORE "1"
        TEXT " ,"
      END_IF
      FIELD "talkno"
    END_LOOP
    EOL
  END_LOOP
END_LOOP

FONT BOLD
TEXT "***"
EOL

 

Your brother

Andrew

Topic