Curso Básico de AS400

Prévia do material em texto

AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 1 – 
 
 
Curso de AS/400 
 
 
 
Introdução ao AS/400 
 
 
 A) Manutenção das Bases de Dados 
O equipamento AS/400 trablja com bases de dados relacionais . 
A base de dados relacional AS/400, é uma coleção de conjuntos de informações 
agrupados de tal forma que minimiza a redundancia entre eles, permite trocas e o 
crescimento no futuro. 
Todos os conjuntos de dados são em base as tabelas. 
 
Diagrama De Base De Dados 
 
 
 
 
 
 
 
 
 
 
 
Se armazenam dados em tabelas, arquivos, grupos de dados, etc. com um minimo de 
dados redundantes. 
ESTUDANTES INSTRUTORES 
CLASSES 
DEPARTAMENTOS GRADUADOS 
TEXTOS 
ESTUDANTES 
SALAS 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 2 – 
 
Três tipos de Bases de Dados 
 
 
 
 
 
 
 
 
 
 
 
 
O Modelo Relacional. 
exemplo.: base de dados de educação 
Curso Num classe 
Codigo Nome Inscr instrutor tetra Sala max 
l001 Italiano 12 victor g 88/1 1 30 
l103 Ingles 23 juan e 88/1 4 40 
l211 Espanhol 5 pedro f 88/1 4 40 
l303 Chines 44 luis lee 88/1 3 50 
l001 Italiano 23 victor g 88/1 1 30 
l214 Grego 11 homero 88/1 6 35 
l211 Espanhol 1 pedro f 88/2 4 40 
l103 Ingles 0 juan e 88/2 4 40 
l001 Italiano 2 victor g 88/2 1 30 
l306 Japones 3 homero 88/2 6 35 
l370 Cobol 99 homero 88/2 5 99 
 
J
R
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 3 – 
 
 
TABELA BASE 
 TABELA = ARQUIVO 
 LINHA = REGISTRO 
 COLUNA = CAMPO 
 
Todas as linhas são similares ( um tipo de registro) 
 
O arquivo pode ser processado sequencialmente ou em forma indexada pelo campo de 
classificação “instrutor”, neste exemplo (sql ‘order by…’); ou com uma “seleção lógica” 
de registros (sql ‘where......’) funcionalmente, isto é uma “seleção de campos”. com 
frequencia se usam os queries para visualizar os dados dos arquivos, para o usuário final. 
 
 
 b) Manuseio de Bibliotecas, Objetos e Fontes: 
 
Bibliotecas.- É a forma em que AS/400 trabalha e se administra. 
As bibliotecas estão numa área onde se armazenam arquivos, programas, etc. que 
correspondem a dita biblioteca. 
Se pode manejar uma biblioteca por sistema, por área/depto., etc. (isto é definido pela 
área de sistemas). 
 
Objetos.- Se geram em base as compilações, contem arquivos ou programas (fontes). 
O objeto de um arquivo se pode visualizar, para ver a informação que a compõe e o 
objeto de um programa não se pode ver (neste caso se visualiza o fonte). 
 
Fontes.- É o código que se gera para a generação de um arquivo/programa, este se 
compila para generar o objeto. 
Se um fonte não é compilado: não se pode guardar informação em arquivos ou não se 
pode rodar um programa. 
 
- Tipos de Objetos e Fontes: 
 
 Os tipos de objetos mas comuns poden ser: 
 
 *FILE .- pode ter os seguintes atributos: 
ser um arquivo físico (pf), lógico (lf), arquivo de tela (dspf), printer 
file (prtf) 
 *PGM .- pode ter os seguintes atributos: clp, dfu, rpg 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 4 – 
 
 Os tipos de fontes mais comuns são: 
 
 
 PF.- Arquivos físicos(phisical file) 
 LF.- Arquivos lógicos (logical file) 
 DSPF.-Arquivos de telas (display file) 
 PRTF.-Arquivos de relátorios (printer file) 
 RPG.- Programas rpg 
 CLP.- Programas de controle (control language program) 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Este é menu inicial do AS/400 que é uma parte importante do OS/400, que nos ajuda a executar 
os comandos e utilitários por meio de opcões de maneira um pouco mais fácil. 
 
Nesta tela poderá executar as seguintes funçõess: 
 
F3 ‡ Sair termina o programa e regressa ao programa anterior . 
F4 ‡ Nos fornece uma nova tela donde nos mostra os grupos de comando que 
podemos utilizar assim como uma descrição do mesmo, na qual podemos acessar 
com o numero da opção na linha de comando. 
MAIN AS/400 Main Menu 
 System: S106CB4A 
 Select one of the following: 
 
 1. User tasks 
 2. Office tasks 
 3. General system tasks 
 4. Files, libraries, and folders 
 5. Programming 
 6. Communications 
 7. Define or change the system 
 8. Problem handling 
 9. Display a menú 
 10. Information Assistant options 
 11. Client Access/400 tasks 
 
 90. Sign off 
 
 Selection or command 
 ===> 
 
F3=Exit F4=Prompt F9=Retrieve F12=Cancel F13=Information ssistant 
F23=Set initial menú 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 5 – 
 
F9 ‡ Esta opção nos mostra o comando anterior executado 
F10 ‡ Comando de entrada. 
F12 ‡ É para sair do programa. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
O PDM é uma ferramenta do AS/400 que facilita o controle de bibliotecas, objeto e 
fontes, de uma maneira rápida e eficiente, favorecendo a produtividade na operação. O PDM 
forma parte do grupo de ferramentas de apoio do AS/400 conhecidas como TooSet/400. 
Com o PDM o usuário poderá controlar os seguintes conceitos ou funções em AS/400: 
• Bibliotecas. 
• Objetos. 
• Fontes. 
• Opções definidas pelo usuário. 
Utilizando PDM o usuário poderá dispor dos seguintes utilitários ou facilidades, que por sua vez 
pertencem tambem ao TollSet/400. 
 Source Entry Utility (SEU) 
 Data File Utility (DFU) 
AS/400 Programming Development Manager (PDM) 
 
Select one of the following: 
 
1. Work with libraries 
2. Work with objects 
3. Work with members 
 
9. Work with user-defined options 
 
 
 
Selection or command 
===> 
 
F3=Exit F4=Prompt F9=Retrieve F10=Command entry 
F12=Cancel F18=Change defaults 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 6 – 
 
 Screen Design Aid (SDA) 
 Report Layout Utility (RLU) 
 File Compare and Merge Utility (FCMU) 
 Interactive Source Debugger (ISDB) 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
F3 ‡ sair termina o programa e regressa ao programa anterior . 
F4 ‡ Nos mostra uma nova tela donde nos mostra os grupos de comando que podemos 
utilizar assim como uma descrição do mesmo, na qual podemos acessar com o numero da 
opção na linha de comando.Esta tela é de entrada a biblioteca, podemos selecionar que biblioteca queremos visualizar 
ou trabalhar. Temos as seguintes opções: 
 
 
 *LIBL Mostra a lista de Bibliotecas do usuário. 
*ALLUSR Mostra unicamente as Bibliotecas do usuário. 
*ALL Mostra todas as Bibliotecas do sistema 
*USRLIBL Mostra todas as Bibliotecas que não pertencem ao sistema. 
*CURLIB Mostra a Biblioteca definida como current 
 Library Name Mostra somente a biblioteca especificada 
*generic* Esta opção mostra o que tiver entre os * . 
Exemplo * QCA no mostra todas as Bibliotecas que contenham esta cadeia 
de caracteres. 
 
Specify Libraries to Work With 
 
 Type choice, press Enter. 
 
 Library . . . . . . . . . . . *LIBL *LIBL, name, *generic*, *ALL, 
 *ALLUSR, *USRLIBL, *CURLIB 
 
 
 
 
 F3=Exit F5=Refresh F12=Cancel 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 7 – 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Ao trabalhar com Bibliotecas teremos as seguintes opções: 
 
2 Change : Permite alterar o tipo de biblioteca que se tem 
 *PROD É uma biblioteca que se encontra em produção. 
 *TEST biblioteca de provas. 
 Assim como tambem trocar sua descrição de texto. 
