API tools faq
paste
Advertisement
marcocunhasilva

Untitled

marcocunhasilva
Mar 16th, 2023
306
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
COBOL 3.82 KB | Source Code | 0 0
raw download clone embed print report
  1.        SCREEN SECTION.
  2.        01  SS-LIMPA-TELA.
  3.            02 BLANK SCREEN.
  4.        01  SS-JANELA.
  5.            02 BLANK SCREEN.
  6.            02 LINE 02 COLUMN 01 VALUE "+------------------------------------".
  7.            02 LINE 02 COLUMN 41 VALUE "------------------------------------+".
  8.            02 LINE 03 COLUMN 01 VALUE "+                                    ".
  9.            02 LINE 03 COLUMN 41 VALUE "                                    +".
  10.            02 LINE 04 COLUMN 01 VALUE "+------------------------------------".
  11.            02 LINE 04 COLUMN 41 VALUE "------------------------------------+".         
  12.            02 LINE 05 COLUMN 01 VALUE "+                                    ".
  13.            02 LINE 05 COLUMN 41 VALUE "                                    +".
  14.            02 LINE 06 COLUMN 01 VALUE "+                                    ".
  15.            02 LINE 06 COLUMN 41 VALUE "                                    +".
  16.            02 LINE 07 COLUMN 01 VALUE "+                                    ".
  17.            02 LINE 07 COLUMN 41 VALUE "                                    +".
  18.            02 LINE 08 COLUMN 01 VALUE "+                                    ".
  19.            02 LINE 08 COLUMN 41 VALUE "                                    +".
  20.            02 LINE 09 COLUMN 01 VALUE "+                                    ".
  21.            02 LINE 09 COLUMN 41 VALUE "                                    +".
  22.            02 LINE 10 COLUMN 01 VALUE "+                                    ".
  23.            02 LINE 10 COLUMN 41 VALUE "                                    +".
  24.            02 LINE 11 COLUMN 01 VALUE "+                                    ".
  25.            02 LINE 11 COLUMN 41 VALUE "                                    +".
  26.            02 LINE 12 COLUMN 01 VALUE "+                                    ".
  27.            02 LINE 12 COLUMN 41 VALUE "                                    +".
  28.            02 LINE 13 COLUMN 01 VALUE "+                                    ".
  29.            02 LINE 13 COLUMN 41 VALUE "                                    +".
  30.            02 LINE 14 COLUMN 01 VALUE "+                                    ".
  31.            02 LINE 14 COLUMN 41 VALUE "                                    +".
  32.            02 LINE 15 COLUMN 01 VALUE "+                                    ".
  33.            02 LINE 15 COLUMN 41 VALUE "                                    +".
  34.            02 LINE 16 COLUMN 01 VALUE "+                                    ".
  35.            02 LINE 16 COLUMN 41 VALUE "                                    +".
  36.            02 LINE 17 COLUMN 01 VALUE "+                                    ".
  37.            02 LINE 17 COLUMN 41 VALUE "                                    +".
  38.            02 LINE 18 COLUMN 01 VALUE "+                                    ".
  39.            02 LINE 18 COLUMN 41 VALUE "                                    +".
  40.            02 LINE 19 COLUMN 01 VALUE "+                                    ".
  41.            02 LINE 19 COLUMN 41 VALUE "                                    +".
  42.            02 LINE 20 COLUMN 01 VALUE "+                                    ".
  43.            02 LINE 20 COLUMN 41 VALUE "                                    +".
  44.            02 LINE 21 COLUMN 01 VALUE "+                                    ".
  45.            02 LINE 21 COLUMN 41 VALUE "                                    +".
  46.            02 LINE 22 COLUMN 01 VALUE "+------------------------------------".
  47.            02 LINE 22 COLUMN 41 VALUE "------------------------------------+".
  48.            02 LINE 23 COLUMN 01 VALUE "+ MENSAGEM: [                        ".
  49.            02 LINE 23 COLUMN 41 VALUE "                                   ]+".
  50.            02 LINE 24 COLUMN 01 VALUE "+------------------------------------".
  51.            02 LINE 24 COLUMN 41 VALUE "------------------------------------+".
  52.        01  SS-TITULO.
  53.            02 LINE 02 COLUMN 30 VALUE "C O N T R O L E  D E  M E D I A S".     
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!