skip to main content

Copybooks : iscobol.def
iscobol.def
*>********************************************************************<*
*>***** Copyright (c) 2005 - 2017 Veryant. Users of isCOBOL      *****<*
*>***** may freely modify and redistribute this program.         *****<*
*>********************************************************************<*
 
       >>SOURCE FORMAT FREE
 
01  terminal-abilities.
    03  terminal-name                            pic x(10).
    03  filler                                   pic x.
        88  has-reverse                          value "Y".
    03  filler                                   pic x.
        88  has-blink                            value "Y".
    03  filler                                   pic x.
        88  has-underline                        value "Y".
    03  filler                                   pic x.
        88  has-dual-intensity                   value "Y".
    03  filler                                   pic x.
        88  has-132-column-mode                  value "Y".
    03  filler                                   pic x.
        88  has-color                            value "Y".
    03  filler                                   pic x.
        88  has-line-drawing                     value "Y".
    03  number-of-screen-lines                   pic 9(3).
    03  number-of-screen-columns                 pic 9(3).
    03  filler                                   pic x.
        88  has-local-printer                    value "Y".
    03  filler                                   pic x.
        88  has-visible-attributes               value "Y".
    03  filler                                   pic x.
        88  has-graphical-interface              value "Y".
    03  usable-screen-height                     pic x(2) comp-x.
    03  usable-screen-width                      pic x(2) comp-x.
    03  physical-screen-height                   pic x(2) comp-x.
    03  physical-screen-width                    pic x(2) comp-x.
    03  filler                                   pic x.
        88  is-remote                            value "Y".
    03  client-machine-name                      pic x(64).
 
01  system-information.
    03  operating-system                         pic x(10).
        88  os-is-msdos                          value "ms-dos".
        88  os-is-os2                            value "OS/2".
        88  os-is-vms                            values "vms", "vax/vms".
        88  os-is-unix                           value "Linux", "AIX", "HP-UX", "SunOS", "Solaris".
        88  os-is-linux                          value "Linux".
        88  os-is-aos                            value "aos/vs".
        88  os-is-windows                        values "Windows 95", "Windows 98", "Windows Me".
        88  os-is-win-nt                         values "Windows 20", "Windows XP", "Windows Vi", "Windows 7", "WINDOWS", "Windows Se", "Windows 8", "Windows 8.", "Windows 10".
        88  os-is-win-family                     values "Windows 95", "Windows 98", "Windows Me", "Windows 20", "Windows XP", "Windows Vi", "WINDOWS", "Windows 7", "Windows Se", "Windows 8", "Windows 8.", "Windows 10".
        88  os-is-amos                           value "amos".
        88  os-is-mpe                            value "MPE/iX".
        88  os-is-mpeix                          value "MPE/iX".
        88  os-is-mac                            value "Mac OS", "Mac OS X".
    03  user-id                                  pic x(12).
    03  station-id                               pic x(12).
    03  filler                                   pic x.
        88  has-indexed-read-previous            value "Y".
    03  filler                                   pic x.
        88  has-relative-read-previous           value "Y".
    03  filler                                   pic x.
        88  can-test-input-status                value "Y".
    03  filler                                   pic x.
        88  is-multi-tasking                     value "Y".
    03  runtime-version.
        05  runtime-major-version                pic 99.
        05  runtime-minor-version                pic 99.
        05  runtime-release                      pic 99.
    03  filler                                   pic x.
        88  is-plugin                            value "Y".
    03  serial-number                            pic x(20).
    03  filler                                   pic x.
        88  has-large-file-support               value "Y".
    03  filler                                   pic x.
    03  filler                                   pic x.
        88  is-64-bit                            value "Y".
 