3 Copy : Copia de uma biblioteca a outra biblioteca com todas suas características. 
4 Delete: Elimina uma ou mais Bibliotecas 
5 Display: Mostra todos os tipos de objetos contidos na biblioteca. 
 6 Rename: Renomea uma biblioteca. 
8 Display descripcion: Mostra a informação acerca da biblioteca, quando que 
 se criou, se alterou etc. 
12 Mostra os objetos contidos na biblioteca e pode trabalhar com eles. 
13 Troca a descrição da biblioteca. 
 
Nesta tela temos as seguintes teclas de função mais usuais: 
F1 ‡ Mostra uma ajuda na linha da tela. 
F3 ‡ Regressa a tela anterior. 
F4 ‡ Parametros adicionais nos comandos ou função 
F5 ‡ Reatualiza a consulta. 
F6 ‡ Ao pressionar esta tecla criamos uma nova biblioteca. 
 Work with Libraries Using PDM S106CB4A 
 
 List type . . . . . . . *LIBL 
 
 Type options, press Enter. 
 2=Change 3=Copy 5=Display 7=Rename 
 8=Display description 9=Save 10=Restore 12=Work with ... 
 
 Opt Library Type Text 
 QSYS *PROD-SYS System Library 
 QSYS2 *PROD-SYS System Library for CPI's 
 QHLPSYS *PROD-SYS 
 QUSRSYS *PROD-SYS 
 QPDA *PROD-PRD 
 QGPL *PROD-USR 
 QTEMP *TEST-USR 
Bottom 
 Parameters or command 
 ===> ___________________________________________________________________________ 
F3=Exit F4=Prompt F5=Refresh F6=Add to F9=Retrieve F10=Command entry 
F23=More options F24=More keys 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 8 – 
 
F9 ‡ Nos regressa ao comando anterior executado. 
F10 ‡ Mostra os comandos executados no PDM nesta sessão. 
F11 ‡ Mostra a lista sem tipo e sem descrição. 
F12 ‡ Cancela e não modifica nada. 
F16 ‡ Funções definidas pelo usuário. 
F21 ‡ Imprime a lista das bibliotecas. 
F23 ‡ Com esta tecla podemos ver as demais opções que se tem. 
F24 ‡ Mostra todas as funções. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 9 – 
 
Alguns comandos para trabalhar com Bibliotecas. 
 WRKLIBPDM .- Trabalhar com Bibliotecas 
 ADDLIBLE .- Adiciona uma biblioteca na lista de biblioteca. 
 EDTLIBL .- Editar a lista de biblioteca. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Ao escolher esta opção 2 do PDM (WRKOBJPDM) nos mostra a tela anterior 
toma os seguintes valores: 
Library : a Biblioteca com que se vai trabalhar, pode ser : 
 *CURLIB : Mostra a biblioteca definida como current 
 Name : Mostra somente a biblioteca especificada 
Object : È um objeto em particular ou pode ser todos os que contenham certas 
características definidas como: 
Name : Podem ser todos (*ALL), um em particular(Name), os que contenham a 
cadeia contida nos * (*generic*). 
Type: Os tipos de objetos que existem na Biblioteca. Podem tomar valores para 
mostrar todos (*ALL), ou um tipo especifico (*Type) que podem ser *PGM, DSP, 
CLP, PF,LF etc. 
 
 
 
 
 
 
 
Specify Objects to Work With 
 
 Type choices, press Enter. 
 
 Library . . . . . . . . . . MTY2 *CURLIB, name 
 
 Object: 
 Name . . . . . . . . . . . *ALL *ALL, name, *generic* 
 Type . . . . . . . . . . . *ALL *ALL, *type 
 Attribute . . . . . . . . *ALL *ALL, attribute, *generic*, 
 *BLANK 
 
 
 
F3=Exit F5=Refresh F12=Cancel 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 10 – 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Esta es el menú del WRKOBJ en este podemos: 
 
 
 
Eliminar um objeto. 
Utilizar a opção 4 (delete) no objeto à eliminar. 
 
Renomear um objeto. 
 Utilizar a opção 7 (rename) no objeto à renomear 
 
Mover um objeto. 
1. Utilizar a opção 11 (Move) no objeto à mover. 
2. Especificar a biblioteca destino. 
 
Copiar um objeto: 
1. Utilizar a opção 13 (Move) no objeto à mover. 
2. Especificar a biblioteca destino. 
 
A função de copiar funciona como duplicar un objeto, na qual pode existir ou não na 
biblioteca destino. De tal forma que a ação de copiar se realiza de duas formas: 
a. Cria um objeto novo na biblioteca destino,com as mesmas características do 
objeto original. 
b. Regrava um objeto já existente na biblioteca destino. Com as características do 
objeto original. 
Work with Objects Using PDM S106CB4A 
 X 
 Library . . . . . MTY2 Position to . . . . . . . . 
 Position to type . . . . . 
 
 Type options, press Enter. 
 2=Change 3=Copy 4=Delete 5=Display 7=Rename 
 8=Display description 9=Save 10=Restore 11=Move ... 
 
 Opt Object Type Attribute Text 
 DFU1 *PGM DFU dfu insp 
 DFU2 *PGM DFU DFU2 
 DFU3 *PGM DFU DFU4 
 DFU5 *PGM DFU DFU5 
 EFRA *PGM DFU EFRA 
 JEFRA *PGM CLP clp de prueba 
 JFECHA *PGM CLP clp de prueba 
 JFIN02 *PGM CLP PRUEBAS 
 More... 
 Parameters or command 
 ===> 
 F16=User options F17=Subset F18=Change defaults 
 F21=Print list F23=More options F24=More keys 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 11 – 
 
 
Mostrar a descrição de un Objeto: 
Utilizar a opção 8 (display description) no objeto à trabalhar. 
 
Mostrar a informação de um Objeto. 
 Trabalhar com objetos: STRPDM / Opção 2 ou WRKOBJPDM. 
 
 
Executar um objeto. 
 
 Utilizar a opção 16 (Run) no objeto à executar. 
 
Alterar o texto de um objeto. 
 
 Utilizar a opção 13 (Change text) no objeto à executar. 
 
Debug interativo. 
 
 Utilizar a opção 34 ( Interactive source debugger ) no objeto à trabalhar. 
 
 Nesta tela temos as seguintes teclas de função mais usuais: 
 
 
F1 ‡ Mostra uma ajuda na linha da tela. 
F3 ‡ Regressa à tela anterior. 
F4 ‡ Parametros adicionais nos comandos ou função 
F5 ‡ Reatualiza a consulta. 
F9 ‡ Nos regressa o comando anterior executado. 
F11‡ Mostra a lista sem tipo e sem descrição. 
F12 ‡ Cancela e não modifica nada. 
F13 ‡ Repete a opção em todos os objetos em que estão na tela 
F14 ‡ Mostra o tamanho do objeto so quando esta em modo nome e tipos 
F18 ‡ Alterar os valores por default. 
F16 ‡ Funções definidas pelo usuário. 
F21 ‡ Imprime a lista de objetos que se encontram na tela. 
F23 ‡ Mostra as opções que se encontram na tela. 
F24 ‡ Mostra teclas de função. 
 
 
Nota: Só se pode executar as opções e teclas de função que se encontram 
visualizadas na tela. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 12 – 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Ao escolher esta opção 3 (STRPDM) trabalha com Fontes (wrkmbrpdm) nos 
mostra a tela anterior, toma os seguintes valores: 
 
File : É nome do source file à utilizar : 
 Name : Um nome especifico do source file à trabalhar. 
 F4 : Nos mostra uma lista de source file existentes na biblioteca . 
 
Library: É a biblioteca com a que se vai trabalhar, podem tomar os seguintes 
valores: 
 *LIBL : São todas as Bibliotecas definidas para o usuário 
 *CURLIB: É a biblioteca definida como current 
Name: È o nome de uma biblioteca especificam donde se encontram os 
fontes à utilizar. 
 
 Member: 
 Name : Nome do fonte à trabalhar, podem tomar os seguintes valores: 
 *ALL : Todos os fontes contidos na biblioteca e o sorfile 
 Name : O nome da fonte à trabalhar. 
* Generic * : É um fonte que tenha a cadeia que se encoentra definida 
dentro dos asteriscos *. 
 Type : Tipo de fonte à utilizar. 
