This is a test for debugging

Support Forum General Information Frequently Asked Questions This is a test for debugging

  • This topic has 0 replies, 1 voice, and was last updated 1 week, 5 days ago by Andrew Truckle.
  • Author
    Topic
  • #4601
    Andrew Truckle
    Administrator
    Date joined: 25/07/2017

    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

The forum ‘Frequently Asked Questions’ is closed to new topics and replies.