MQSeries :: 대기열 MQSeries :: Queue는 MQSeries 대기열 객체에 대한 OO 인터페이스입니다.
지금 다운로드

MQSeries :: 대기열 순위 및 요약

MQSeries :: 대기열 태그

Perl 모듈 상호 작용 mqseries. 오오 OO 인터페이스 MQSeries 개체

MQSeries :: 대기열 설명

MQSeries :: Queue는 MQSeries 대기열 객체에 대한 OO 인터페이스입니다. MQSeries :: Queue는 MQSeries 대기열 objects.Synopsis에 대한 OO 인터페이스입니다. MQSeries를 사용합니다. MQSeries :: Queue 사용; MQSeries :: Message; # # 출력을위한 대기열을 엽니 다, 메시지를받는 루프, 데이터 데이터베이스를 업데이트합니다. # 내 $ queue = mqseries :: queue-> new (queueManager => some.queue.manager ', queue =>'some.queue ', mode =>'input_exclusive ',) 또는 die ( "대기열을 열 수 없습니다. N"); (1) {MY $ GETMESSAGE = MQSeries :: Message-> New; $ queue-> get (message => $ getMessage, sync => 1,) 또는 die ( "messagen을 가져올 수 없습니다". "compcode =". $ queue-> compcode () "."이유 = ". $ 대기열 -> 이유 (). "n"); if (UpdateSomedatabase ($ getMessage-> data ()) {$ queue-> queueManager () -> commit () 또는 die ( "queue.n에 대한 변경 사항을 커밋 할 수 없습니다". "compcode =". $ queue-> compcode (). "n". "이유 =". $ 대기열 -> 이유 (). "n"); } else {$ queue-> queuemanager () -> backout () 또는 die ( "queue.n에 대한 변경 사항을 취소 할 수 없습니다". "compcode =". $ queue-> compcode () "."이유 = " . $ 큐 -> 이유 () "n"); }} # # 메시지 데이터로 # 참조를 사용할 수 있도록 저장 가능한 사용 가능한 메시지를 대기열에 넣으십시오. (참고 : # mqseries :: Message :: Storeable 클래스를 사용하면이 작업이 수행됩니다.) # 저장 가능한 사용 가능; $ queue = mqseries :: queue-> new (queueManager => some.queue.manager ', queue =>'maint.queue ', mode =>'출력 ', putConvert => 저장 가능 :: nfreeze, getConvert => 저장 가능한 :: 해동,) 또는 죽을 ( "queue.n을 열 수 없음"); MY $ PUTMESSAGE = MQSeries :: Message-> New (data => {a => , e => {f => "Huh?", g => "wow!",}, h = > 42,},); $ 대기열 -> put (message => $ putmessage) 또는 die ( "queue.n에 메시지를 넣을 수 없습니다". "compcode =". $ queue-> compcode (). "n". "$ queue". -> 이유 (). "n"); # # 변환 루틴을 지정하는 대체 메커니즘. # MY $ QUEUE = MQSeries :: Queue-> New (QueueManager => Some.Queue.Manager ', Queue =>'일부 ", Mode => '출력'또는 다이 ("대기열을 열 수 없습니다. N"); MY $ PUTMESSAGE = MQSeries :: Message-> New (data => {a => , e => {f => "Huh?", g => "wow!",}, h = > 42,},); $ queue-> put (message => $ putmessage putConvert => 저장 가능 :: 멈춤) 또는 다이 ( "queue.n에 메시지를 넣을 수 없습니다". "compcode =". $ queue-> compcode () " . "이유 =". $ 대기열 -> 이유 (). "n"); 요구 사항 : · Perl.

MQSeries :: 대기열 관련 소프트웨어