78  black                                        value 1.
78  blue                                         value 2.
78  green                                        value 3.
78  cyan                                         value 4.
78  red                                          value 5.
78  magenta                                      value 6.
78  brown                                        value 7.
78  white                                        value 8.
78  dark-gray                                    value 9.
78  bright-blue                                  value 10.
78  bright-green                                 value 11.
78  bright-cyan                                  value 12.
78  bright-red                                   value 13.
78  bright-magenta                               value 14.
78  yellow                                       value 15.
78  bright-white                                 value 16.
78  bckgrnd-black                                value 32.
78  bckgrnd-blue                                 value 64.
78  bckgrnd-green                                value 96.
78  bckgrnd-cyan                                 value 128.
78  bckgrnd-red                                  value 160.
78  bckgrnd-magenta                              value 192.
78  bckgrnd-brown                                value 224.
78  bckgrnd-white                                value 256.
78  bckgrnd-dark-gray                            value 288.
78  bckgrnd-bright-blue                          value 320.
78  bckgrnd-bright-green                         value 352.
78  bckgrnd-bright-cyan                          value 384.
78  bckgrnd-bright-red                           value 416.
78  bckgrnd-bright-magenta                       value 448.
78  bckgrnd-yellow                               value 480.
78  bckgrnd-bright-white                         value 512.
78  color-reverse                                value 1024.
78  frgrnd-low                                   value 2048.
78  frgrnd-high                                  value 4096.
78  color-underline                              value 8192.
78  color-blink                                  value 16384.
78  color-protected                              value 32768.
78  bckgrnd-low                                  value 65536.
78  bckgrnd-high                                 value 131072.
78  window-bright-white                          value 131328.
 
78  csys-async                                   value 1.
78  csys-maximized                               value 4.
78  csys-minimized                               value 8.
78  csys-hidden                                  value 32.
78  csys-shell                                   value 64.
78  csys-desktop                                 value 128.
 
78  listenv-open                                 value 1.
78  listenv-next                                 value 2.
78  listenv-close                                value 3.
 
78  listdir-open                                 value 1.
78  listdir-next                                 value 2.
78  listdir-close                                value 3.
 
78  listusr-open                                 value 1.
78  listusr-next                                 value 2.
78  listusr-close                                value 3.
 
78  listlock-open                                value 1.
78  listlock-next                                value 2.
78  listlock-close                               value 3.
 
78  get-blob-from-file                           value 1.
78  put-blob-into-file                           value 2.
78  free-blob-handle                             value 3.
 
78  edbi-disconnect-connection                   value 1.
78  edbi-disconnect-all                          value 2.
 
78  wd2-get-user-agent                           value 1.
78  wd2-get-browser-name                         value 2.
 
78  wd2-get-session-value                        value 1.
78  wd2-put-session-value                        value 2.
 
78  auserinfo-set                                value 1.
78  auserinfo-get                                value 2.
78  auserinfo-clear                              value 3.
 
78  crep-case-insensitive                        value 1.
78  crep-left-trimmed                            value 2.
78  crep-right-trimmed                           value 4.
 
78  wflush-refresh                               value 1.
78  wflush-inhibit                               value 256.
78  wflush-allow                                 value 257.
78  wflush-disable-ui                            value 512.
78  wflush-enable-ui                             value 513.
 
78  wkbuf-add-to-end                             value 1.
78  wkbuf-add-to-beginning                       value 2.
78  wkbuf-clear-buffer                           value 3.
78  wkbuf-start-recording                        value 4.
78  wkbuf-stop-recording                         value 5.
78  wkbuf-load-from-file                         value 9.
 
78  jget-laf-font                                value 1.
78  jget-laf-color                               value 2.
 
78  cprel-error                                  value 0.
78  cprel-starting                               value 1.
78  cprel-in-progress                            value 2.
78  cprel-completed                              value 3.
 
