当前位置：文江博客话题详情

如何将 FileMaker Pro 中的分隔字段解析到新表中

发布于 2024-09-30 10:34:31 字数 88 浏览 4 评论 0原文

我的 FileMaker Pro 数据库中有一个字段，其中包含分号分隔的数据，因此我想要做的是将这些数据分隔到一个新表中。如果有人能指出我正确的方向，那会很有帮助

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

御弟哥哥 2024-10-07 10:34:31

一种方法是编写一个脚本，将文本分割成行（使用 GetValue()），然后用分号分割每一行 (Substitute( $line, ";", "¶" )，然后从结果列表中GetValue())，最后将数据发布到另一个表中（转到布局、新记录、设置字段）。如果你愿意的话，可以画出整个剧本的草图。

我会这样写：

Go to Layout( My Table )
Go to Record/Request/Page[ First ]
# Loop over records
Loop
    Set Variable[ $line, 1 ]
    # Loop over lines
    Loop
      Exit Loop If[ ValueCount( My Table::My Field ) < $line ]
      #
      # Get line values
      Set Variable[ $fields, 
          Substitute( GetValue( My Table::My Field, $line ), ";", "¶" ) ]
      # ...
      Go to Layout( My Target Table )
      New Record/Request
      Set Field[ My Target Table::Foo, GetValue( $fields, 1 ) ]
      Set Field[ My Target Table::Foo, GetValue( $fields, 2 ) ]
      Go to Layout( My Table )
      # 
      Set Variable[ $line, $line + 1 ] 
    End Loop
    Go to Record/Request/Page[ Next, Exit After Last ]
End Loop
Go to Layout( original layout )

One way would be to write a script that splits the text into lines (using GetValue()), then splits each line by semicolon (Substitute( $line, ";", "¶" ), then GetValue() from the resulting list), and finally posts the data into the other table (Go to Layout, New Record, Set Field). Can sketch the whole script, if you want.

I'd write it like that:

Go to Layout( My Table )
Go to Record/Request/Page[ First ]
# Loop over records
Loop
    Set Variable[ $line, 1 ]
    # Loop over lines
    Loop
      Exit Loop If[ ValueCount( My Table::My Field ) < $line ]
      #
      # Get line values
      Set Variable[ $fields, 
          Substitute( GetValue( My Table::My Field, $line ), ";", "¶" ) ]
      # ...
      Go to Layout( My Target Table )
      New Record/Request
      Set Field[ My Target Table::Foo, GetValue( $fields, 1 ) ]
      Set Field[ My Target Table::Foo, GetValue( $fields, 2 ) ]
      Go to Layout( My Table )
      # 
      Set Variable[ $line, $line + 1 ] 
    End Loop
    Go to Record/Request/Page[ Next, Exit After Last ]
End Loop
Go to Layout( original layout )

回复收藏 0 原文

~没有更多了~