*ALL : Todos os tipos de fontes que se encontram nesta biblioteca e no 
source file. 
 Type : Tipo especifico de fonte. 
*generic *: Mostra todos aqueles fontes que cumprem com a cadeia 
encerrada entre asteriscos (*) 
*BLANK : Mostra todos os fontes com type em blanco. 
 
Specify Members to Work With 
 
 Type choices, press Enter. 
 
 File . . . . . . . . . . JDEMTY Name, F4 for list 
 
 Library . . . . . . . . MTY1 *LIBL, *CURLIB, name 
 
 Member: 
 Name . . . . . . . . . P43500 *ALL, name, *generic* 
 Type . . . . . . . . . *ALL *ALL, type, *generic*, *BLANK 
 
 
 
 
 F3=Exit F4=Prompt F5=Refresh F12=Cancel 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 13 – 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
TRABALHANDO COM FONTES 
 
Copiar um fonte 
1.- Estando na tela do WRKMBRPDM.. 
2.- Utilizar a opção 3(copy) no fonte à copiar 
A função copiar funciona como duplicar um fonte, o qual pode existir ou não na 
biblioteca e arquivo fonte destino. De tal forma que a ação de copiar se realiza de 
duas formas: 
a). Cria uma fonte nova na biblioteca e arquivo fonte destino com as mesmas 
características do fonte origem. 
b). Regrava um fonte já existente na biblioteca e arquivo fonte destino, com 
as mesmas características. 
 
 Alterar tipo e texto de um fonte 
 Para trocar um texto de um fonte se utiliza a opção 13 (change text) no fonte a 
alterar. 
 
Editar um fonte . 
Utilizando a opção 2 (Edit) no fonte à editar. Esta opção nos mostrará o SEU 
 
Visualizar um fonte: Com a opçõ 5 (display) no fonte à visualizar. Com esta 
opção nós não podemos modificar o fonte. 
 
 Work with Members Using PDM S106CB4A 
 
 File . . . . . . JDEMTY 
 Library . . . . MTY1 Position to . . . . . 
 
 Type options, press Enter. 
 2=Edit 3=Copy 4=Delete 5=Display 6=Print 7=Rename 
 8=Display description 9=Save 13=Change text 14=Compile 15=Create module... 
 
 Opt Member Type Text 
 FV4108R PFLot Master 
 F3002LR LF LF - branch comp, 2nd item, Thru date 
 F4102$J LF JF - Location/Work order(F4102 F4801) 
 F41021$A LF JF - Location/Branch (f41021/f4102) 
 More... 
 Parameters or command 
 ===> 
 F3=Exit F4=Prompt F5=Refresh F6=Create 
 F9=Retrieve F10=Command entry F23=More options F24=More keys 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 14 – 
 
Compilar um fonte: Para compilar um fonte se utiliza a opção 14 (compile) no 
fonte à compilar. 
 
Eliminar um fonte: Para eliminar um fonte se utiliza a opção 4 no fonte a eliminar. 
Mostrar a descrição de um fonte: Para mostrar a descrição de um fonte se utiliza a 
opção 8 (display description) no fonte a trabalhar. 
 
Ordenar uma lista de fontes por data: Utilizam a função <F4> (Display date) para 
mostrar as datas de criação. Y com a Função <F15> (sort date) para ordenar a 
data. 
Indistintamente a função <F15> (sort date) serve para ordenar : por data ou por 
nome. 
 
Buscar um STRING em um fonte 
 
a) Utilizando o PDM. 
 Trabalhando com fontes (WRKMBRPDM) a opção 25 (find 
String) para achar a busca correspondente. 
b) utilizando o comando FNDSTRPDM 
 
SEU (Source Entry Utility) 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 Com o SEU, você pode trabalhar com o fonte de arquios, e os registros contidos 
dentro deles. 
Opções permitidas: 
Columns . . . : 1 71 Edit MTY2/JDESRC 
 SEU==> P55GLAS 
 FMT * ..... *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 
0084.00 I***************************************************************** 
0085.00 C**************************************************************** 
0086.00 C* MAINLINE PROGRAM 
0087.00 C* ---------------- 
0088.00 C* 
0089.00 C* Process housekeeping. 
0090.00 C* 
0091.00 C EXSR S999 
0092.00 C* ---- ---- 
0093.00 C* 
0094.00 C* If LR on, end program. 
0095.00 C* 
0096.00 C *INLR CABEQ'1' EOJ 
0096.00 C 
F3=Exit F4=Prompt F5=Refresh F9=Retrieve F10=Cursor F11=Toggle 
F16=Repeat find F17=Repeat change F24=More keys 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 15 – 
 
ß Criar fontes 
ß Editar fontes 
ß Imprimir fontes 
ß Copiar registro de um arquivo (fontes) a outro fonte ou um arquivo 
de impressão 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 16 – 
 
O SEU conta com as seguintes características: 
 
Comandos: Os comandos do SEU se podem trabalhar em ambientes, fontes e registros. 
Com eles, podemos ocultar registros mostrados em tela, salvar arquivos ou cancelar as trocas na 
fonte. 
 
Linhas de formatos: Se poden utilizar as linhas de formato para verificar a posição dos 
estatutos segundo os estatutos fontes da linguagem de alto nivel utilizado. SEU provê de linhas 
de formato predefinidas para comandos das linguagens de alto nivel utilizados e de linguagem de 
controle de AS/400 (CL). 
 
Modo de tela completa. O modo de tela completa (Full screen mode) é utilizado nas telas 
de edição e de browse para eliminar teclas de função da tela do SEU, permitindo assim, ter quatro 
linhas a mais de texto fonte. 
 
Teclas de função completas. Cada tela do SEU suporta um conjunto de teclas de função, 
usadas para realizar tarefas especificas. Estas teclas, se encontram listadas na parte inferior de 
cada tela. Exceto pela tecla F1 (Ajuda) que não é sempre mostrada e sem embargo é válida em 
todas as telas, uma tecla de função é valida só se for mostrada na parte inferior da tela. 
 
Prompts de comandos e linguagens : Os prompts de comandos e linguagens são 
utilizados para criar registro ou linhas de código fontes sem erros. 
 
Linha de comandos:. Esta, é usada para realizar várias operações, tais como insertar 
registros em brancos , copiar registro e chamar o prompt de comandos ou linguagens. 
 
Números máximo e tamanho de registros: O SEU permite um máximo de 32764 registros 
em um fonte. O tamanho máximo de registros permitido é de 240 caracteres , o qual inclue 6 
caracteres para o número de sequência e 6 caracteres para a data. 
 
Telas de opções: Este tipo de telas são utilizadas para controlar o ambiente de SEU e para 
realizar operações sobre os fontes de arquivos e arquivos de impressão. As telas de operações 
mais usadas são: 
 - troca de defaults da sessão. 
- Opções de browse/ copy. 
- Opções de Encontrar/Alterar. 
 
Sessão split: Esta sessão é para ver e editar um fonte e visualizar outro na mesma tela de 
trabalho. Tambem, é possível visualizar dois fontes na mesma tela por vez. Se a tela de opções de 
Browse/Copy é acessada desde uma sessão split, é possível copiar registros desde a fonte que 
será mostrado na tela a fonte que se está utilizando. 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 17 – 
 
Check de sintaxes. O check de sintaxes é utilizado para verificar os estatutos das 
diferentes linguagens de alto nivel, incluindo Basic, PL/I, cobol, Fortan e RPG, assim como a 
Linguagem de Controle do AS/400. 
 
Comandos do sistema: É possível mandar executar comandos de AS/400 que trabalham 
com uma tela de edição do SEU. Para mostrar os comandos do sistema, pressione F21. Não é 
possível teclar dados na tela de edição do SEU de comandos do sistema que se encontra 
mostrada. 
 
Trabalhar com fontes 
 
Iniciar uma sessão no SEU 
ß Desde o PDM (program development manager). Dentro do PDM utilize a opção 
2 (editar) ou 5 (mostrar) na tela de trabalho com fonte. 
ß Desde o menu de programador. Selecione a opção 8 (editar uma fonte de um 
arquivo fonte) ou bem, selecione a opção 5 (executar comandos), e selecione o 
 Comando STRSEU da lista de comandos. 
