Library /sys$common/syshlp/dbg$help.hlb
DEBUG, Language Support, RPG_II, DEPOSIT Command

 *Conan The Librarian (sorry for the slow response - running on an old VAX)

    Note the following points when using the DEPOSIT command:

    o  You can deposit a single value into an element of an array
       using array syntax as in the following example, which deposits
       the value 150 into element 2 of array ARR:

       DBG> DEPOSIT ARR(2) = 150

    o  You can deposit multiple values into an array of character
       strings, by using the /ASCII qualifier with the DEPOSIT
       command. For example, assume PARTS is an array of 10 elements
       in program INV.RPG, each a character string of length 3. The
       following DEPOSIT command deposits the strings P04, P05, and
       P06 into elements 4, 5, and 6, respectively, of array PARTS:

       DBG> DEPOSIT/ASCII PARTS(4) = "P04P05P06"
       DBG> EXAMINE PARTS(4:6)
       INV\PARTS
           (4):     'P04'
           (5):     'P05'
           (6):     'P06'

    o  Values deposited into numeric fields are aligned on the
       decimal point. Shorter fields are padded with zeros to the
       left and right of the decimal point.

    o  Values deposited into character fields are left justified. If
       the value contains fewer characters than the character field,
       the field is padded on the right with spaces.

    o  To set a nonexternal indicator on or off with the DEPOSIT
       command, precede the indicator with the string *IN. Depositing
       the value 1 or 0 sets the indicator on or off, respectively.
       For example, the following command sets indicator 56 on:

       DBG> DEPOSIT *IN56 = "1"
  Close     HLB-list     TLB-list     Help  

[legal] [privacy] [GNU] [policy] [netiquette] [sponsors] [FAQ]
Tweet
Polarhome, production since 1999.
Member of Polarhome portal.