database.sarang.net
UserID
Passwd
Database
DBMS
MySQL
PostgreSQL
Firebird
Oracle
Informix
Sybase
MS-SQL
DB2
ㆍCache
CUBRID
LDAP
ALTIBASE
Tibero
DB 문서들
스터디
Community
공지사항
자유게시판
구인|구직
DSN 갤러리
도움주신분들
Admin
운영게시판
최근게시물
Cache Q&A 357 게시물 읽기
No. 357
SQL Service 클래스 예제
작성자
앙상블개발자
작성일
2009-02-11 21:15
조회수
3,798

Ensemble에서 SQL Adapter를 이용한 Inbound 비즈니스 서비스 예제코드입니다. 아래 클래스를 참고하세요.


Class MyProduction.ScheduleSQLService Extends Ens.BusinessService [ ProcedureBlock ]

{

Parameter ADAPTER = "EnsLib.SQL.InboundAdapter";

Method OnProcessInput(pInput As EnsLib.SQL.Snapshot, pOutput As %RegisteredObject) As %Status

{

           // make message

           set tReq=##class(MyProduction.SQL2HL7Request).%New()

           set tReq.PatientName=pInput.Get("NAME")

           set tReq.DeptName=pInput.Get("DEPTNAME")


           // send message

           do ##class(MyProduction.SQL2HL7).Transform(tReq, .tHL7Msg)

           set tSC = ..SendRequestAsync("ScheduleSQLOperation", tHL7Msg)      

           Quit $$$OK

}

}


[Top]
No.
제목
작성자
작성일
조회
360cache 4.x 한글 자료 좀 구할 수 없을까요? [2]
오태훈
2009-02-23
3985
359[Ensemble]HTTP 어댑터 사용하기
앙상블
2009-02-23
3883
358InterSystems 엔터프라이즈 SOA 기능 추가한 Ensemble 통합 플랫폼 발표(바로 적용)
인터시스템즈
2009-02-18
3483
357SQL Service 클래스 예제
앙상블개발자
2009-02-11
3798
356CACHE에 대하여~ [1]
임병혁
2009-02-10
3851
354InterSystems Ensemble environment adds binary SOAP messaging
SOAP
2009-01-29
4000
353클래스 로드+컴파일 명령어 [2]
조화로
2009-01-09
3642
Valid XHTML 1.0!
All about the DATABASE... Copyleft 1999-2019 DSN, All rights reserved.
작업시간: 0.072초, 이곳 서비스는
	PostgreSQL v11.5로 자료를 관리합니다