ß Por meio da linha de comandos de AS/400. Tecle STRSEU na linha de 
 Comandos. 
 
 
 
 
 
 
 
 
 
 
 
 
 
Ver uma lista de fontes. 
 
Para ver una lista de fontes, usando o comando STRSEU, faça o seguinte: 
 
1.- Especifique o arquivo fonte para o parametro SRCFILE mas não especifique o fonte no 
parametro SRCMBR. Especifique o valor do *SELECT para o parâmetro SRCMBR. 
Tecle o comando STRSEU sem nenhum parametro para que a tela de trabalho com fontes 
usando SEU seja mostrada. 
Start Source Entry Utility (STRSEU) 
 
 Type choices, press Enter.Source file . . . . . . . . MTYSRC Name, *PRV 
 Library . . . . . . . . MTY Name, *LIBL, *CURLIB, *PRV 
 Source member . . . . . . . *ALL Name, *PRV, *SELECT 
 Source type . . . . . . . . Name, *SAME, BAS, BASP... 
 Option . . . . . . . . . . . *BLANK *BLANK, ' ', 2, 5, 6 
 Text 'description' . . . . . *BLANK . 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 18 – 
 
Alterando a lista de fontes 
 
Você pode alterar a lista de fontes que aparecem na tela de trabalho com fontes usando 
SEU a que só os fontes que cumpram certo critério sejam incluidos na dita lista. A seleção de 
fonte pode ser por: 
 
• Nome parcial 
• Tipo de membro 
• Data de criação ou de ultima alteração. 
• Texto ou texto parcial . 
 
Para alterar a lista de fontes. 
 
1. Pressione F17 (subconjunto). A tela de lista subconjunto de membros. 
2. Especifique o critério para os membros que deseja que sejam listados e 
pressione enter. Com isto, a lista de fontes atualizada será mostrada. 
 
Criar um fonte: 
 
 Para criar um membro, siga os passos que se mostram a continuação: 
• Desde a linha de comando, ou utilizando o prompt de comandos, especificando o 
nome da fonte a criar, no parametro SRCMBR do comando STRSEU. Se utiliza o 
prompt de comandos, tecle um tipo de fonte valido no source type, do contrário o 
default é usado. 
• Na tela de trabalho com membros usando SEU, tecle o nome do membro a 
criar no prompt de new member e pressione enter. 
 
A tela de trabalho com membros usando SEU pode ser acessada especificando *SELECT 
para o parametro SRCMBR no comando STRSEU. 
 
A tela de edição aparecerá, na qual pode iniciar a entrada de código. 
 
Tipo de fonte Descrição 
CLP 
CBL 
DSPF 
MENU 
PF 
PRFT 
QRY 
RPG 
TXT 
CL program 
Cobol 
Arquivos de telas 
Menus (UIM) 
Arquivo Físico 
Arquivo de Report 
Arquivo de Querys 
RPG 
Texto 
 
A figura anterior nos mostra os tipos de fontes mais utilizados em AS/400. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 19 – 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Para iniciar uma sessão do SEU desde o PDM com a opção 2 (EDIT) na fonte que 
desejamos editar. 
 
Mostrar um fonte (Browsing) 
A tela de browse é usada para ver um fonte sem o risco de altera-lo acidentalmente (só 
leitura). Podemos usar as operações de busca e posicionamento, mas não podemos realizar 
operações que alterem o fonte, tais como edição, eliminação, atualização ou relocalização de 
registro. 
Para mostrar um fonte : 
• Especifique 5 (Browse) no parametro option do comando STRSEU. 
• Seleccione a opção 5 (Browse) na tela de trabalho com fontes usando SEU. 
 
A tela de Browse aparecerá e conterá o fonte que haja selecionado. 
 
Para alterar os defaults da sessão na tela de browse, pressione F13. Aqui poderá 
especificar parametros tais como o numero de registros a rolar na tela, ou forçar a entrada de 
letras em só Maiúsculas. 
Tambem é possível alterar a sessão usando o comando SEU SET 
O modo da tela completa o permite remover a linha de formato da parte superior da tela e 
a lista de teclas de função da parte inferior da mesma. 
Podemos utilizar o modo de tela completa mesmo se esta mostrando os fontes ou arquivo 
de impressão (browsing). Para alterar de modo campleta: 
 
1. Na tela de Browse, pressione F13 (alterar default). Com o anterior 
aparecera a tela de trocas default. 
2. Tecle Y no prompt de full screen mode e pressione enter. A tela de browse 
Work with Members Using PDM S106CB4A 
 
 File . . . . . . MTYSRC 
 Library . . . . MTY1 Position to . . . . . 
 
 Type options, press Enter. 
 2=Edit 3=Copy 4=Delete 5=Display 6=Print 7=Rename 
 8=Display description 9=Save 13=Change text 14=Compile 15=Create module... 
 
 Opt Member Type Text 
 FIN03L LF *archivo logico de prueba 
 FIN03LA LF archivo logico de carr 
 FIN04 PF ARCHIVO FISICO DE CAR/AL/MAT 
 FIN04BK PF ARCHIVO FISICO DE PIN04(ALCARMAT) 
 FIN04LB LF ARCHIVO LOGICO DE FIN04 
 2 FIN25 PF ARCHIVO INFORMACION 
 More... 
 Parameters or command 
 ===> 
 F3=Exit F4=Prompt F5=Refresh F6=Create 
 F9=Retrieve F10=Command entry F23=More options F24=More keys 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 20 – 
 
alterará a modo de tela completa. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 21 – 
 
Para cancelar o modo de tela completa e regressar ao modo normal de operação: 
 1 .- Na tela de browse, pressionar F13. 
2 .- Tecle N no prompt full screen mode e pressione enter. 
 
Mesmo se trabalhe com um fonte, pode dividir (Split) a tela do browse com outro browse 
de um fonte ou arquiivo de impressão (spool file). Para dividir (splits) a tela : 
 
1.- Pressione F15 (opções de browse). 
2.- Realize os seguintes pontos: 
• Para mostrar outros fontes do mesmo arquivo, tecle o nome do fonte no prompt 
de Browse member e pressione enter. 
• Para mostrar outro fonte de um arquivo diferente, tecle o nome do arquivo no 
prompt de file, o nome do fonte no prompt de browse member e pressione enter. 
• Para mostrar um arquivo de impressão, tecle seu nome no prompt spool file. 
• Para mostrar um arquivo de impressão de outro usuário, tecle o nome do usuário 
no campo correspondente, tecle seu nome de arquivo de impressão e pressione 
enter. 
 
A linha de divisão é colocada na metade da tela do browse, e agora pode ver o fonte ou 
arquivo de impressão adicional, na tela. Para mover a linha de divisão, pressione F6 (move Split 
line) na posição que deseja. 
 
Editar um fonte 
 
Para editar um fonte, realize alguns dos seguintes pontos: 
• Especifique um 2(Edit) no parametro OPTION do comando STRSEU. 
• Especifique a opção 2 (edit) no prompt Opt na tela de trabalho com membros usando 
SEU. 
• Especifique a opção 2 (edit) na tela de trabalho com membros usando o PDM. 
• Especifique a opção 2 (edit) na tela de trabalho com registros de telas em SDA. 
 
Aparecerá a tela de edição, contendo o membro especificado. 
Existen vários registros especiais na tela de edição de fontes, os quais não são gravados 
juntos com o código fonte. 
• Inicio de dados 
• Fim de datos 
• Formato 
• Inserção 
• Colunas 
• Tabulações 
• Exclusão (exclude) 
Não se pode eliminar os registros especiais listado anteriormente. 
As linhas de inicio e fim de dados são mostradas para designar o inicio e o fim de umfonte. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 22 – 
 
Durante a edição de fontes, pode dividir (split) a tela de edição com outra tela de browse 
de um fonte ou arquivo de impressão (spooled file). Para dividir a tela. 
 
1. Pressione F15 (opções de Browse /copy). 
2. Realize alguns dos seguintes pontos: 
 
• Para mostrar ou copiar outro fonte do mesmo arquivo, tecle o nome de fonte 
 en el prompt de browse y presione enter. 
• Para mostrar ou copiar outro fonte de um arquivo diferente, tecle o nome do 
 arquivo no prompt de file, o nome do fonte no prompt de Browse member e pressione 
