Unconfigured Ad Widget

Collapse

Announcement

Collapse
No announcement yet.

API QMHRMQAT

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • lls_51@yahoo.com
    replied
    API QMHRMQAT

    I would like to use the API QMHRMQAT to retreive message Q break mode. I'm not having much luck at developing C/L program. Can anyone provied code in C/L to use this API? Thanks Larry L. Swain lls_51@yahoo.com

    Leave a comment:


  • Guest's Avatar
    Guest started a topic API QMHRMQAT

    API QMHRMQAT

    Something like this?
     pgm (&msgq &msgqlib &delivery) dcl &msgq *char 10 dcl &msgqlib *char 10 dcl &delivery *char 7 dcl &qualmsgq *char 20 dcl &rmqa0100 *char 160 chgvar &qualmsgq (&msgq *cat &msgqlib) call qmhrmqat (&rmqa0100 + x'000000a0' + RMQA0100 + &qualmsgq + x'0000000000000000') monmsg cpf0000 exec(do) /* Resend escape message */ call qmhrsnem (' ' + x'0000000000000000') enddo chgvar &delivery %sst(&rmqa0100 53 7) endpgm 
    Dave...
Working...
X