78  cxml-parse-file                              value 1.
78  cxml-release-parser                          value 2.
78  cxml-get-first-child                         value 3.
78  cxml-get-next-sibling                        value 4.
78  cxml-get-parent                              value 5.
78  cxml-get-data                                value 6.
78  cxml-get-attribute-count                     value 7.
78  cxml-get-attribute                           value 8.
78  cxml-get-last-error                          value 9.
78  cxml-open-file                               value 10.
78  cxml-parse-string                            value 11.
78  cxml-parse-next-record                       value 12.
78  cxml-get-prev-sibling                        value 13.
78  cxml-new-parser                              value 14.
78  cxml-get-attribute-by-name                   value 15.
78  cxml-get-child-by-name                       value 16.
78  cxml-get-child-by-cdata                      value 17.
78  cxml-get-child-by-attr-name                  value 18.
78  cxml-get-child-by-attr-value                 value 19.
78  cxml-get-sibling-by-name                     value 20.
78  cxml-get-sibling-by-cdata                    value 21.
78  cxml-get-sibling-by-attr-name                value 22.
78  cxml-get-sibling-by-attr-value               value 23.
78  cxml-get-comment                             value 24.
78  cxml-set-data                                value 25.
78  cxml-modify-cdata                            value 25.
78  cxml-modify-attribute-value                  value 26.
78  cxml-add-child                               value 27.
78  cxml-add-sibling                             value 28.
78  cxml-add-attribute                           value 29.
78  cxml-add-comment                             value 30.
78  cxml-append-comment                          value 31.
78  cxml-delete-attribute                        value 32.
78  cxml-delete-element                          value 33.
78  cxml-delete-comment                          value 34.
78  cxml-write-file                              value 35.
78  cxml-get-proc-instr-count                    value 36.
78  cxml-get-proc-instr                          value 37.
78  cxml-set-proc-instr                          value 38.
78  cxml-get-version                             value 39.
78  cxml-set-version                             value 40.
78  cxml-get-encoding                            value 41.
78  cxml-set-encoding                            value 42.
78  cxml-get-standalone                          value 43.
78  cxml-set-standalone                          value 44.
78  cxml-write-string                            value 48.
 
01  listdir-file-information.
    03  listdir-file-type                        pic x.
        88  listdir-file-type-directory          value "D".
        88  listdir-file-type-regular-file       value "F".
        88  listdir-file-type-unknown            value "U".
    03  listdir-file-creation-time.
        05  ldfc-year                            pic xx comp-x.
        05  ldfc-month                           pic x comp-x.
        05  ldfc-day                             pic x comp-x.
        05  ldfc-hour                            pic x comp-x.
        05  ldfc-minute                          pic x comp-x.
        05  ldfc-second                          pic x comp-x.
        05  ldfc-hundreths                       pic x comp-x.
    03  listdir-file-last-access-time.
        05  ldfla-year                           pic xx comp-x.
        05  ldfla-month                          pic x comp-x.
        05  ldfla-day                            pic x comp-x.
        05  ldfla-hour                           pic x comp-x.
        05  ldfla-minute                         pic x comp-x.
        05  ldfla-second                         pic x comp-x.
        05  ldfla-hundreths                      pic x comp-x.
    03  listdir-file-last-modification-time.
        05  ldflm-year                           pic xx comp-x.
        05  ldflm-month                          pic x comp-x.
        05  ldflm-day                            pic x comp-x.
        05  ldflm-hour                           pic x comp-x.
        05  ldflm-minute                         pic x comp-x.
        05  ldflm-second                         pic x comp-x.
        05  ldflm-hundreths                      pic x comp-x.
    03  listdir-file-size                        pic x(8) comp-x.
    
01 wsave-options.
   03 wsave-format pic x(1).  
      88 wsave-png values "P", " ".
      88 wsave-bmp value  "B".
      88 wsave-gif value  "G".
      88 wsave-jpg value  "J".
   03 wsave-other.
      05 wsave-quality pic 9(10) comp-x.
      05 wsave-transparency redefines wsave-quality.
         07 filler pic 9(1) comp-x.
            88 no-transparency value 0 false 1.
         07 wsave-transparent-color pic 9(9) comp-x.
   03 wsave-client-server pic x.
      88 wsave-server values "S", " ".
      88 wsave-client value  "C".
       >>SOURCE FORMAT PREVIOUS
Copyright (c) 2017 Veryant
Contact us
Please share your comments on this manual or on any
Veryant product documentation with the email button at the top left