IDMS

Re:Restructure of partial packed (COMP-3) field

  • 1.  Re:Restructure of partial packed (COMP-3) field

    Posted Jul 09, 2008 07:52 AM
    I am planning to change a comp-3 field defined as 9v99 (2 bytes) to
    99v999 (3 bytes). I would like to add 1 byte before the field and then
    after the restructure multiply the original contents of the field by 10
    to align the data for the additional decimal place.

    For the original field defintion I am thinking it should look something
    like:

    IDMSRSTT FIELD=(PL2'0',nn,nn,NEW) where nn is the length of the field
    and offset into the record.

    The content of the new byte needs to be initialized to zero and defined
    as Hex 00. I was thinking this individual byte cannot be defined as
    COMP-3.

    How should this new byte be specified in the IDMSRSTT FIELD statement?

    TIA

    Tim Williams
    DBA, Alberta Justice

    This email and any files transmitted with it are confidential and
    intended solely for the use of the individual or entity to whom they are
    addressed. If you have received this email in error please notify the
    system manager. This message contains confidential information and is
    intended only for the individual named. If you are not the named
    addressee you should not disseminate, distribute or copy this e-mail.

    This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager. This message contains confidential information and is intended only for the individual named. If you are not the named addressee you should not disseminate, distribute or copy this e-mail.
    "
    IDMS Public Discussion Forum
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP
    IDMS-L@LISTSERV.IUASSN.COM
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP








    Normal

    Normal
    Re: Change management software for IDMS
    "Kevin - we have just finished building our own Change Control System. It
    is a TSO based application that uses the active IDD application
    dictionary as the Change Management Database. It only handles IDMS
    components - although Cobol programs can be ""registered"" for a Change
    Control Id (a CCID)so that they are included in the system generated
    ""migration list"". We do NOT manage the source as such. We DO implement
    IDD security on the IDD entities however - so that there is only ever
    one authorised user for dialogs, maps, and process code. I can send more
    details if you're interested. It has been in ""production"" use since
    December 1st, 2007.

    HTH - cheers - Gary =20


    Gary Cherlet
    Justice Technology Services
    Department of Justice, SA Government
    Telephone +61 (0)8 8226 5199
    Facsimile +61 (0)8 8226 5311
    Mobile +61 (0)41 333 1613
    MailTo:cherlet.gary@saugov.sa.gov.au

    This e-mail message and any attachments are qualified as follows:
    Addressing: If you have received this e-mail in error, please advise by
    reply e-mail to the sender. Please also destroy the original
    transmission and its contents. Confidentiality: This e-mail may contain
    confidential information which also may be legally privileged. Only the
    intended recipient(s) may access, use, distribute or copy this e-mail.
    Individual Views: Unless otherwise indicated, the views expressed are
    those of the sender, not Justice Technology Services. Computer Viruses:
    It is the recipient's responsibility to check the e-mail and any
    attached files for viruses.