compile_his_data.cls.sql 1.8 KB

1234567891011121314151617181920212223242526272829303132333435363738
  1. -- 编译HIS数据模块相关的类
  2. -- 在IRIS终端中执行此脚本,或使用Do $System.OBJ.Compile命令
  3. -- 方法1:在IRIS终端中执行
  4. -- Do $System.OBJ.Compile("src.DRG.HISData.HisDataService","ck")
  5. -- Do $System.OBJ.Compile("src.DRG.HISData.Interface","ck")
  6. -- 方法2:使用SQL脚本(需要适当权限)
  7. -- 此脚本用于记录需要编译的类
  8. SELECT '需要编译以下类:
  9. 1. src.DRG.HISData.HisDataService.cls - 添加了查询方法
  10. - QuerySyncedPatients (02010075)
  11. - QueryPatientDetail (02010076)
  12. - QuerySyncLogs (02010077)
  13. 2. src.DRG.HISData.Interface.cls - 添加了接口方法
  14. - GetSyncedPatients (02010075)
  15. - GetPatientDetail (02010076)
  16. - GetSyncLogs (02010077)
  17. 3. src.DRG.HISData.SyncTaskService.cls - HIS同步任务调度器(自动同步修复)
  18. - RunScheduledTasks (02010083) - 修复 ShouldRunNow hourly 跨天去重 bug;关闭诊断日志硬编码
  19. - InitScheduleTask (02010084) - 可选,每日兜底扫描
  20. - GetSyncConfig (02010079) / SaveSyncConfig (02010080) / GetSyncStatus (02010081)
  21. 4. src.DRG.HISData.SyncSchedulerTask.cls - %SYS.Task 子类(InitScheduleTask 使用)
  22. 编译命令(在IRIS终端执行):
  23. Do $System.OBJ.Compile("src.DRG.HISData.HisDataService,src.DRG.HISData.Interface,src.DRG.HISData.SyncTaskService,src.DRG.HISData.SyncSchedulerTask,src.DRG.HISData.Tests.SyncTaskServiceTest","ck")
  24. 或分别编译:
  25. Do $System.OBJ.Compile("src.DRG.HISData.HisDataService","ck")
  26. Do $System.OBJ.Compile("src.DRG.HISData.Interface","ck")
  27. Do $System.OBJ.Compile("src.DRG.HISData.SyncTaskService","ck")
  28. Do $System.OBJ.Compile("src.DRG.HISData.SyncSchedulerTask","ck")
  29. Do $System.OBJ.Compile("src.DRG.HISData.Tests.SyncTaskServiceTest","ck")
  30. 单元测试运行:
  31. Do ##class(%UnitTest.Manager).RunTest("src.DRG.HISData.Tests")
  32. ' AS Note;