Programming Interface Information: This page documents intended Programming Interfaces that allow the customer to write programs to obtain the services of z/VM.

#### LANGBLK

Prolog

Control Block Contents
LANGBLK DSECT

Storage Layout

Cross Reference (Contains links to field and bit definitions)

#### LANGBLK Prolog

     Name       : LANGBLK
     Description: CMS Language Control Block
     DSECT      : LANGBLK
     Function   : Generates a copy of language control
                  block for the caller. LANGBLK points to
                  language information that an application uses.
                  The LANGBLK for the default language is in
                  DMSNUC. A LANGBLK is created by the set
                  language command. LANGBLK is called by the
                  LANGBLK macro.

#### LANGBLK Control Block Content

#### LANGBLK DSECT

    Hex   Dec Type/Val   Lng Label (dup)    Comments
    ---- ---- --------- ---- -------------- --------
    0000    0 Structure      LANGBLK
    0000    0 Address      4 LANGNEXT       Pointer to next LANGBLK
    0004    4 Character    3 LANGAPID       APPLICATION ID
    0007    7 Bitstring    1 LANGFLG1       Flag byte
              1... ....      LANGET         X'80' On indicates DBCS language
              .1.. ....      LANGUSSY       X'40' User synonyms wanted
              ..1. ....      LANGUSTR       X'20' User translations wanted
              ...1 ....      LANGSYSY       X'10' System synonyms wanted
              .... 1...      LANGSYTR       X'08' System translations wanted
    0008    8 Character    5 LANGLANG       Language identifier
    000D   13 Bitstring    1 *              RESERVED FOR FUTURE USE
    000E   14 Bitstring    2 LANGDISK       HELP (OR APPLICATION) DISK
                                            ADDRESS
    0010   16 Address      4 LANGMSG        Message repository
    0014   20 Address      4 LANGSPA        System parser table
    0018   24 Address      4 LANGUPA        User parser table
    001C   28 Address      4 LANGSSY        System Synonym and Abbreviation
                                            table
    0020   32 Address      4 LANGUSY        User Synonym and Abbreviation
                                            table
    0024   36 Address      4 LANGTRTS       NLS translation tables
    0028   40 Address      4 LANGUSER       Reserved for application's use
    002C   44 Address      4 LANGUME        User additions to message
                                            repository
              00000030       LANGBLKB       *-LANGBLK Bytes of storage for
                                            LANGBLK
              00000006       LANGBLKD       (LANGBLKB+7)/8 Double words of
                                            storage for LANGBLK

#### LANGBLK Storage Layout

    *** LANGBLK - Control Block in LANGBLK
    *
    *     +---------------------------+--------------------+------+
    *   0 |         LANGNEXT          |     LANGAPID       |:GFLG1|
    *     +---------------------------+------+------+------+------+
    *   8 |            LANGLANG              |//////|  LANGDISK   |
    *     +---------------------------+------+------+-------------+
    *  10 |         LANGMSG           |         LANGSPA           |
    *     +---------------------------+---------------------------+
    *  18 |         LANGUPA           |         LANGSSY           |
    *     +---------------------------+---------------------------+
    *  20 |         LANGUSY           |         LANGTRTS          |
    *     +---------------------------+---------------------------+
    *  28 |         LANGUSER          |         LANGUME           |
    *     +---------------------------+---------------------------+
    *  30
    *
    *** LANGBLK - Control Block in LANGBLK

#### LANGBLK Cross Reference

    Symbol         Dspl Value
    -------------- ---- -----
    LANGAPID       0004
    LANGBLKB       002C 00000030
    LANGBLKD       002C 00000006
    LANGDISK       000E
    LANGET         0007 80
    LANGFLG1       0007
    LANGLANG       0008
    LANGMSG        0010
    LANGNEXT       0000
    LANGSPA        0014
    LANGSSY        001C
    LANGSYSY       0007 10
    LANGSYTR       0007 08
    LANGTRTS       0024
    LANGUME        002C
    LANGUPA        0018
    LANGUSER       0028
    LANGUSSY       0007 40
    LANGUSTR       0007 20
    LANGUSY        0020

This information is based on z/VM V4R4.0.
Last updated on 28 Jul 2003 at 08:15:54 EDT.
Copyright IBM Corporation, 1990, 2003