• Re: Locking a Data Area

    From manoj datt@manojdutt1it@gmail.com to comp.sys.ibm.as400.misc on Mon Oct 10 08:36:48 2022
    From Newsgroup: comp.sys.ibm.as400.misc

    On Thursday, April 25, 1996 at 12:30:00 PM UTC+5:30, George Timms wrote:
    In article <DqD84...@tigger.jvnc.net>, Chris Zangrilli (ver...@tigger.jvnc.net) writes:
    Hello,
    I am currently writing a small program on V3R1 to lock a Data Area, read the value, increment the value, write it out, and
    unlock the value. I have no problem with the read, update, and write operations, but I get an error message when I try to Lock the
    data area. The name of the data area is ZSEQ and I recieve the following error when I try to lock this object:

    "Object Domain error for object ZSEQ."
    "Application error. MCH6801 unmonitored by QC2UTIL1 at statement 0000000010, instruction X'000'."

    I can successfully lock a Program object, but the data area doesn't seem to work. Does anyone know how to lock a data area on a
    V3R1 machine?
    At least at security level 40 (and possibly other levels too), you can
    only use the MI lock instruction against user-domain objects. Most
    objects are system-domain (including object type *DTAARA).
    You can use the LCKOBJ CL command to lock a data area (and you can run
    the CL command with the system() C runtime routine). I don't know if
    there is a system API to the LCKOBJ command functionality (avoiding
    command analyzer overhead).
    --
    Standard disclaimer: Not speaking for IBM
    George Timms Internet: ti...@vnet.ibm.com
    IBM AS/400 Division Rochester, MN 55901
    For the same objective, I 'm facing issue of xxdtaa.h not found.
    <img src="data:image/jpeg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAgGBgcGBQgHBwcJCQgKDBQNDAsLDBkSEw8UHRofHh0aHBwgJC4nICIsIxwcKDcpLDAxNDQ0Hyc5PTgyPC4zNDL/2wBDAQkJCQwLDBgNDRgyIRwhMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjIyMjL/wAARCAAbAi0DASIAAhEBAxEB/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/8QAHwEAAwEBAQEBAQEBAQAAAAAAAAECAwQFBgcICQoL/8QAtREAAgECBAQDBAcFBAQAAQJ3AAECAxEEBSExBhJBUQdhcRMiMoEIFEKRobHBCSMzUvAVYnLRChYkNOEl8RcYGRomJygpKjU2Nzg5OkNERUZHSElKU1RVVldYWVpjZGVmZ2hpanN0dXZ3eHl6goOEhYaHiImKkpOUlZaXmJmaoqOkpaanqKmqsrO0tba3uLm6wsPExcbHyMnK0tPU1dbX2Nna4uPk5ebn6Onq8vP09fb3+Pn6/9oADAMBAAIRAxEAPwDxvT7CO6iuLieRo7eBcsVGWJJwAKqXAgEv+jNIY/WQAH9DW/p97bjw/fH+zrchAgYbn+fkcnn+VUdNja6vJ7mGOC3jiTcxILLH7gE8/jUXd3fodsqMeSEY6uXrfd/LoZNW57CS3sre6ZlKT52gdRg45rX1Fon0WG8SaOadJ9olWEJxg8EdD0qXUNUu00PTpFePc+7dmFD3PbHFJydtO41hoR5uZ9Lr70u5zFOTZvXzCwTPzbRzitjTY5Us5r55YYIy4XzWiDkn0C9P0o8QRwj7HPEVYyw5Z1TYGI747VXNrYy+rv2ftL+fyvbv/Xcg1DT7e3sLW7tpZXScsMSKARj6GsytvUf+Rb0v/eesSiIsTGMZrlVtF+QUVsaBbwyy3M8xA8iIupK7gD6474qW/u7G403Y06z3ayZR0g8v5e4Pb0ocrOwRw96fO5Jb2+RhUV02oagmnTWccVrDsMMbTfICZPlHr0/CodPnt0stTu1tUbaymNXGdpJNLm0vYv6tHn5ObX08rnP0Vu2k0Os3lnDPColUsXdQFDjGQMD6VNZ3H9pXl1ZXMUQg2OU2xhTHtBxyOe3ehya6ChhoztaW7stOvn2/E5yiuhFwlh4dt5YoImnaZ1ErKCQBj14rLv7yK7uknjgEZ2jeOxYdTimpXZFSjGEU3LVpO3qUqKtX96b+dZTDFFhQu2NcA471VpoykknaLugorr/BSpqn2vQ7qGI2k8TSNcMgzblRndu644qfxRdN4d1i00qxtIlgscMkkkKsbgn+IkjkGqejXmStU/I4mlAywHqa9T1ixtdH0e68SWthG17eIge2KBlsy4BLFe2e2fWsG5mfw94b0mewSH7RqG6Wad4Vcn5sbQGBA6dh3pev9MPQxdW8PfYPEEGlQT7zMqEO4xgt9Kz9V06XSdTnsZnR5IW2syZwfpmu61rUr2y+I1sIyitMsKyBoUb+Y4/Csjxzrd/N4g1Kwd4jbiXAAt4w3H+0Fz+tD6W8/wBAX+RyFFemaXb/ANm3+m6ZqN7ZQecilrEWIkLA56yYJBP1rI0/THs73XLuCS2s7KymMX2iaHzinzYAVTwT+Boe4LY4qiu08ZQ2kuh6NqEMsU80wdJJ44PJEmDx8vQdfSuLoA2r3REtPDOnasJmZ7t3UxleFwT3/CsWvQJdXl0n4b6M1vDCZ5JZAsskYfYNxzgHI5+lYvjaKGDxBHLDCkfmwRzMqjC7jnPH4US0kwWxzNFamtay2sywSNZ21t5UYjxbptDY7n3rLoA29I8MXms6Tf6hbSRBbPG6Nidz5z93jHQGqzaLOvh9dYMkfktMYdnO7P8ALFdN4UvTp/hHU7kHAS7h3f7pDA/oTW4dChl0iy05zttbnVQ6/wDXNwCB+RxTa1aXl+n+Yr9/P8meV0V6FYah/aPi6bQbiztv7NfdCIRAoMYA4IYDdn6muCuI1iuZY0beqOQG9RU3vbzKtv5EVFaOhT2NvrdpNqUZks0kBlUdxXS+JYL+/wBNkvrS+sb3SkYOwt4I43hz0DADcPxpsS1ZxNFd3r1rCuu+FkjgjAkt4C6qgG4kjr61MlhaxeIPE2pNaRzf2cu6GAj5Ax7kD0xR/wAH8A3/AA/E4axtxd39vbFiollVCwHTJxVnXtNXR9butPSQyLCwUORgngH+tXbfWrvVdY01bsQsyXUZV0hWMgbhx8oANdvcaiupeP77RpLO2Fk0TK6+UCzNtHzbjyD9Djih7J+v6At/uPKqKc4w7AdjVnTruGyufNnsYL1MY8qYsF/8dIP60AbOo6JpejWkCX93dnUJoRMI4I1KLnoCSQe3YVQ0qy0m5s7yTUNSa1miTMEYjLea3pntXT+PNUszdxW/9i2Yke0jKz75N6deB82PzFR+C7uS70/V7K4SCSCGxd4w0CZVvXdjP60P7XzBfZ+RyWnJYPc7dQkuUiI4Nuis2fxIq/4o0WLQNaaxhneaMIrh3UA8+wrHj/1qfUV2XjiFbjxzDC5wsiQqT7Gna9rCva5xdFepXd1oWja5Jpt5fQDTYk8p7P8As4luV6+ZjdnvnNeYz+V9ok8nPlbjsz6dqm99h20I6K6DwbpsGp+IY47lQ8caPKYz/GVUkD8xW1pd8fEf9sWGpQ24gjgeWFkhWMwFc45UAn8c03ovlcFr+RwtFd1LqceieDtGmtbK2N5MZAbh4gx2gjIweOfXFcvruoW2p6m13a2v2ZXVd0YxjdgAkY6ZOTQ97AtVcza0tB0xdY1q3sHkMaykguBkjAJ/pVO0iWe7hiZtqu4Un6mvS7a7n0z4gwaBYwwx2cAKbRArM+EOWLEFuevWn2E+pwNjY2D66bPUb02tosjI0+zcQAcZwKp3scEV7NHazGaBXIjkIwWHY4rpPD19Pb+NVtU8ow3F7tlWSFH3Dcf7wOPwpk0MX/CyHh8pPK+3Fdm0bcZ6YpRV3Fd/+AEnZSfb/gnL0V3OseJrW31nVdObSbYacDLEkUcahlfJw+489ecZxVuFbDRPDmkTJfw2cl2pllaSx+0GTkfLkggY9vWkndXKas7HndFegWlroOseML69sIBNZW9q1z5BUoryBeeOuN3OK5e+8R3t98syWwCPui2W6L5ftwOfxzT7CIbjRZ7bQ7XVWkjMNy7IqjO4EevFZteial4k1OPwFpNyskHmyTSKxNrERge23ArLsZG0/wAJXWvRpC9/PdeUJHiVhGOCcKRt557UPRy8v+B/mC1S8/8AgnH0V3k8Vvqem+H9XnhhS8luWgl2IFEoXac7Rx37Cn694ktbDxLqmnHSbYaarSxeTHGobfz8+4jI55wDih6addfw/wCHBa6+n6/5HAUV2xsI/E3hnTJLSKNLu2n+yzBVALBjlWOPqR+FY3iy7tbjWmhsUjW0tlEMZRQNwHc+uaHo7AtTCooooAsRXksVpNbLt8ubG7I54OadZX81gzmIIyyLtdHGVYe4qrRSsi1UkmmntsXrrVbi7tRbMsaQq25URcAH2/OiHVZorVbZ4oJokJKiZN236VRoo5VaxXtql+a+pft9Wnt4JIBHC8Ltu8uRMgH2pt1qlxeSwvOI38oYVSvGPSqVFFle4e2qcvLfQ05tbmntlt3tbTy0zsAi+7n05rMoooSS2JnUnP4ncsWd7PYT+bAwBxggjII9DT7m++0pt+y20RzndFHtNVKKLK9wVSSjy30LF3eS3jo0u3KIEGBjgDApIruWG1mt12+XLjdkc8VBRRZWsLnlzc19R8M0kEyyxMVdTkEVel1m4ljkURwRNKMSPGmGb6ms6ihpPccak4K0WWHvJZLKO0bb5UbFl45ycf4VApKsGHUHNJRTJcm9yzfX02oTLLMEDKoUbFwMCq1FFJK2w5ScnzS3NK21u7tNJuNOgEUcVwf3kgX52Hpn0q0fFV+6WAnitZzY8QtLFuOPQnPNYdFMmxuxeLdVivL65aSOU3ylZ0lXchB9vbtSWXivULKzjtljtpVhcvA0se5oSf7pzxWHRQBo6lrl9q2qLqN1IDdKFw6jHToasap4kuNXjb7VZ2JnfG65WHEpx33Z9qxqKAOlTxxqqPDMIrM3UKCNbkw5l2jtnNVrXxVf2rX2Y7aeK+ffPDNHuQtnOcZrDooA1tW8RX+tW9vb3XlCK3J8pY02hQe30ovPEN5faJa6TKkAtrYgoUjwx4xye9ZNFAF+41i6udItdMk2fZ7ZmaPC85PXJ/Gk1HVrnVLqO5udnmRxrGu1cDA6VRooA0tY1u71uWGS7WINDGI18tNvA9fes2iigC9Bq1zb6Tc6bHs+z3Dq75XnK5xg/jV2bxVqs+kWmmtKohtH3xOFw4Pbn2rEooA6CbxjqEvmuILOK5lTZJdRw4lYd/mzXP0UUAT2lz9kuVm8mGbb/BMu5T9RWld+JLq50+Sxit7Szt5GDSJaxbN+OmeeaxqKAOhtfGeqWkFsiJbPJarshneLMiDOcA596rQ+JdSg1qbVEkTz5yfNUr8jg9QR6Vj0Udbh0satxrs00tvJHaWdt5EglVbeLaCw6E8805PEl/Hr0msqYvtcmd3yfL0x0/CsiigBSckk96SiigC7qeqXOrXCT3WzekYjG0YGB0/nWlpXiy60e2aG1sdO+eMxyO8GWdT2JzzWBRQBpx6z5eoPdjTtPbcMeU0GY1+gzVnWPFN3rbCS5tLFJwRiaGHa/HQZzWHRQB0E3i27u0T7ZY6ddyKgTzp4NzkDpk5rAJyxOAMnoKSigCxY3txp15Fd2shjmiOVYVqXfim8uraeBLeztRcf697aLY0n1Oaw6KPIC7c6pc3en2ljLs8m13eXgc/NjOfyqlRRQHkKpKsGBwQcg10sXjvWIJVnjFqtyECNceV+8kUDGGOea5migDX0zxBPpd493HaWUtw0nmCSaLcUbOeOeKdeeJLm81OLUTa2UNzHJ5heGHbvb/a55rGooAnvLqS+vZrqbHmTOXbaMDJOTWnaeJ7y201NPlgtLy2jbdGl1Fv2H254rFoo6WB6u7NKHW7q11YajZrFaSj+CBNqY7jHoadqOuSajE0ZsrG33Nuc28OwuffmsuijyA2bHxJd2Wm/2c1vaXVqH8xY7qLeEb1HPFNsfEN3YLcxpDbSW1w257aWPdFntgZrIoo8wNW78QXt3dWs7CKNbX/UwxptjT6CqeoX02p6hPe3G3zp3Mj7RgZJyarUUAdhompR+FtHvriLU4Jrq8i8uOCAklDz8zZAwRntmuQJJJJ6mkooeruC0VgooooA/9k=">
    Any idea why getting not found?
    --- Synchronet 3.21d-Linux NewsLink 1.2
  • From manoj datt@manojdutt1it@gmail.com to comp.sys.ibm.as400.misc on Mon Oct 10 08:39:34 2022
    From Newsgroup: comp.sys.ibm.as400.misc

    On Thursday, April 25, 1996 at 12:30:00 PM UTC+5:30, George Timms wrote:
    In article <DqD84...@tigger.jvnc.net>, Chris Zangrilli (ver...@tigger.jvnc.net) writes:
    Hello,
    I am currently writing a small program on V3R1 to lock a Data Area, read the value, increment the value, write it out, and
    unlock the value. I have no problem with the read, update, and write operations, but I get an error message when I try to Lock the
    data area. The name of the data area is ZSEQ and I recieve the following error when I try to lock this object:

    "Object Domain error for object ZSEQ."
    "Application error. MCH6801 unmonitored by QC2UTIL1 at statement 0000000010, instruction X'000'."

    I can successfully lock a Program object, but the data area doesn't seem to work. Does anyone know how to lock a data area on a
    V3R1 machine?
    At least at security level 40 (and possibly other levels too), you can
    only use the MI lock instruction against user-domain objects. Most
    objects are system-domain (including object type *DTAARA).
    You can use the LCKOBJ CL command to lock a data area (and you can run
    the CL command with the system() C runtime routine). I don't know if
    there is a system API to the LCKOBJ command functionality (avoiding
    command analyzer overhead).
    --
    Standard disclaimer: Not speaking for IBM
    George Timms Internet: ti...@vnet.ibm.com
    IBM AS/400 Division Rochester, MN 55901


    For the same objective, I 'm facing issue of xxdtaa.h not found.

    Any idea why getting not found?
    --- Synchronet 3.21d-Linux NewsLink 1.2