//*********************************************************************//*INTES EXECUTADOS PELO SORT1 - ORDENACAO DE REGISTRO DE UM ARQUIVO EM UMA DETERMINADA SEQUENCIA (SORT)2 - COMBINACAO DE REGISTRO DE ATE 32 ARQUIVOS JA ORDENADOS EM UMA DETERMINADA SEQUENCIA (MERGE)3 - COPIA DE TODOS OS REGISTROS4 - COPIA DE PARTE DE PARTE DE REGISTROS (SELECAO DE REGISTROS)5 - COPIA DE REGISTROS PARCIAIS (SELECAO DE CAMPOS)6 - CONVERSAO DE CAMPOS E FORMATO DE IMPRESSAO7 - ELIMINACAO DE REGISTROS COM CHAVES IGUAIS (SUMARIZACAO)8 - TOTALIZACAO DE CAMPOS NUMERICOS9 - IMPRESSAO DOS REGISTROS EM RELATORIOS 10 TOTALIZACAO DE CAMPOS NUMERICOS11 - SAIDAS - OUTFIL - SAIDA 1 SELECAO DE REGISTRO (INCLUDE/OMIT) REFORMATACAO DA SAIDA (OUTREC) - SAIDA N SELECAO DE REGISTRO (INCLUDE/OMIT) REFORMATACAO DA SAIDA (OUTREC)COMANDO FUNCAO--------------- --------------------------------------------------------------------------------------------INCLUDE DETERMINA O CRITERIO DE SELECAO DOS REGISTROS LIDOS.OMIT DETERMINA O CRITERIO DE NAO SELECAO DOS REGISTROS LIDOS.INREC REFORMATA O REGISTRO LIDO, DE MODO A PERMITIR A SELECAO DOS CAMPOS, ANTES DO PROCESSAMENTO DO SORT/MERGE/COPIA SORT DETERMINA A SEQUENCIA DE ORDENACAO DOS REGISTROS DO ARQUIVO DE SAIDA OU A COPIA DOS REGISTROS EM SUA ORDENACAO ORIGINALMERGE DETERMINA A SEQUENCIA DE CONCATENACAO DOS REGISTROS DOS ARQUIVOS DE ENTRADA OU A SUA COPIA NA SEQUENCIA ORIGINALSUM DETERMINA A ELIMINACAO DE REGISTROS COM CHAVE IGUAIS E AS TOTALIZACOES DE CAMPOS NUMERICOS.SUM DETERMINA A ELIMINACAO DE REGISTROS COM CHAVES IGUAIS E AS TOTALIZACOES DE CAMPOS NUMERICOS.RECORD INFORMA PARTICULARIDADE SOBRE OS REGISTROSOUTFIL DESCREVE OS ARQUIVOS DE SAIDA, INCLUSIVE RELATORIOS.END INDICA O TERMINO DOS COMANDOS DE CONTROLE.// EXEC SORTE//SYSIN DD *//SORTWK DD AREAS DE TRABALHO (OPCIONAL)//SORTIN DD DSN=ARQUIVO DE ENTRADA(SORT/MERGE)//SORTIN DD DSN=ARQUIVOS DE ENTRADA (MERGE/COPIA)//SORTOUT DD DSN=ARQUIVO DE SAIDA//SORTOF DD DSN=ARQUIVO DE SAIDA(MULTIPLAS SAIDAS)REGRAS PARA CODIFICACAO DOS COMANDOS DE CONTROLE E DE COMENTARIOS- PODEM SER COLOCADOS EM QUALQUER ORDEM, EXCETO O COANDO "END", QUE DEVE SER O ULTIMO COMANDO.- CODIFICAR ENTRE AS COLUNAS 02 E 71, INCLUSIVE- A CONTINUACAO DE COMANDOS PODE SER FEITA COMO NOS EXEMPLOSSORT FIELDS=(1,10,A,20,5,A,45,7,A,32,2,D, ... ... ,153,14,D), FORMAT=CH,EQUALSSORT FIELDS=(1,10,A,20,5,A,45,7,A,32,2,D, ... ...153,14,D), FORMAX (NA COLUNA 71) AT=CH,EQUALS ! !-------------> CONTINUAR NA COLUNA 16COMENTARIOS----------------------- LINHAS DE COMENTARIOS DEVEM TER "*" NA COLUNA 1- COMENTARIOS PODEM SER INSERIDOS APOS O ULTIMO PARAMETRO OU VIRGULA- COMENTARIOS DEVE SER ANTECEDIDO DE PELO MENOS 1 ESPACO FORMATOS: BI - BINARIO, SEM SINAL HE O MAIS INDICADO, OTIMIZA TEMPO. CH - CARATER EBCDIC, SEM SINAL PD - COMPACTADO DECIMAL (FIXED), COM SINAL AQ - CARATER EBCDIC, COM SEQUENCIA MODIFICADA.OS FORMATOS PERMITIDOS E RESPECTIVOS CODIGOS (FF) SAO:CODIGO FORMATO----------- ----------------------------------------------BI BINARIOZO NUMERICO ZONADOFI NUMERICO PONTO FIXOCH CARACTERPD NUMERICO COMPACTADO- O ENESIMO BYUTE DE UM REGISTRO DE TAMANHO FIXO TEM P=N- O ENESIMO BYTE DE UM REGISTO DE TAMANHO VARIAVEL TEM P=N+4- O BYTES 1 A 4 DE UM REGISTRO DE TAMANHO VARIAVEL SAO RESERVADOS PARA - O "RECORD DESCRIPTOR WORD=ROW" OS 8 BITS DE UM BYTE SAO NUMERODS DE 0 A 7, PORTANTO P=7.4 SIGNIFICA QUEO - CAMPO INCIA NO QUINTO (5o) BIT DO (7o) BYTE.- O MESMO VALE PARA TAMANHJO (t), PORTANTO T=7,4 SIGNIFICA UM CAMPO DE 7 BYTES E 4 BITS- QUANDO TODOS OS CAMPOS ESPECIFICADOS POSSUEM O MESMO FORMATO, DEVE SER USADO O SUBPARAMETRO "FORMAT=FF" RELACAO DAS 'MASCARAS DE EDICAO PADRAO'CODIGO FORMATO------ ------------------------MO III...IITSM1 TTT...TTTSM2