MUMPS 数据库导出至 MYSQL

Question

我可以通过 DATABASE.MSM 文件访问 MUMPS 数据库，并且需要导出数据。它通过 MSM.exe 运行，但除此之外，我无法访问数据。我该如何导出这些数据？

我尝试过查找凭据，但由于这是我们使用了很长时间的旧系统，所以我们找不到任何东西。

Answer 1

我不知道您有权访问的 msm.exe 的资源。我通常通过终端访问它，就我而言，我还可以通过 MSM 工作站访问它（因为它是 Micronetics 系统腮腺炎）。 您可以使用 M 语言开发例程吗？ 如果您有访问权限，您可以创建从全局变量中提取数据并将其插入 SQL 表的例程。

________________Routine Label to open SQL Connection________________
opensql S $ZT="ERROC"
    S SQLOK=0
    S %connection="Provider=SQLOLEDB;Server=192.1.1.1;Database=YourDBName;Uid=YourUser;Password=Password"
    ZSET %database=$ZCREATEOBJECT("ADODB.Connection")
    I $ZOBJREF(%database)=0 D  Q
    . S SQLOK=0
    S %database.ConnectionTimeout=10
    S %database.CommandTimeout=300
    D %v.Open(%connection)
    S SQLOK=1
    Q

________________Routine Label to close SQL Connection________________
closesql    
    S $ZT="ERROD"
    Q:'$d(%database)
    I %database.state'=0 d
    . D %database.Close
    K %database,SQLOK,%connection
    Q

________________Routine Label to run Insert________________
instru(table,data)  
    ZSET rst=%database.Execute("INSERT INTO "_table_" VALUES("_dada_")")
    Q

之后您需要打开连接，在循环内运行 将数据提取到插入 SQL 中并完成所有循环后， 关闭连接...

    D opensql
    ;...create a loop taking the data and inserting...
    . D instru("TableName",$G(^|"YourUCI,YourVG"|YourGlobal(indexKey1,indexKey2,etc))
    D closesql

Answer 2

先生。欧洲央行-RS-BR

如果能交流有关 MSM-WS 的想法就好了，有时我还在用那个工具。

干杯。