enter. 
• Para mostrar ou copiar um arquivo de impressão, tecle seu nome em prompt spool file. 
• Para mostrar ou copiar um arquivo de impressão de outro usuário, tecle o nome do 
 usuário no campo correspondente, tecle o nome do arquivo de impressão e pressione 
enter. 
 
3. Se desejas copiar o fonte ou arquivo de impressão completo tecle um no 
 prompt de copy all records. 
Pressione enter e se uma das seguintes opções passarem: 
• Se esta em modo browse, a linha de divisão (linha separadora das sessões) é colocada 
na parte media da tela de edição e poderá ver o fonte adicional. 
• Se esta copiando o fonte e especifica um destino no fonte que esta editando, o 
 fonte ou arquivo de impressão é copiado dentro do fonte que se esta editando, mas a 
sessão adicional não será iniciada. 
• Se se encontra copiando um fonte, mas não especificou um destino (lugar donde se 
iniciará a cópia do fonte adicional) no fonte que se está editando atualmente, a 
tela de edição é dividida e o comando de cópia bloco (CC) é colocado no primeiro e 
último registro do fonte ou arquivo de impressão que está mostrando. 
 
 
Eliminando um fonte 
 
• Especifique 6(Print) no parametro OPTION do comando do STRSEU 
• Selecionando a opção 6(Print) na tela de trabalho com membros (WRKMBRPDM) 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 23 – 
 
 
ALTERANDO O AMBIENTE DA SESSÃO DE EDIÇÃO 
 
Podemos alterar o ambiente da sessão de edição de duas maneiras: Utilizando o 
comando SEU SET, ou então utilizando a tela de troca da sessão (F13). 
Ao pressionar F13 aparecerá a tela de troca de Defaults da sessão, e então poderá 
fazer o seguinte: 
• Especificar o numero de registro de dados que serão paginados (mediante as 
teclas de roll). 
• Especificar o teclado em somente maiúsculas ou mixto. 
• Habilitar ou desabilitar os tabuladores. 
• Especificar o número em que se irão incrementando os números de sequencia. 
• Alterar ao modo tela completa. 
• Definir as dimensões da tela (para Display de 27 linhas x 132 
colunas). 
• Especificar o tipo de fonte que se está editando. 
• Habilitar/desabilitar o check de sintaxes. 
• Especificar o check de sintaxes para um range de estatutos. 
• Assinalar margens. 
• Assinalar todos os registros existentes com uma data determinada. 
• Assinalar a resequenciação do fonte como default. 
 
Alguns dos valores dependem do tipo de fonte, mesmo que outros dependem do valor 
que eles são assinalados ou dos valores usados na última sessão de edição. 
 
ENCONTRAR E ALTERAR STRING DE CARACTERES 
 
Durante a sessão de edição, é possível buscar dentro de um fonte uma string de caracteres, 
e opcionalmente alterar-la por outra string, usando a tela de opções de Encontrar / Alterar 
(Find/Change). 
 Para acessar dita tela, pressione F14 (Find/Change Option) estando dentro da sessão de 
edição . Então, dentro da tela de find/changer poderá fazer o seguinte: 
• Encontrar uma string especifica. 
• Alterar uma string. 
• Encontrar os registros com uma data determinada. 
• Encontrar os erros de sintaxes 
Durante uma sessão de mostra (browse), pode buscar uma string de caracteres por medio 
da tela de opção de encontrar (Find Option). A diferença é que nesta sessão não poderá alterar o 
fonte e não poderá encontrar os erros de sintaxes, exceto nos arquivos de impressão. 
 Para guardar os valores que teclou nos Prompts de encontrar (Find) e alterar (Change), 
pressione enter, F16 para encontrar ou F17 para alterar a string de caracteres. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 24 – 
 
 
Parar encontrar uma string de caracteres: 
 
1. Tecle a string que deseja encontrar no prompts de find da tela de 
encontrar ou de encontrar e alterar. 
2. Altere os demais prompts, se for necessário 
3. Pressione F16 para encontrar o string. 
 
Para encontrar e alterar uma string de caracteres 
 
1. Digite a string de caracteres que deseja alterar no prompt de encontrar ou 
 encontrar/alterar 
2. Digite a string de caracteres com a que deseja regravar a anterior no 
 promt de alterar (Change). 
3. Altere os demais Prompts, se for necessário. 
4. Pressione F17 para alterar a seguinte ocurrencia da string. 
 
Se a string digitada, é encerrada entre apóstrofes, este signo será ignorado na busca. Para 
encontrar um registro numa determinada data: 
1. Pressione F14 para acessar a tela de encontrar. 
2. Especifique a data no campo search on date.. 
3. Especifique 1,2,3 no campo de comparação/compare. 
4. Pressione F16 para encontrar o seguinte registro com a data especificada. 
Tambem, podemos usar a operação de encontrar para localizar os erros de sintaxes 
detectados no código fonte do fonte. Para encontrar estes erros tecle ‘*ERR’ ou “* ERR” e o 
campo de encontrar/find. Quando pressionar F16 (Find), SEU localizará qualquer erro de sintaxe 
encontrado pelo checador de sintaxes. 
 
COMANDOS DE LINHA 
 
Os comandos de linha se usam para realizar várias funções sobre os registros no fonte. 
Podemos usar os comandos nas linhas para : 
• Copiar, eliminar, insertar, mover ou imprimir registros. 
• Ajuda para teclar e formatar dados dos novos registros. 
• Alterar os registros que se veêm na tela. 
Tecle os comandos da linha sobre o número de sequencia do registro na fonte. Por 
exemplo, tecle um D (delete) no número de sequencia de um registro para elimina-lo do código 
fonte. Tecle um D3 para eliminar os três registros imediatos do código fonte. 
Estes comandos podem ser teclados em maiúsculas ou minúsculas. SEU converte 
automaticamente os comandos em maiúsculas. 
Depois de teclar ou alterar os comandos de linha, pressione uma das seguintes teclas para 
correr os campos. 
• Enter 
• Uma tecla de função válida. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 25 – 
 
• Avanço ou retorno de pagina ( Page up ou page Ddown). 
 
A seguinte tabela lista os comandos da linha de SEU. Todos os comandos de linha são 
válidos nas sessões de edição em split ou Full mode. Esta tabela indica os comandos de linha que 
são válidos para sessões de mostra (browse). 
 
 
Comando BROWSE COMANDO DE LINHA 
 
 Posicionamento absoluto 
Antes / Depois 
Colunas 
Copiar 
Copiar repetidamente 
Apagar 
Excluir 
Formato 
Inserção 
Insertar com formato 
Insertar com prompt 
Imprimir linha 
Mover 
Cobrir 
Prompt 
Posição relativa 
Repetir 
Show 
 
Y 
N 
Y 
Y/N 
Y/N 
Y/N 
Y 
Y 
N 
N 
N 
Y 
N 
N 
N 
Y 
N 
Y 
 
 
n. n n.n 
A An B Bn 
COLS 
C Cn CC 
CR CRn CCR 
D Dn DD 
X Xn XX 
F F? Fxx 
I In 
IF IFn IF? IF?n 
IP IP? Ipxx 
LP LPn LLP 
M Mn MM 
O On OO 
P P? Pxx 
+ +n - -n 
RP RPn RPP RPPn 
SF SFn SLSLn 
 
 
 
 
COMANDOS DE SEU 
 
 
Podemos usar os comandos do SEU para realizar operações de encontrar/alterar, para sair 
da sessão e para estabelecer os defaults da mesma. Os comados proveem um fast path para estas 
operações, os quais tambem podem ser acessadas através das telas de opções. Os valores teclados 
por meio dos comandos do SEU aparecerão nas ditas telas. 
 
 
Os comandos deven ser teclados sobre a linha de comandos do SEU . Para recuperar o 
comando anterior pressione F9 (retrieve). É possível mover o cursor desde a área de dados até a 
linha de comandos do SEU e regressar à área de dados por meio da tecla F10 (cursor). 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 26 – 
 
 
A seguinte tabela mostra os comandos para os diferentes tipos de sessão. 
 
 
COMANDOS 
 
 
Função 
Sessão 
Edição 
Sessão 
Browse 
Depende da 
Sessão 
FIND ou F 
 
 
CHAGE ou C 
 
 
TOP ou T 
 
 
BOTTOM ou 
BOT ou B 
 
