ibmi-brunch-learn

Announcement

Collapse
No announcement yet.

Problem w/msgsfl and windows

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

  • Problem w/msgsfl and windows

    Hi

    I'm having trouble getting my message subfile to work with a window. I've found a couple of examples on the web that say you have to associate your msgsfl with the window in order to get the attributes by having "window(<window name>)" in the msgctl format.

    Then, I should perform a write of the window format before the msgctl format so the attributes can be retrieved. Well.......I've done that and it DIDN'T WORK!!

    I don't see any error messages when the error fields are highlighted. I don't know if I have a problem with the OVERLAY, etc. or if it's somethin else.

    Within my freeform program I'm using the QMRHMVPM and QMHSNDPM APIs to populate the message subfile and I'm not getting any errors.

    I'd appreciate any input. This is getting frustrating.

    Thanks

    Chris

    Here's a little DDS from the program:

    A*---------------------------------------------------------------------
    A* Window definition format woth function key legend
    A*---------------------------------------------------------------------
    A R TCCNTRLW01
    A WINDOW(5 10 15 60 *NOMSGLIN)
    A CF12
    A OVERLAY
    A WDWBORDER((*COLOR BLU) (*DSPATR RI)-
    A (*CHAR ' '))
    A WDWTITLE((*TEXT 'TAX CODE CONVERSIO-
    A N CONTROL RECORD MAINTENANCE') (*CO-
    A LOR WHT))
    A 14 4'F12=Previous'
    A DSPATR(HI)
    A 14 20'F8=Accept'
    A DSPATR(HI)
    A*---------------------------------------------------------------------
    A* Window body definition
    A*---------------------------------------------------------------------
    A R TCCNTRLW1B
    A WINDOW(TCCNTRLW01)
    A CF08
    A CF12
    A OVERLAY
    <all the input capable fields for the window are defined here>
    A*---------------------------------------------------------------------
    A* Message subfile definition
    A*---------------------------------------------------------------------
    A R MSGSFL SFL
    A SFLMSGRCD(15)
    A MSGKEY SFLMSGKEY
    A MSPGMQ SFLPGMQ
    A*---------------------------------------------------------------------
    A* Message subfile control definition
    A*---------------------------------------------------------------------
    A R MSGCTL SFLCTL(MSGSFL)
    A WINDOW(TCCNTRLW01)
    A OVERLAY
    A SFLDSP
    A SFLDSPCTL
    A SFLINZ
    A 99 SFLEND
    A SFLSIZ(10)
    A SFLPAG(1)
    A MSPGMQ SFLPGMQ(10)
Working...
X