mqseries :: صف

MQSeries :: QUEUE رابط OO به اشاء صف MQSeries است.
انون بارر ن

mqseries :: صف رتبه بند و خلاصه

تبلغات

  • Rating:
  • مجوز:
  • Perl Artistic License
  • قمت:
  • FREE
  • نام ناشر:
  • Morgan Stanley, Dean Witter and Co.
  • وب سات ناشر:
  • http://search.cpan.org/~hbiersma/MQSeries-1.25/MQSeries/Queue.pm

mqseries :: صف برسب ها


mqseries :: صف شرح

MQSERIES :: QUEUE رابط OO به اشاء صف MQSeries است. mqseries :: صف رابط OO به اشاء صف MQSeries.Synopsis استفاده از mqseries؛ استفاده از MQSERIES :: QUEUE؛ استفاده از MQSERIES :: ام؛ # # باز ردن صف برا خروج، حلقه رفتن ام، به روز رسان برخ از ااه داده با داده ها. # my $ queue = mqseries :: queue-> new (queueManager => 'some.queue.manager'، queue => 'some.queue'، mode => 'input_exclusive'،) ا مر ("قادر به باز ردن صف نست. n ")؛ در حال ه (1) {$ GetMessage = MQSeries :: ام-> جدد؛ $ صف-> درافت (message => $ getMessage، sync => 1،) ا die ("compcode =". "compcode =". $ Queue-> Compcode (). "n". "دلل =" $ صف-> دلل (). "n")؛ ار (updatesomedatabase ($ getmessage-> data ())) {$ صف->> queuemanager () -> commit () ا die ("قادر به انجام تغرات در queue.n نست". "compcode =". $ صف-> CompCODE () "n". "دلل =". $ صف-> دلل (). "n")؛ } else {$ صف->> queuemanager () -> Backout () ا Die ("قادر به شتبان از تغرات به Queue.n" نست. "compcode =". $ Queue-> Compcode (). "n" " . $ صف-> دلل (). "n")؛ }} # # ام را به صف بفرستد، با استفاده از ذخره ساز اجازه استفاده از # مراجع به عنوان داده ها ام. (توجه: ان برا شما انجام م شود ار استفاده از # mqseries :: ام :: لاس ذخره شده است.) # استفاده از ذخره ساز؛ $ queue = mqseries :: queuee-> new (queueManager => 'some.queue.manager'، queue => 'some.queue'، mode => 'output'، putconvert => ذخره شده :: nfreeze، getConvert => ذخره ساز :: خن،) ا مر ("قادر به باز ردن queue.n نست")؛ $ putmessage = mqseries :: message-> new (data => {a => ، e => {f => "huh؟"، g => "wow!"،}، h = > 42،}،)؛ $ صف-> put (message => $ putmessage) ا die ("قادر به قرار دادن ام به Queue.n" نست. "compcode =". $ صف-> Compcode (). "n" " -> دلل (). "n")؛ # # مانسم متناوب برا مشخص ردن روال تبدل. # my $ صف = mqseries :: queue-> new (queueManager => 'some.queue.manager'، queue => 'some.queue'، mode => 'خروج'،) ا مر ("قادر به باز ردن صف نست. n ")؛ $ putmessage = mqseries :: message-> new (data => {a => ، e => {f => "huh؟"، g => "wow!"،}، h = > 42،}،)؛ $ صف-> put (message => $ putmessage putconvert => ذخره ساز :: freeze،) ا die ("قادر به قرار دادن ام بر رو queue.n" نست. "compcode =". $ صف-> compcode (). "n" . "دلل =" $ صف-> دلل (). "n")؛ الزامات: رل


mqseries :: صف نرم افزارها مرتبط