CombineLists ( Start ; End ; ListFieldsObjects ; Separator ; Function )

concatenate n FieldsLists or ObjectsList

Average rating: 4.3 (34 votes) Log in to vote

Agnes Barouh - Show more from this author
Tic Tac
http://www.tictac.fr/CoinFileMaker/Page.html

Sample input:

CombineList ( 1; 10; "TableLiee::FieldA¶TableLiee::FieldB¶TableLiee::FieldC"; " | "; "GetNthRecord" )

-------------------

CombineList ( 1; 10; "ObjectA¶ObjectB¶ObjectC"; "#"; "GetLayoutObjectAttribute" )
[objects in portal]

Sample output:

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/* CombineList ( Start; End; ListFieldsObjects; Separator; Function ) .v1_1  
CombineList () requires CustomList ( Start; End; Function ) - Not recursive */
              
               // ListFieldsObjects = Fields or Objects with ¶ separator : "FieldOrObjectA¶FieldOrObjectB¶FieldOrObjectC¶FieldOrObjectX"
               // Separator = choose a text separator, space, or tag - ex : "|" or " | " or "#" or " " to extract or to present the data
               // Function = Function name with ""  - ex : "GetLayoutObjectAttribute" or "GetValue" or " GetNthRecord" or "GetRepetition"; and other "Left" or "Right"
              
               /* CombineList ( 1; 10; "TableLiee::FieldA¶TableLiee::FieldB¶TableLiee::FieldC"; " | "; "GetNthRecord" )
               create concatenate list with Fields */            
               /* CombineLists ( 1; 10; "ObjetA¶ObjetB¶ObjetC"; " | "; "GetLayoutObjectAttribute" )
               create concatenate list with Objects (Objects in Portal) */              
               //-------------------------------------------------------------------*/
               // Agnès Barouh - novembre 2007 - To report bugs or corrections : barouh.agnes@wanadoo.fr
               //-------------------------------------------------------------------*/
  
           Let ([      
                      $MyListField =  case (
           Function = "ObtenirAttributObjetModele" or Function = "GetLayoutObjectAttribute";
          
           """" & separator & """&" & Function  & "(""" &
           Substitute ( ListFieldsObjects; ¶; """; ""Content""; """"; [n] ) & """ & separator & """&" & Function & "(""" )
           & """; ""Content""; """"; [n] ) &""" & separator & """"
           ;
           """" &  separator & """&" & Function  & "(" &
           Substitute ( ListFieldsObjects; ¶; "; [n] ) & """ & separator & """&" & Function & "(" )
           & "; [n] ) &""" & separator & """"
           )
                 ];
           Substitute (
                 CustomList ( Start; End; $MyListField )
           ; [ Separator & "?"; Separator ] )
          
           )
           & Let ( [ $MyListField = "" ]; "" )

Not recursive Function

Carreful : Limited => ListFieldsObjects < 18700 values

* CombineLists () requires CustomList ( start ; End ; Function )
http://www.briandunning.com/cf/868
CustomList Return Error if is empty or not is correct ListFieldsObjects or Function

-> ListFieldsObjects : Fields or Objects with ¶ separator :
"FieldOrObjectA¶FieldOrObjectB¶FieldOrObjectC¶
-> Separator : choose a text separator, space, or tag :
"|" or " | " or "#" or " " to extract or to present the data
-> Function : Function name with "" :
"GetLayoutObjectAttribute" or "GetValue" or " GetNthRecord" or "GetRepetition"; and other "Left" or "Right" (but not Middle() )

----------------------------------------- more examples

CombineLists ( 1; Count ( TableA::ID) ;
"TableA::Products¶TableA::Color¶TableA::Price¶TableA::Qty¶; " | "; "GetNthRecord" )

Result :
| Chair | black | 10$ | 37 |
| Chair | Red | 12$ | 22 |
| armchair | yellow | 35$ | 12 |
| armchair | blue | 15$ | 18 |

CombineLists ( 1; Count ( TableA::ID) ;
"ObjectA¶ObjectB¶ObjectC¶ObjectD¶; " - "; "GetLayoutObjectAttribute" )

Result :
- Chair - black - 10$ - 37 -
- Chair - Red - 12$ - 22 -
- armchair - yellow - 35$ - 12 -
- armchair - blue - 15$ - 18 -

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

CombineLists ( Start ; End ; ListFieldsObjects ; Separator ; Function )

Comments

Support this website.

Support this website.