SAVE 
 
 
FILE 
 
 
CANCEL 
Encontrar uma cadeia de caracteres 
dentro de um fonte. 
 
Encontrar uma cadeia de caracteres 
num fonte e alterar por outra. 
 
Reposiciona a tela de trabalho na 
primera pagina de dados. 
 
Reposiciona a tela de trabalho na 
ultima pagina de dados. 
 
Salva as alterações feitas nos 
membros e continua editando. 
 
Salva as alterações feitas no fonte e 
sai da edição. 
 
Abandona a sessão sem salvar as 
alterações realizadas. 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
Y 
 
 
N 
 
 
Y 
 
 
Y 
 
 
N 
 
 
N 
 
 
Y 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
 
Y 
 
 
N 
 
 
Y 
 
 
 
SAIR DE SEU 
 
Podemos sair do SEU usando a tela de saída. Para acessar a dita tela, presione F3 (Sair) 
na tela de edição ou em qualquer tela de Split. A tela de saída pode usar-se para realizar as 
seguintes operações sobre o foente que se está editando. 
• Sair e criar um novo fonte. 
• Sair sem criar o fonte. 
• Sair e salvar um fonte existente. 
• Resequenciar o fonte editado. 
• Imprimir o fonte. 
• Ir à lista de fonte. 
• Regressar à edição. 
• Cancelar a função de encontrar string por PDM, 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 27 – 
 
IV. Definição do código de arquivos (Físicos e Lógicos). 
 
- tipos de arquivos e sua diferencia: 
 
as tabelas base são chamadas arquivos físicos. 
os views/index são chamados arquivos lógicos. 
 
Arquivo Físico 
 
Cada arquivo físico está formado de três partes ou 
extenções. 
 
 1. Formato. Definição dos campos do 
 cuales se que se compõe um registro. 
 
2. Rota de acesso. Definição ou por chave. 
3. Registros podem ser acessados (em sequencia de 
dados, espaço para os registros dos quais esta o 
arquivo. 
 
 
 
Se podem gerar dados em um arquivo, por meio de programas interativos ou batch, DFU 
(Data File Utility), ou comando de copy. 
 
CPYF FROMFILE( ) TOFILE ( ) MBROPT{*ADD FMTOPT {*MAP 
 *REPLACE *DROP 
 CRTFILE {*NO 
 *YES 
 
DSPPFM FILE(LIB NAME/FILE NAME) MBR(*FIRST) => mostra o conteudo do arq. 
 (ex. para verificar dados copiados) 
DADOS 
A CHAVE 
EST_NO 7 
0 
EST_NOMB 20 
A 
DIRECC 20 
A 
F
O
R
M
A
T
O 
CAMINHO DE ACESSO 
D
A
D
O
S 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 28 – 
 
 
- Código de um arquivo físico (indexado): 
 
COLUMNS . . . : 1 71 EDIT MTY2/JDESRC 
 SEU==> F50001 
 FMT PF ....A..........T.NAME++++++RLEN++TDPB......FUNCTIONS++++++++++++++++++ 
0010.00 A R STUCLS 
0011.00 A TEXT('ARQUIVO DE ESTUDANTES’) 
0012.00 A STUNO 7 0 TEXT (‘NUMERO DE ESTUDANTE’) 
0013.00 A CLASNO 4 
0014.00 A STATUS 4 
0015.00 A FGRADE 3 
0016.00 A DATE R REFFLD(ENDATE CLSHST) 
0017.00 A K STUNO 
0018.00 A K CLASNO DESCEND 
 
 
NIVEIS DE UM ARQUIVO: 
 FILE -LEVEL 
 RECORD-LEVEL 
 FIELD-LEVEL 
 KEY FIELD-LEVEL 
 SELECT/OMIT-LEVEL 
 
 
FROM TYPE.- No caso de arquivos sempre se põe ‘A’. 
(T) NAME TYPE.- Se define ‘R’ => Na linha donde se define o nome do reg. 
 Se define um ‘K’ => quando se vão definir as chaves (sort). 
 Se define um ‘J’ => para especificações de arquivos join. 
 Se define um ‘S/O’ (select/omit).- para selecionar i/o omitir regs. 
 este só se pode usar em arq. lógicos (idx). 
NAME .- Se define o nome da variavel (não maior de 6 digitos). 
R) REFERENCE.- Se define um ‘R’, só em caso de que o campo se pode referen- 
 ciar a outro que exista num arquivo determinado. Isto é para que 
tome as mesmas caracteristicas do campo ao qual se faz referencia. 
LEN) LENGTH.-Tamanho do campo. 
D) DATA TYPE.- A => alfanumerico 
 P => numerico empacado 
 S => numerico ‘zoned’ (não é empacado) 
P) DECIMAL .- O número de decimais, sempre e quando for numérico. 
 
FUNCTIONS.- REFFLD(nome campo nome arq.) => se utiliza para tomar 
caracteristicas de outro campo em outro arq. (só caracteristicas, não 
dados). 
 DESCEND => ordena o campo em forma descendente, por default se não 
 se definie nada o considera ascendente. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 29 – 
 
 Estas funções são exclusivas para arqs. lógicos: 
 COMP => ex. comp(ge 125), só toma registros com esta condição. 
 RANGE => ex. range(10000 90000), só toma regs. com esta condição. 
 VALUES => ex. values(‘pend’ ‘conf’ ‘can ‘), regs. com esta condição. 
pressionando ajuda neste campo se mostram todas as opções existentes. 
não se recomenda usar estas funções (comp, range, values), já que faz 
exclusivo o uso do arquivo. 
 
O Data Type é opcional, se não se define decimais se considera alfanumerico, 
se se definen decimais se considera numérico ‘zoned’. 
 
- Código de um Arquivo Lógico: 
 
Columns . . . : 1 71 Edit MTY2/JDESRC 
 Seu==> F50001LA 
 FMT PF .....A..........T.Name++++++Rlen++Tdpb......Functions++++++++++++++++++ 
0010.00 A R STUCLS PFILE(F50001) 
0011.00 A K DATE 
0012.00 A S STATUS COMP(EQ ‘VAL ‘ ) 
 
FUNCTIONS.- PFILE(nome arq.fisico) => se utiliza para definir o arquivo fisico ao 
qual vá a estar referenciado o lógico. 
Existem arquivos “JOIN LOGICAL FILES” => este tipo de arquivo combina num 
formato, campos de dois ou mais arquivos fisicos. 
Se define só um formato de registro, os campos chave devem ser do arquivo 
primário. 
 
- Código de um Join Logical File: 
 
ARQUIVO CAMPOS 
 STUDENT STUDENT NUMBER (STUNO) 
 STUDENT NAME (STUNAM) 
 
 CLASS STUDENT NUMBER (STUNO) 
 CLASS NUMBER (CLASNO) 
 
 
COLUMNS . . . : 1 71 EDIT MTY2/JDESRCSEU==> F50001LB 
 FMT PF 
.....A..........T.NAME++++++RLEN++TDPB......FUNCTIONS++++++++++++++++++ 
0010.00 A R JOINREC JFILE(STUDENT CLASS) 
0011.00 A J JOIN(1 2) 
0012.00 A JFLD(STUNO STUNO) 
0013.00 A STUNO JREF(1) 
0014.00 A STUNAM 
0015.00 A CLASNO 
0012.00 A K STUNO 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 30 – 
 
 
JFILE.- Se devem especificar dois arquivos fisicos. o primero é o arq. primário. 
J .- Identifica o inicio de especificações do join. 
JOIN .- Identifica quais dos arquivos são ‘joinded’ . 
JFLD .- Identifica os nomes de campos (‘join fields’), estes devem existir em ambos 
 arquivos (join); e devem ter os mesmos atributos. 
JREF.- os campos em um ‘jlf’ devem ser identificados como únicos. Este atributo 
permite especifiar um campo a qual o arquivo corresponde (isto é, quando o nome 
de um campo existe em mais de um arquivo fisico). 
 
não se recomenda usar os arquivos ‘JOIN’, ja que ocupam muita área no 
equipamento, alem disso geralmente se requer de autorização por parte de 
sistemas/usuário. 
 
- Compilação de Arquivos Físicos/Lógicos 
 
a) Se pode compilar dentro do menu de pdm com a opção ‘14’. 
 Se se usa esta opção se recomenda pressionar o ‘F4’ para ver default da biblioteca 
onde se vai dirigir o objeto do arquivo que se irá gerar e em caso de que seja outra 
biblioteca, defini-la. Alem disso, é necessário definir uma autoridade=*all, já que do 
contrário, só o usuário que criou o arquivo teria acesso a este. 
 
b) Compilar com o comando => ‘CRTXF’ + F4. (tomar as mesmas considerações 
que no caso de compilar com a opção 14 dentro de pdm. 
 
 CRTPF FILE (*CURLIB/FILE-NAME) 
 SRCFILE (*LIBL/QDDSRC) 
 SRCMBR (*FILE) 
 MBR(*FILE) 
 MAXMBRS(1) 
 SIZE(*NOMAX 1000 3) 
 AUT (*ALL) 
 
CRTLF FILE(*CURLIB/FILE-NAME) 
 
Comandos de Arquivos: 
 
CLRPFM .- Clear Physical File Member (Inicializa o arquivo, apaga a informação) 
DLTF .- Delete File (Apaga o archivo, fisicamente já não existirá). 
CHGPF .- Change Physical File (Altera atributos no arquivo) 
CHGPFM .- Change Physical File Member 
DSPFD .- Display File Description (Mostra dados gerais do arquivo) 
DSPDBR .- Display Data Base Rel. (Para consultar arquivos lógicos referenciados a um arq. 
 físico.) 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 31 – 
 
DSPPGMREF.- Display Program Reference (para consultar que arquivos se estão utilizando em 
um programa.) 
DSPFFD .-Display File Field Descrip.(para consultar lista de campos definidos em um arquivo e 
suas caracteristicas. 
Comamdos para revisar compilações. 
 
 Quando se compilam arquivos, programa, tela, ect.. se envia a uma área de processos 
chamada Work with Submitted Jobs (WRKSBMJOB), na qual mostra o status dos processos que 
se encontram na área. 
 Estes status são os seguintes: 
 
 JOBQ : Indica que o processo está por entrar na área processos. 
 ACTIVE: Indica que o processo está por executar-se ou se está executando. 
 OUTQ: Indica que o processo foi terminado de executar-se. 
 END : Indica que o processo foi sido terminado pelo usuário. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 As opções que se encontram neste comando são as seguintes: 
 3= Hold .- Usando esta opção se congela o processo. 
 4= End .- Usando esta opção se cancela a execução do processo. 
 6= Release.- 
 8= Work Spooled Files. - Com esta opção nos mostra o spool de nosso processo. 
O spooled file (área de impressão), é uma ferramenta que serve para mostrar e armazenar 
a informação dos resultados das compilações, e das saídas dos programas executados programas. 
 
 
 
 
 
 
 
Work with Submitted Jobs S106CB4A 
 01/14/99 11:27:08 
 Submitted from . . . . . . . . : *USER 
 
 Type options, press Enter. 
 2=Change 3=Hold 4=End 5=Work with 6=Release 7=Display message 
 8=Work with spooled files 
 
 
 Opt Job User Type -----Status----- Function 
 P550025 MTY02 BATCH OUTQ 
 P550002 MTY09 BATCH ACTIVE CMD-CRTRPGPGM 
 P550022BK MTY09 BATCH JOBQ 
 
 
 
Bottom 
 Parameters or command 
 ===> 
 F3=Exit F4=Prompt F5=Refresh F9=Retrieve F11=Display schedule data 
 F12=Cancel 
 
Work with Job Spooled Files 
 
Job: P550025 User: MTY02 Number: 957927 
 
Type options, press Enter. 
 1=Send 2=Change 3=Hold 4=Delete 5=Display 6=Release 7=Messages 
 8=Attributes 9=Work with printing status 
 
 Device or Total Current 
Opt File Queue User Data Status Pages Page Copies 
5 P550025 QPRINT RDY 26 1 
 QPJOBLOG QEZJOBLOG P550025 RDY 6 1 
 
 
 
 
 Bottom 
Parameters for options 1, 2, 3 or command 
===> ________________ 
 
F3=Exit F10=View 3 F11=View 2 F12=Cancel F22=Printers F24=More keys 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 32 – 
 
 
 
 
 
 
 
Para revisar a compilação de um programa com a opção 5 (display) do Work with Job 
Spooled Files mostrará a seguinte tela 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Os erros de compilação se encontram ao final do spool, para poder visualizar o mais 
rápido sem ter que paginar, se tecla no control ‘B’ ou *BOT (Bottom) que nos posiciona o cursor 
ao final do spool. 
É nesta parte que podemos observar a quantidade de erros que resultaram da compilação. 
Tambem nos indica o numero de severidade , a qual nos informa a gravidade do erro. 
Para realizar a compilação e se criar o objeto, são os erros menores que 30. 
 Se se repagina (Re. Pag) se encontram os números de erros ocurridos como mostra a tela 
seguinte:.8....+....9....+....0....+....1....+....2....+....3.. 
 
 
 
 
 1/P550025 01/14/99 09:46:48 Page 26 
 
 
 
 
 
 
 
 
 
 
 
 
Bottom 
 
Display Spooled File 
File . . . . . : P550025 Page/Line 25/46 
Control . . . . . B Columns 1 - 78 
Find . . . . . . _____________________- 
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+... 
 Message . . . . : RPG provides a Separate-Indicator area for the 
 file. 
 
 * * * * * E N D O F M E S S A G E S U M M A R Y * * * * * 
P5525MG - CAMBIO DE GREGORIANO A JULIANO 
 5769RG1 V4R2M0 980228 IBM RPG/400 MTY 
 F i n a l S u m m a r y 
 Message Count: (by Severity Number) 
 TOTAL 00 10 20 30 40 50 
 85 7 0 1 65 12 0 
 Program Source Totals: 
 Records . . . . . . . . . . : 794 
 Specifications . . . . . . : 391 
 Table Records . . . . . . . : 1 
 Comments . . . . . . . . . : 400 
 Compile stopped. Severity level 40 errors found in file. 
 * * * * * E N D O F C O M P I L A T I O N * * * * * 
 
F3=Exit F12=Cancel F19=Left F20=Right F24=More keys 
 
Display Spooled File 
 File . . . . . : P550025 Page/Line 25/1 
 Control . . . . . B Columns 1 - 78 
 Find . . . . . . 
 *...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+... 
 P5525MG - CAMBIO DE GREGORIANO A JULIANO 
 5769RG1 V4R2M0 980228 IBM RPG/400 MTY 
 M e s s a g e S u m m a r y 
 * QRG1025 Severity: 40 Number: 8 
 Message . . . . : Unable to open the /COPY member. Specification 
 is ignored. 
 * QRG2120 Severity: 40 Number: 2 
 Message . . . . : External description not found for file 
 specified as externally described. File ignored. 
 * QRG5132 Severity: 30 Number: 3 
 Message . . . . : Factor 2 entry is not the name of a file or a 
 record format. 
 * QRG5176 Severity: 30 Number: 1 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 33 – 
 
 Esta tela nos indica os números de erros generados e a severidade respectivamente, pelo 
qual é necessário buscar em que linha ocorreu o erro, isto é possivel teclando o numero do erro na 
linha do comando Find ......______ o numero do erro, pressionando a tecla F16 tantas vezes que 
se necessitem, já que o mesmo erro pode encontrar-se em várias linhas do código 
 
 
 
 
 
Gravidade de código de mensagens 
 
 
Gravidade Descrição 
00 
10 
20 
30 
40 
50 
 
60 
70 
80 
90 
99 
Informação 
Aviso 
Erro 
Erro grave 
Erro não deveria continuar 
Terminação anormal do trabalho 
ou programa 
Estado do sistema 
Integridade de dispositivos 
Alerta do sistema 
Integridade do sistema 
Ação 
 
 
Funções em spooled file. 
 
Na linha de control tem as seguintes funções: 
 
 
Comando Descrição 
 T 
 B 
 Wn 
 W-/+n 
 
 Pn 
Posiciona ao principio do spool 
Posiciona ao final do spool 
Posiciona na coluna n 
Posiciona na n coluna a partir de 
onde se encontra posicionado 
Posiciona o apontador na pagina n 
 
 F19 = mostra a tela a esquerda 
 F20 = mostra a tela a direita. 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 34 – 
 
 
Comandos para manuseio de arquivos 
 
DSPDBR 
 
Nos mostra todos os lógicos que estão relacionados com este arquivo. 
A forma de utilizar-se é: 
⇒ DSPDBR F4101 
ou 
⇒ DSPDBR <F4> 
 
 
 
 
 
 
 
Esta é uma parte do que nos mostra este comando 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Display Data Base Relations (DSPDBR) 
 
 Type choices, press Enter. 
 
 File . . . . . . . . . . . . . . f4101 Name, generic*, *ALL 
 Library . . . . . . . . . . . *LIBL Name, *LIBL, *CURLIB... 
 Output . . . . . . . . . . . . . * *, *PRINT, *OUTFILE 
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+..
. 
 1/15/99 Display Data Base Relations 
 DSPDBR Command Input 
 File . . . . . . . . . . . . . . . . . . . : FILE F4101 
 Library . . . . . . . . . . . . . . . . . : *LIBL 
 Member . . . . . . . . . . . . . . . . . . : MBR *NONE 
 Record format . . . . . . . . . . . . . . . : RCDFMT *NONE 
 Output . . . . . . . . . . . . . . . . . . : OUTPUT * 
 Specifications 
 Type of file . . . . . . . . . . . . . . . : Physical 
 File . . . . . . . . . . . . . . . . . . . : F4101 
 Library . . . . . . . . . . . . . . . . . : ELAPRDDTAX 
 Member . . . . . . . . . . . . . . . . . : *NONE 
 Record format . . . . . . . . . . . . . . : *NONENumber of dependent files . . . . . . . . : 18 
 Files Dependent On Specified File 
 Dependent File Library Dependency JREF Constraint 
 F4101JA ELAPRDDTAX Data 1 
 F4101LJ ELAPRDDTAX Data 
 F4101LK ELAPRDDTAX Data 
 F4101LI ELAPRDDTAX Data 
 F4101LA ELAPRDDTAX Data 
 F4101LB ELAPRDDTAX Data 
 F4101LC ELAPRDDTAX Data 
 F4101LD ELAPRDDTAX Data 
 F4101JD ELAPRDDTAX Data 1 
 F4101JE ELAPRDDTAX Data 1 
 F41021JC ELAPRDDTAX Data 2 
 F43090JA ELAPRDDTAX Data 2 
 F4101LB JDFSRC73 Data 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 35 – 
 
 
 
 
DSPFD 
 
Este comando mostra a descrição completa de um arquivo, como a biblioteca onde se encontra o 
fonte, o file, a data em que foi criada e por quem foi criado, o tipo de arquivo, número de campos 
que o formam, total de registros, e todos os atributos do arquivo, etc. 
 
⇒ DSPFD F4101 ou 
⇒ DSPFD 
 <F4> o ENTER 
 
 
 
 
 
 
 
 
 
 
Nos mostra esta tela donde escrevemos o nome do fonte a buscar e a biblioteca onde se 
encontra. 
Esta é parte do que nos mostra o DSPFD 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 Display File Description (DSPFD) 
 
 Type choices, press Enter. 
 
 File . . . . . . . . . . . . . . F4101 Name, generic*, *ALL 
 Library . . . . . . . . . . . *LIBL Name, *LIBL, *CURLIB... 
 Type of information . . . . . . *ALL *ALL, *BASATR, *ATR... 
 + for more values ___ 
 Output . . . . . . . . . . . . . * *, *PRINT, *OUTFILE 
 File attributes . . . . . . . . *ALL *ALL, *DSPF, *PRTF, *DKTF... 
 + for more values 
 
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+... 
 1/15/99 Display File Description 
 DSPFD Command Input 
 File . . . . . . . . . . . . . . . . . . . : FILE F4101 
 Library . . . . . . . . . . . . . . . . . : *LIBL 
 Type of information . . . . . . . . . . . . : TYPE *ALL 
 File attributes . . . . . . . . . . . . . . : FILEATR *ALL 
 System . . . . . . . . . . . . . . . . . . : SYSTEM *LCL 
 File Description Header 
 File . . . . . . . . . . . . . . . . . . . : FILE F4101 
 Library . . . . . . . . . . . . . . . . . . : ELAPRDDTAX 
 Type of file . . . . . . . . . . . . . . . : Physical 
 File type . . . . . . . . . . . . . . . . . : FILETYPE *DATA 
 Auxiliary storage pool ID . . . . . . . . . : 01 
 Data Base File Attributes 
 Externally described file . . . . . . . . . : Yes 
 File level identifier . . . . . . . . . . . : 0980401202049 
 reation date . . . . . . . . . . . . . . . : 04/01/98 
 Text 'description' . . . . . . . . . . . . : TEXT Item Master 
 Distributed file . . . . . . . . . . . . . : No 
 DBCS capable . . . . . . . . . . . . . . . : No 
 Maximum members . . . . . . . . . . . . . . : MAXMBRS *NOMAX 
 Number of constraints . . . . . . . . . . . : 0 
 Number of triggers . . . . . . . . . . . . : 0 
 Number of members . . . . . . . . . . . . . : 1 
 Member size . . . . . . . . . . . . . . . . : SIZE *NOMAX 
 Allocate storage . . . . . . . . . . . . . : ALLOCATE *NO 
 Contiguous storage . . . . . . . . . . . . : CONTIG *NO 
 Preferred storage unit . . . . . . . . . . : UNIT *ANY 
 Records to force a write . . . . . . . . . : FRCRATIO *NONE 
 Maximum file wait time . . . . . . . . . . : WAITFILE *IMMED 
 Maximum record wait time . . . . . . . . . : WAITRCD 10 
 Max % deleted records allowed . . . . . . . : DLTPCT *NONE 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 36 – 
 
DSPFFD 
 
Este comando nos serve para ver todos os campos e as características de cada um dos campos que 
formam o arquivo. 
⇒ DSPFFD F4101 
ou 
⇒ DSPFFD 
com <F4> ou enter nos leva a seguinte tela onde damos o nome do arquivo e a biblioteca 
donde se encontra 
 
 
 
 
 
 
 
 
DDSSPPOOBBJJDD 
 
Mostra a descrição de um objeto, nos mostra as caracteristicas completas de um objeto, em que 
biblioteca e file se encontra, quando foi criado e por quem, qual é o fonte deste objeto e donde se 
encontra, em que data foi criado e quando foi a ultima data de alteração, etc. 
⇒ DSPOBJD P4190 
ou 
⇒ DSPOBJD 
ou pressionar <F4> o ENTER 
 
 
 
 
 
 
 
 
 
Mostra a mesma tela só que agora para buscar o objeto, damos o nome e a biblioteca donde se 
encontra, se não sabemos o nome de a biblioteca com *libl o toma da biblioteca donde o 
encontre primero, tem que especificar o tipo de objeto a buscar 
 
 
 
 
 Display File Field Description (DSPFFD) 
 
 Type choices, press Enter. 
 
 File . . . . . . . . . . . . . . f4101 Name, generic*, *ALL 
 Library . . . . . . . . . . . *LIBL Name, *LIBL, *CURLIB... 
 Output . . . . . . . . . . . . . * *, *PRINT, *OUTFILE 
 Display Object Description (DSPOBJD) 
 
 Type choices, press Enter. 
 
 Object . . . . . . . . . . . . . P4190 Name, generic*, *ALLUSR... 
 Library . . . . . . . . . . . *LIBL Name, *LIBL, *USRLIBL... 
 Object type . . . . . . . . . . *pgm *ALL, *ALRTBL, *AUTL... 
 + for more values __ 
 Detail . . . . . . . . . . . . . *BASIC *BASIC, *FULL, *SERVICE 
 Output . . . . . . . . . . . . . * *, *PRINT, *OUTFILE 
 
PDF created with pdfFactory trial version www.pdffactory.com
http://www.pdffactory.com
AS/400 Users Group AS/400 BÁSICO por Paulo Rocha 
 
 
- 37 – 
 
 
 
 
WRKOBJ 
Trabalhando com objetos, com este comando podemos manejar os objetos, nos mostra a