@echo off REM 1 2 3 4 5 6 7 8 REM 5678901234567890123456789012345678901234567890123456789012345678901234567890 REM *************************************************************************** REM * REM * Procedimento de geracao de estatistica de base de dados CDS/ISIS REM * REM *************************************************************************** REM chamada: DBSTAT BASE_IN CONJ_CH REM parm1: BASE_IN - Base de dados CDS/ISIS a ser analisada REM parm2: CONJ_CH - Conjunto de caracteres empregado na base de dados REM pode valer: ASC ASCII ANSI NONE REM ASC e ASCII implicam no uso de ASCII Code Page 850 REM ANSI implica no uso do proprio ANSI (Windows) REM NONE empregado na omissao do parametro nao gera REM a porcao estatistica dos caracteres REM REM Entrada: Base de dados a ser analisada REM Saida: Arquivo texto com o nome da base de dados informada e extensao STA REM REM OBSERVACOES: 1- Eh Esperado que o CISIS esteja no PATH da maquina REM 2- Eh assumido que nao haja restricao ao uso dos arquivos: REM STAT.XRF; STAT.MST; 1.PFT REM REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 REM echo * DBSTAT - Analise estatistica de Base de Dados CDS/ISIS versao: 1.1 rel 00 echo * QAPLA Servicos de Informatica S/C Ltda.-ME (C)2002-2003 qapla@qapla.com.br echo * http://www.qapla.com.br CNPJ: 05.129.080/0001-01 CCM: 3.142.105-9 echo * if not ~%1==%1~ goto :proceg REM Emite mensagem de erro echo * utilize: DBSTAT BASE_IN CONJ_CH echo * BASE_IN base de dados a analisar echo * CONJ_CH conjunto de caracteres empregado na base echo * NONE / ASC / ASCII / ANSI / FLAT echo * goto :coda :proceg REM *************************************************************************** REM * Verifica se a base dados ISIS existe REM *************************************************************************** if not exist %1.xrf echo * Base nao encontrada if not exist %1.xrf goto :coda if not exist %1.mst echo * Base nao encontrada if not exist %1.mst goto :coda REM *************************************************************************** REM * Gera base de dados com a estatistica REM *************************************************************************** x\mxf0 %1 create=stat 0 noedit REM ------------------------------------------------------------------- # REM ------------------------------------------------------------------- # REM Verifica se esta em um Windows NT/Y2K/XP REM ------------------------------------------------------------------- # REM ------------------------------------------------------------------- # if %OS%~==~ goto :W9X if %OS%==Windows_NT goto :WNT :W9X REM *************************************************************************** REM * Gera formato de distribuicao de TAG REM *************************************************************************** REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Etiquetas - ADE',/,>>1.pft echo '-----------------------------------------------------------------------------',/#,>>1.pft echo if p(v1001) then>>1.pft echo " Nome da Base : "v1001>>1.pft echo fi,>>1.pft echo if p(v1003) then>>1.pft echo c35,>>1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>>1.pft echo fi,/,>>1.pft echo ' Total de regs : 'v1009,/#,>>1.pft echo '-----------------------------------------------------------------------------',/,>>1.pft echo ' TAG Presenca Percent Ocorr. Rep Tamanho Total',/,>>1.pft echo ' numero (abs) (%%) (abs) (R) min max Carac.',/,>>1.pft echo '---------------------------------------------------------------'/#>>1.pft echo (>>1.pft echo c03,>>1.pft echo f(val(v1020^t),4,0),>>1.pft echo c9,>>1.pft echo f(val(v1020^d),7,0),>>1.pft echo c19,>> 1.pft echo f(100*val(v1020^d)/val(v1009[1]),5,1),>> 1.pft echo c26,>> 1.pft echo f(val(v1020^o),7,0),>> 1.pft echo c36,>> 1.pft echo select val(v1020^o)/val(v1020^d)>> 1.pft echo case 1: ' '>> 1.pft echo elsecase 'R '>> 1.pft echo endsel,>> 1.pft echo c39,>> 1.pft echo f(val(v1020^l),5,0),>> 1.pft echo c46,>> 1.pft echo f(val(v1020^u),5,0),>> 1.pft echo c53,>> 1.pft echo f(val(v1020^n),10,0),/>> 1.pft echo )/#>> 1.pft REM *************************************************************************** REM Gera o relatorio estatistico de campos da Base de Dados REM *************************************************************************** x\mx stat pft=@1.pft -all now> %1.sta REM *************************************************************************** REM * Verifica tratamento a ser dispensado aos caracteres da base de dados REM *************************************************************************** if ~%2==%2~ goto :coda if %2==NONE goto :coda if %2==None goto :coda if %2==none goto :coda echo >> %1.sta REM *************************************************************************** REM * Define conjunto de caracteres para analise REM *************************************************************************** if %2==FLAT goto :FLAT if %2==Flat goto :FLAT if %2==flat goto :FLAT if %2==ANSI goto :ANSI if %2==ansi goto :ANSI if %2==ASCII goto :ASCII if %2==ascii goto :ASCII if %2==ASC2 goto :ASCII if %2==asc2 goto :ASCII if %2==ASC goto :ASCII if %2==asc goto :ASCII :FLAT REM Conjunto de caracteres generico REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres - ADC',/,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo 'Carac Ocorr.',/,>>1.pft echo 'HEX',/,>>1.pft echo '------------------ ',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^x,>>1.pft echo c8,>>1.pft echo f(val(v1030^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :ANSI REM Conjunto de caracteres ANSI (WINDOWS) REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres ANSI - ADC-ANSI',/,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo ' Carac Ocorrencias',/,>>1.pft echo 'HEX DEC',/,>>1.pft echo '-------------------------------------',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^x,>>1.pft echo select v1030^x>>1.pft REM 123456789012345678 echo case '00': ' 00 NUL'>>1.pft echo case '01': ' 01 SOH'>>1.pft echo case '02': ' 02 STX'>>1.pft echo case '03': ' 03 ETX'>>1.pft echo case '04': ' 04 EOT'>>1.pft echo case '05': ' 05 ENQ'>>1.pft echo case '06': ' 06 ACK'>>1.pft echo case '07': ' 07 BEL'>>1.pft echo case '08': ' 08 BS'>>1.pft echo case '09': ' 09 HT'>>1.pft echo case '0a': ' 10 LF'>>1.pft echo case '0b': ' 11 VT'>>1.pft echo case '0c': ' 12 FF'>>1.pft echo case '0d': ' 13 CR'>>1.pft echo case '0e': ' 14 SO'>>1.pft echo case '0f': ' 15 SI'>>1.pft echo case '10': ' 16 DLE'>>1.pft echo case '11': ' 17 DC1'>>1.pft echo case '12': ' 18 DC2'>>1.pft echo case '13': ' 19 DC3'>>1.pft echo case '14': ' 20 DC4'>>1.pft REM 123456789012345678 echo case '15': ' 21 NAK'>>1.pft echo case '16': ' 22 SYN'>>1.pft echo case '17': ' 23 ETB'>>1.pft echo case '18': ' 24 CAN'>>1.pft echo case '19': ' 25 EM'>>1.pft echo case '1a': ' 26 SUB'>>1.pft echo case '1b': ' 27 ESCAPE'>>1.pft echo case '1c': ' 28 FS'>>1.pft echo case '1d': ' 29 GS'>>1.pft echo case '1e': ' 30 RS'>>1.pft echo case '1f': ' 31 US'>>1.pft echo case '20': ' 32 SPACE'>>1.pft echo case '21': ' 33 !'>>1.pft echo case '22': ' 34 ASPAS'>>1.pft echo case '23': ' 35 #'>>1.pft echo case '24': ' 36 $'>>1.pft echo case '25': ' 37 PERCENT'>>1.pft echo case '26': ' 38 e cml'>>1.pft echo case '27': ' 39 apostrofe'>>1.pft echo case '28': ' 40 ('>>1.pft echo case '29': ' 41 )'>>1.pft REM 123456789012345678 echo case '2a': ' 42 *'>>1.pft echo case '2b': ' 43 +'>>1.pft echo case '2c': ' 44 ,'>>1.pft echo case '2d': ' 45 -'>>1.pft echo case '2e': ' 46 .'>>1.pft echo case '2f': ' 47 /'>>1.pft echo case '30': ' 48 num. 0'>>1.pft echo case '31': ' 49 num. 1'>>1.pft echo case '32': ' 50 num. 2'>>1.pft echo case '33': ' 51 num. 3'>>1.pft echo case '34': ' 52 num. 4'>>1.pft echo case '35': ' 53 num. 5'>>1.pft echo case '36': ' 54 num. 6'>>1.pft echo case '37': ' 55 num. 7'>>1.pft echo case '38': ' 56 num. 8'>>1.pft echo case '39': ' 57 num. 9'>>1.pft echo case '3a': ' 58 :'>>1.pft echo case '3b': ' 59 ;'>>1.pft echo case '3c': ' 60 menor'>>1.pft echo case '3d': ' 61 ='>>1.pft echo case '3e': ' 62 maior'>>1.pft REM 123456789012345678 echo case '3f': ' 63 ?'>>1.pft echo case '40': ' 64 @'>>1.pft echo case '41': ' 65 A'>>1.pft echo case '42': ' 66 B'>>1.pft echo case '43': ' 67 C'>>1.pft echo case '44': ' 68 D'>>1.pft echo case '45': ' 69 E'>>1.pft echo case '46': ' 70 F'>>1.pft echo case '47': ' 71 G'>>1.pft echo case '48': ' 72 H'>>1.pft echo case '49': ' 73 I'>>1.pft echo case '4a': ' 74 J'>>1.pft echo case '4b': ' 75 K'>>1.pft echo case '4c': ' 76 L'>>1.pft echo case '4d': ' 77 M'>>1.pft echo case '4e': ' 78 N'>>1.pft echo case '4f': ' 79 O'>>1.pft echo case '50': ' 80 P'>>1.pft echo case '51': ' 81 Q'>>1.pft echo case '52': ' 82 R'>>1.pft echo case '53': ' 83 S'>>1.pft REM 123456789012345678 echo case '54': ' 84 T'>>1.pft echo case '55': ' 85 U'>>1.pft echo case '56': ' 86 V'>>1.pft echo case '57': ' 87 W'>>1.pft echo case '58': ' 88 X'>>1.pft echo case '59': ' 89 Y'>>1.pft echo case '5a': ' 90 Z'>>1.pft echo case '5b': ' 91 ['>>1.pft echo case '5c': ' 92 \'>>1.pft echo case '5d': ' 93 ]'>>1.pft echo case '5e': ' 94 Circunf'>>1.pft echo case '5f': ' 95 _'>>1.pft echo case '60': ' 96 agudo'>>1.pft echo case '61': ' 97 a'>>1.pft echo case '62': ' 98 b'>>1.pft echo case '63': ' 99 c'>>1.pft echo case '64': ' 100 d'>>1.pft echo case '65': ' 101 e'>>1.pft echo case '66': ' 102 f'>>1.pft echo case '67': ' 103 g'>>1.pft echo case '68': ' 104 h'>>1.pft REM 123456789012345678 echo case '69': ' 105 i'>>1.pft echo case '6a': ' 106 j'>>1.pft echo case '6b': ' 107 k'>>1.pft echo case '6c': ' 108 l'>>1.pft echo case '6d': ' 109 m'>>1.pft echo case '6e': ' 110 n'>>1.pft echo case '6f': ' 111 o'>>1.pft echo case '70': ' 112 p'>>1.pft echo case '71': ' 113 q'>>1.pft echo case '72': ' 114 r'>>1.pft echo case '73': ' 115 s'>>1.pft echo case '74': ' 116 t'>>1.pft echo case '75': ' 117 u'>>1.pft echo case '76': ' 118 v'>>1.pft echo case '77': ' 119 w'>>1.pft echo case '78': ' 120 x'>>1.pft echo case '79': ' 121 y'>>1.pft echo case '7a': ' 122 z'>>1.pft echo case '7b': ' 123 {'>>1.pft echo case '7c': ' 124 pipe'>>1.pft echo case '7d': ' 125 }'>>1.pft REM 123456789012345678 echo case '7e': ' 126 til'>>1.pft echo case '7f': ' 127 DELETE'>>1.pft echo case '80': ' 128'>>1.pft echo case '81': ' 129'>>1.pft echo case '82': ' 130'>>1.pft echo case '83': ' 131'>>1.pft echo case '84': ' 132'>>1.pft echo case '85': ' 133'>>1.pft echo case '86': ' 134'>>1.pft echo case '87': ' 135'>>1.pft echo case '88': ' 136'>>1.pft echo case '89': ' 137'>>1.pft echo case '8a': ' 138'>>1.pft echo case '8b': ' 139'>>1.pft echo case '8c': ' 140'>>1.pft echo case '8d': ' 141'>>1.pft echo case '8e': ' 142'>>1.pft echo case '8f': ' 143'>>1.pft echo case '90': ' 144'>>1.pft echo case '91': ' 145'>>1.pft echo case '92': ' 146'>>1.pft REM 123456789012345678 echo case '93': ' 147'>>1.pft echo case '94': ' 148'>>1.pft echo case '95': ' 149'>>1.pft echo case '96': ' 150'>>1.pft echo case '97': ' 151'>>1.pft echo case '98': ' 152'>>1.pft echo case '99': ' 153'>>1.pft echo case '9a': ' 154'>>1.pft echo case '9b': ' 155'>>1.pft echo case '9c': ' 156'>>1.pft echo case '9d': ' 157'>>1.pft echo case '9e': ' 158'>>1.pft echo case '9f': ' 159'>>1.pft echo case 'a0': ' 160'>>1.pft echo case 'a1': ' 161'>>1.pft echo case 'a2': ' 162'>>1.pft echo case 'a3': ' 163'>>1.pft echo case 'a4': ' 164'>>1.pft echo case 'a5': ' 165'>>1.pft echo case 'a6': ' 166'>>1.pft echo case 'a7': ' 167'>>1.pft REM 123456789012345678 echo case 'a8': ' 168'>>1.pft echo case 'a9': ' 169'>>1.pft echo case 'aa': ' 170'>>1.pft echo case 'ab': ' 171'>>1.pft echo case 'ac': ' 172'>>1.pft echo case 'ad': ' 173'>>1.pft echo case 'ae': ' 174'>>1.pft echo case 'af': ' 175'>>1.pft echo case 'b0': ' 176'>>1.pft echo case 'b1': ' 177'>>1.pft echo case 'b2': ' 178'>>1.pft echo case 'b3': ' 179'>>1.pft echo case 'b4': ' 180'>>1.pft echo case 'b5': ' 181'>>1.pft echo case 'b6': ' 182'>>1.pft echo case 'b7': ' 183'>>1.pft echo case 'b8': ' 184'>>1.pft echo case 'b9': ' 185'>>1.pft echo case 'ba': ' 186'>>1.pft echo case 'bb': ' 187'>>1.pft echo case 'bc': ' 188'>>1.pft REM 123456789012345678 echo case 'bd': ' 189'>>1.pft echo case 'be': ' 190'>>1.pft echo case 'bf': ' 191'>>1.pft echo case 'c0': ' 192 A grave'>>1.pft echo case 'c1': ' 193 A agudo'>>1.pft echo case 'c2': ' 194 A circunflexo'>>1.pft echo case 'c3': ' 195 A til'>>1.pft echo case 'c4': ' 196 A trema'>>1.pft echo case 'c5': ' 197'>>1.pft echo case 'c6': ' 198'>>1.pft echo case 'c7': ' 199 C cedilha'>>1.pft echo case 'c8': ' 200 E grave'>>1.pft echo case 'c9': ' 201 E agudo'>>1.pft echo case 'ca': ' 202 E circunflexo'>>1.pft echo case 'cb': ' 203 E trema'>>1.pft echo case 'cc': ' 204 I grave'>>1.pft echo case 'cd': ' 205 I agudo'>>1.pft echo case 'ce': ' 206 I circunflexo'>>1.pft echo case 'cf': ' 207 I trema'>>1.pft echo case 'd0': ' 208'>>1.pft echo case 'd1': ' 209 N til'>>1.pft REM 123456789012345678 echo case 'd2': ' 210 O grave'>>1.pft echo case 'd3': ' 211 O agudo'>>1.pft echo case 'd4': ' 212 O circunflexo'>>1.pft echo case 'd5': ' 213 O til'>>1.pft echo case 'd6': ' 214 O trema'>>1.pft echo case 'd7': ' 215'>>1.pft echo case 'd8': ' 216'>>1.pft echo case 'd9': ' 217 U grave'>>1.pft echo case 'da': ' 218 U agudo'>>1.pft echo case 'db': ' 219 U circunflexo'>>1.pft echo case 'dc': ' 220 U trema'>>1.pft echo case 'dd': ' 221'>>1.pft echo case 'de': ' 222'>>1.pft echo case 'df': ' 223'>>1.pft echo case 'e0': ' 224 a grave'>>1.pft echo case 'e1': ' 225 a agudo'>>1.pft echo case 'e2': ' 226 a circunflexo'>>1.pft echo case 'e3': ' 227 a til'>>1.pft echo case 'e4': ' 228 a trema'>>1.pft echo case 'e5': ' 229'>>1.pft echo case 'e6': ' 230'>>1.pft REM 123456789012345678 echo case 'e7': ' 231 c cedilha'>>1.pft echo case 'e8': ' 232 e grave'>>1.pft echo case 'e9': ' 233 e agudo'>>1.pft echo case 'ea': ' 234 e circunflexo'>>1.pft echo case 'eb': ' 235 e trema'>>1.pft echo case 'ec': ' 236 i grave'>>1.pft echo case 'ed': ' 237 i agudo'>>1.pft echo case 'ee': ' 238 i circunflexo'>>1.pft echo case 'ef': ' 239 i trema'>>1.pft echo case 'f0': ' 240'>>1.pft echo case 'f1': ' 241 n til'>>1.pft echo case 'f2': ' 242 o grave'>>1.pft echo case 'f3': ' 243 o agudo'>>1.pft echo case 'f4': ' 244 o circunflexo'>>1.pft echo case 'f5': ' 245 o til'>>1.pft echo case 'f6': ' 246 o trema'>>1.pft echo case 'f7': ' 247'>>1.pft echo case 'f8': ' 248'>>1.pft echo case 'f9': ' 249 u grave'>>1.pft echo case 'fa': ' 250 u agudo'>>1.pft echo case 'fb': ' 251 u circunflexo'>>1.pft REM 123456789012345678 echo case 'fc': ' 252 u trema'>>1.pft echo case 'fd': ' 253'>>1.pft echo case 'fe': ' 254'>>1.pft echo case 'ff': ' 255'>>1.pft echo endsel,>>1.pft echo c27,>>1.pft echo f(val(v1030^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :ASCII REM Conjunto de caracteres ASCII REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres ASCII - ADC-ASCII',/,>> 1.pft echo '------------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '------------------------------------------------------------------------------',/#,>> 1.pft echo ' Carac Ocorrencias',/,>>1.pft echo 'HEX DEC',/,>>1.pft echo '-------------------------------------',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^x,>>1.pft echo select v1030^x>>1.pft REM 123456789012345678 echo case '00': ' 00 NUL'>>1.pft echo case '01': ' 01 SOH'>>1.pft echo case '02': ' 02 STX'>>1.pft echo case '03': ' 03 ETX'>>1.pft echo case '04': ' 04 EOT'>>1.pft echo case '05': ' 05 ENQ'>>1.pft echo case '06': ' 06 ACK'>>1.pft echo case '07': ' 07 BEL'>>1.pft echo case '08': ' 08 BS'>>1.pft echo case '09': ' 09 HT'>>1.pft echo case '0a': ' 10 LF'>>1.pft echo case '0b': ' 11 VT'>>1.pft echo case '0c': ' 12 FF'>>1.pft echo case '0d': ' 13 CR'>>1.pft echo case '0e': ' 14 SO'>>1.pft echo case '0f': ' 15 SI'>>1.pft echo case '10': ' 16 DLE'>>1.pft echo case '11': ' 17 DC1'>>1.pft echo case '12': ' 18 DC2'>>1.pft echo case '13': ' 19 DC3'>>1.pft echo case '14': ' 20 DC4'>>1.pft REM 123456789012345678 echo case '15': ' 21 NAK'>>1.pft echo case '16': ' 22 SYN'>>1.pft echo case '17': ' 23 ETB'>>1.pft echo case '18': ' 24 CAN'>>1.pft echo case '19': ' 25 EM'>>1.pft echo case '1a': ' 26 SUB'>>1.pft echo case '1b': ' 27 ESCAPE'>>1.pft echo case '1c': ' 28 FS'>>1.pft echo case '1d': ' 29 GS'>>1.pft echo case '1e': ' 30 RS'>>1.pft echo case '1f': ' 31 US'>>1.pft echo case '20': ' 32 SPACE'>>1.pft echo case '21': ' 33 !'>>1.pft echo case '22': ' 34 ASPAS'>>1.pft echo case '23': ' 35 #'>>1.pft echo case '24': ' 36 $'>>1.pft echo case '25': ' 37 Percent'>>1.pft echo case '26': ' 38 e cml'>>1.pft echo case '27': ' 39 apostrofe'>>1.pft echo case '28': ' 40 ('>>1.pft echo case '29': ' 41 )'>>1.pft REM 123456789012345678 echo case '2a': ' 42 *'>>1.pft echo case '2b': ' 43 +'>>1.pft echo case '2c': ' 44 ,'>>1.pft echo case '2d': ' 45 -'>>1.pft echo case '2e': ' 46 .'>>1.pft echo case '2f': ' 47 /'>>1.pft echo case '30': ' 48 num. 0'>>1.pft echo case '31': ' 49 num. 1'>>1.pft echo case '32': ' 50 num. 2'>>1.pft echo case '33': ' 51 num. 3'>>1.pft echo case '34': ' 52 num. 4'>>1.pft echo case '35': ' 53 num. 5'>>1.pft echo case '36': ' 54 num. 6'>>1.pft echo case '37': ' 55 num. 7'>>1.pft echo case '38': ' 56 num. 8'>>1.pft echo case '39': ' 57 num. 9'>>1.pft echo case '3a': ' 58 :'>>1.pft echo case '3b': ' 59 ;'>>1.pft echo case '3c': ' 60 menor'>>1.pft echo case '3d': ' 61 ='>>1.pft echo case '3e': ' 62 maior'>>1.pft REM 123456789012345678 echo case '3f': ' 63 ?'>>1.pft echo case '40': ' 64 @'>>1.pft echo case '41': ' 65 A'>>1.pft echo case '42': ' 66 B'>>1.pft echo case '43': ' 67 C'>>1.pft echo case '44': ' 68 D'>>1.pft echo case '45': ' 69 E'>>1.pft echo case '46': ' 70 F'>>1.pft echo case '47': ' 71 G'>>1.pft echo case '48': ' 72 H'>>1.pft echo case '49': ' 73 I'>>1.pft echo case '4a': ' 74 J'>>1.pft echo case '4b': ' 75 K'>>1.pft echo case '4c': ' 76 L'>>1.pft echo case '4d': ' 77 M'>>1.pft echo case '4e': ' 78 N'>>1.pft echo case '4f': ' 79 O'>>1.pft echo case '50': ' 80 P'>>1.pft echo case '51': ' 81 Q'>>1.pft echo case '52': ' 82 R'>>1.pft echo case '53': ' 83 S'>>1.pft REM 123456789012345678 echo case '54': ' 84 T'>>1.pft echo case '55': ' 85 U'>>1.pft echo case '56': ' 86 V'>>1.pft echo case '57': ' 87 W'>>1.pft echo case '58': ' 88 X'>>1.pft echo case '59': ' 89 Y'>>1.pft echo case '5a': ' 90 Z'>>1.pft echo case '5b': ' 91 ['>>1.pft echo case '5c': ' 92 \'>>1.pft echo case '5d': ' 93 ]'>>1.pft echo case '5e': ' 94 Circunf'>>1.pft echo case '5f': ' 95 _'>>1.pft echo case '60': ' 96 agudo'>>1.pft echo case '61': ' 97 a'>>1.pft echo case '62': ' 98 b'>>1.pft echo case '63': ' 99 c'>>1.pft echo case '64': ' 100 d'>>1.pft echo case '65': ' 101 e'>>1.pft echo case '66': ' 102 f'>>1.pft echo case '67': ' 103 g'>>1.pft echo case '68': ' 104 h'>>1.pft REM 123456789012345678 echo case '69': ' 105 i'>>1.pft echo case '6a': ' 106 j'>>1.pft echo case '6b': ' 107 k'>>1.pft echo case '6c': ' 108 l'>>1.pft echo case '6d': ' 109 m'>>1.pft echo case '6e': ' 110 n'>>1.pft echo case '6f': ' 111 o'>>1.pft echo case '70': ' 112 p'>>1.pft echo case '71': ' 113 q'>>1.pft echo case '72': ' 114 r'>>1.pft echo case '73': ' 115 s'>>1.pft echo case '74': ' 116 t'>>1.pft echo case '75': ' 117 u'>>1.pft echo case '76': ' 118 v'>>1.pft echo case '77': ' 119 w'>>1.pft echo case '78': ' 120 x'>>1.pft echo case '79': ' 121 y'>>1.pft echo case '7a': ' 122 z'>>1.pft echo case '7b': ' 123 {'>>1.pft echo case '7c': ' 124 pipe'>>1.pft echo case '7d': ' 125 }'>>1.pft REM 123456789012345678 echo case '7e': ' 126 til'>>1.pft echo case '7f': ' 127 DELETE'>>1.pft echo case '80': ' 128 C cedilha'>>1.pft echo case '81': ' 129 u trema'>>1.pft echo case '82': ' 130 e agudo'>>1.pft echo case '83': ' 131 a circunflexo'>>1.pft echo case '84': ' 132 a trema'>>1.pft echo case '85': ' 133 a grave'>>1.pft echo case '86': ' 134 a bola'>>1.pft echo case '87': ' 135 c cedilha'>>1.pft echo case '88': ' 136 e circunflexo'>>1.pft echo case '89': ' 137 e trema'>>1.pft echo case '8a': ' 138 e grave'>>1.pft echo case '8b': ' 139 i trema'>>1.pft echo case '8c': ' 140 i circunflexo'>>1.pft echo case '8d': ' 141 i grave'>>1.pft echo case '8e': ' 142 A trema'>>1.pft echo case '8f': ' 143 A bola'>>1.pft echo case '90': ' 144 E agudo'>>1.pft echo case '91': ' 145 ae'>>1.pft echo case '92': ' 146 AE'>>1.pft REM 123456789012345678 echo case '93': ' 147 o circunflexo'>>1.pft echo case '94': ' 148 o trema'>>1.pft echo case '95': ' 149 o grave'>>1.pft echo case '96': ' 150 u circunflexo'>>1.pft echo case '97': ' 151 u grave'>>1.pft echo case '98': ' 152 y trema'>>1.pft echo case '99': ' 153 O trema'>>1.pft echo case '9a': ' 154 U trema'>>1.pft echo case '9b': ' 155 fi'>>1.pft echo case '9c': ' 156 Libra'>>1.pft echo case '9d': ' 157 FI'>>1.pft echo case '9e': ' 158 versus'>>1.pft echo case '9f': ' 159'>>1.pft echo case 'a0': ' 160 a agudo'>>1.pft echo case 'a1': ' 161 i agudo'>>1.pft echo case 'a2': ' 162 o agudo'>>1.pft echo case 'a3': ' 163 u agudo'>>1.pft echo case 'a4': ' 164 n til '>>1.pft echo case 'a5': ' 165 N til '>>1.pft echo case 'a6': ' 166 primeiro'>>1.pft echo case 'a7': ' 167 primeira'>>1.pft REM 123456789012345678 echo case 'a8': ' 168 ? espanhol'>>1.pft echo case 'a9': ' 169 registrada'>>1.pft echo case 'aa': ' 170'>>1.pft echo case 'ab': ' 171 meio'>>1.pft echo case 'ac': ' 172 1 quarto'>>1.pft echo case 'ad': ' 173 ! espanhol'>>1.pft echo case 'ae': ' 174 dup menor'>>1.pft echo case 'af': ' 175 dup maior'>>1.pft echo case 'b0': ' 176'>>1.pft echo case 'b1': ' 177'>>1.pft echo case 'b2': ' 178'>>1.pft echo case 'b3': ' 179'>>1.pft echo case 'b4': ' 180'>>1.pft echo case 'b5': ' 181 A agudo'>>1.pft echo case 'b6': ' 182 A circunflexo'>>1.pft echo case 'b7': ' 183 A grave'>>1.pft echo case 'b8': ' 184 copyright'>>1.pft echo case 'b9': ' 185'>>1.pft echo case 'ba': ' 186'>>1.pft echo case 'bb': ' 187'>>1.pft echo case 'bc': ' 188'>>1.pft REM 123456789012345678 echo case 'bd': ' 189 cents'>>1.pft echo case 'be': ' 190 Yene'>>1.pft echo case 'bf': ' 191'>>1.pft echo case 'c0': ' 192'>>1.pft echo case 'c1': ' 193'>>1.pft echo case 'c2': ' 194'>>1.pft echo case 'c3': ' 195'>>1.pft echo case 'c4': ' 196'>>1.pft echo case 'c5': ' 197'>>1.pft echo case 'c6': ' 198 a til'>>1.pft echo case 'c7': ' 199 A til'>>1.pft echo case 'c8': ' 200'>>1.pft echo case 'c9': ' 201'>>1.pft echo case 'ca': ' 202'>>1.pft echo case 'cb': ' 203'>>1.pft echo case 'cc': ' 204'>>1.pft echo case 'cd': ' 205'>>1.pft echo case 'ce': ' 206'>>1.pft echo case 'cf': ' 207'>>1.pft echo case 'd0': ' 208'>>1.pft echo case 'd1': ' 209'>>1.pft REM 123456789012345678 echo case 'd2': ' 210 E circunflexo'>>1.pft echo case 'd3': ' 211 E trema'>>1.pft echo case 'd4': ' 212 E grave'>>1.pft echo case 'd5': ' 213'>>1.pft echo case 'd6': ' 214 I agudo'>>1.pft echo case 'd7': ' 215 I circunflexo'>>1.pft echo case 'd8': ' 216 I trema'>>1.pft echo case 'd9': ' 217'>>1.pft echo case 'da': ' 218'>>1.pft echo case 'db': ' 219'>>1.pft echo case 'dc': ' 220'>>1.pft echo case 'dd': ' 221'>>1.pft echo case 'de': ' 222 I grave'>>1.pft echo case 'df': ' 223'>>1.pft echo case 'e0': ' 224 O agudo'>>1.pft echo case 'e1': ' 225'>>1.pft echo case 'e2': ' 226 O circunflexo'>>1.pft echo case 'e3': ' 227 O grave'>>1.pft echo case 'e4': ' 228 o til'>>1.pft echo case 'e5': ' 229 O til'>>1.pft echo case 'e6': ' 230 micro min'>>1.pft REM 123456789012345678 echo case 'e7': ' 231'>>1.pft echo case 'e8': ' 232'>>1.pft echo case 'e9': ' 233 U agudo'>>1.pft echo case 'ea': ' 234 U circunflexo'>>1.pft echo case 'eb': ' 235 U grave'>>1.pft echo case 'ec': ' 236 y agudo'>>1.pft echo case 'ed': ' 237 Y agudo'>>1.pft echo case 'ee': ' 238'>>1.pft echo case 'ef': ' 239 agudo'>>1.pft echo case 'f0': ' 240'>>1.pft echo case 'f1': ' 241 +/-'>>1.pft echo case 'f2': ' 242'>>1.pft echo case 'f3': ' 243 3 quartos'>>1.pft echo case 'f4': ' 244'>>1.pft echo case 'f5': ' 245 paragrafo'>>1.pft echo case 'f6': ' 246 dividir'>>1.pft echo case 'f7': ' 247'>>1.pft echo case 'f8': ' 248 grau'>>1.pft echo case 'f9': ' 249 trema'>>1.pft echo case 'fa': ' 250'>>1.pft echo case 'fb': ' 251'>>1.pft REM 123456789012345678 echo case 'fc': ' 252 ao cubo'>>1.pft echo case 'fd': ' 253 quadrado'>>1.pft echo case 'fe': ' 254'>>1.pft echo case 'ff': ' 255'>>1.pft echo endsel,>>1.pft echo c27>>1.pft echo f(val(v1030^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :WNT REM ------------------------------------------------------------------- # REM ------------------------------------------------------------------- # REM SEQUENCIA ESPECIFICA PARA O Windows NT/Y2K/XP REM ------------------------------------------------------------------- # REM ------------------------------------------------------------------- # REM *************************************************************************** REM * Gera formato de distribuicao de TAG REM *************************************************************************** REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Etiquetas - ADE',/,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '-----------------------------------------------------------------------------',/,>> 1.pft echo ' TAG Presenca Percent Ocorr. Rep Tamanho Total',/,>> 1.pft echo ' numero (abs) (%%) (abs) (R) min max Carac.',/,>> 1.pft echo '---------------------------------------------------------------'/#>> 1.pft echo (>> 1.pft echo c03,>> 1.pft echo f(val(v1020^^t),4,0),>> 1.pft echo c9,>> 1.pft echo f(val(v1020^^d),7,0),>> 1.pft echo c19,>> 1.pft echo f(100*val(v1020^^d)/val(v1009[1]),5,1),>> 1.pft echo c26,>> 1.pft echo f(val(v1020^^o),7,0),>> 1.pft echo c36,>> 1.pft echo select val(v1020^^o)/val(v1020^^d)>> 1.pft echo case 1: ' '>> 1.pft echo elsecase 'R '>> 1.pft echo endsel,>> 1.pft echo c39,>> 1.pft echo f(val(v1020^^l),5,0),>> 1.pft echo c46,>> 1.pft echo f(val(v1020^^u),5,0),>> 1.pft echo c53,>> 1.pft echo f(val(v1020^^n),10,0),/>> 1.pft echo )/#>> 1.pft REM *************************************************************************** REM Gera o relatorio estatistico de campos da Base de Dados REM *************************************************************************** mx stat pft=@1.pft -all now > %1.sta REM *************************************************************************** REM * Verifica tratamento a ser dispensado aos caracteres da base de dados REM *************************************************************************** if ~%2==%2~ goto :coda if %2==NONE goto :coda if %2==None goto :coda if %2==none goto :coda echo >> %1.sta REM *************************************************************************** REM * Define conjunto de caracteres para analise REM *************************************************************************** if %2==FLAT goto :WFLAT if %2==Flat goto :WFLAT if %2==flat goto :WFLAT if %2==ANSI goto :WANSI if %2==ansi goto :WANSI if %2==ASCII goto :WASCII if %2==ascii goto :WASCII if %2==ASC2 goto :WASCII if %2==asc2 goto :WASCII if %2==ASC goto :WASCII if %2==asc goto :WASCII :WFLAT REM Conjunto de caracteres generico REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres - ADC',/,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo 'Carac Ocorr.',/,>>1.pft echo 'HEX',/,>>1.pft echo '------------------ ',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^^x,>>1.pft echo c8,>>1.pft echo f(val(v1030^^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :WANSI REM Conjunto de caracteres ANSI (WINDOWS) REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres ANSI - ADC-ANSI',/,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '-----------------------------------------------------------------------------',/#,>> 1.pft echo ' Carac Ocorrencias',/,>>1.pft echo 'HEX DEC',/,>>1.pft echo '-------------------------------------',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^^x,>>1.pft echo select v1030^^x>>1.pft REM 123456789012345678 echo case '00': ' 00 NUL'>>1.pft echo case '01': ' 01 SOH'>>1.pft echo case '02': ' 02 STX'>>1.pft echo case '03': ' 03 ETX'>>1.pft echo case '04': ' 04 EOT'>>1.pft echo case '05': ' 05 ENQ'>>1.pft echo case '06': ' 06 ACK'>>1.pft echo case '07': ' 07 BEL'>>1.pft echo case '08': ' 08 BS'>>1.pft echo case '09': ' 09 HT'>>1.pft echo case '0a': ' 10 LF'>>1.pft echo case '0b': ' 11 VT'>>1.pft echo case '0c': ' 12 FF'>>1.pft echo case '0d': ' 13 CR'>>1.pft echo case '0e': ' 14 SO'>>1.pft echo case '0f': ' 15 SI'>>1.pft echo case '10': ' 16 DLE'>>1.pft echo case '11': ' 17 DC1'>>1.pft echo case '12': ' 18 DC2'>>1.pft echo case '13': ' 19 DC3'>>1.pft echo case '14': ' 20 DC4'>>1.pft REM 123456789012345678 echo case '15': ' 21 NAK'>>1.pft echo case '16': ' 22 SYN'>>1.pft echo case '17': ' 23 ETB'>>1.pft echo case '18': ' 24 CAN'>>1.pft echo case '19': ' 25 EM'>>1.pft echo case '1a': ' 26 SUB'>>1.pft echo case '1b': ' 27 ESCAPE'>>1.pft echo case '1c': ' 28 FS'>>1.pft echo case '1d': ' 29 GS'>>1.pft echo case '1e': ' 30 RS'>>1.pft echo case '1f': ' 31 US'>>1.pft echo case '20': ' 32 SPACE'>>1.pft echo case '21': ' 33 !'>>1.pft echo case '22': ' 34 ASPAS'>>1.pft echo case '23': ' 35 #'>>1.pft echo case '24': ' 36 $'>>1.pft echo case '25': ' 37 PERCENT'>>1.pft echo case '26': ' 38 e cml'>>1.pft echo case '27': ' 39 apostrofe'>>1.pft echo case '28': ' 40 ('>>1.pft echo case '29': ' 41 )'>>1.pft REM 123456789012345678 echo case '2a': ' 42 *'>>1.pft echo case '2b': ' 43 +'>>1.pft echo case '2c': ' 44 ,'>>1.pft echo case '2d': ' 45 -'>>1.pft echo case '2e': ' 46 .'>>1.pft echo case '2f': ' 47 /'>>1.pft echo case '30': ' 48 num. 0'>>1.pft echo case '31': ' 49 num. 1'>>1.pft echo case '32': ' 50 num. 2'>>1.pft echo case '33': ' 51 num. 3'>>1.pft echo case '34': ' 52 num. 4'>>1.pft echo case '35': ' 53 num. 5'>>1.pft echo case '36': ' 54 num. 6'>>1.pft echo case '37': ' 55 num. 7'>>1.pft echo case '38': ' 56 num. 8'>>1.pft echo case '39': ' 57 num. 9'>>1.pft echo case '3a': ' 58 :'>>1.pft echo case '3b': ' 59 ;'>>1.pft echo case '3c': ' 60 menor'>>1.pft echo case '3d': ' 61 ='>>1.pft echo case '3e': ' 62 maior'>>1.pft REM 123456789012345678 echo case '3f': ' 63 ?'>>1.pft echo case '40': ' 64 @'>>1.pft echo case '41': ' 65 A'>>1.pft echo case '42': ' 66 B'>>1.pft echo case '43': ' 67 C'>>1.pft echo case '44': ' 68 D'>>1.pft echo case '45': ' 69 E'>>1.pft echo case '46': ' 70 F'>>1.pft echo case '47': ' 71 G'>>1.pft echo case '48': ' 72 H'>>1.pft echo case '49': ' 73 I'>>1.pft echo case '4a': ' 74 J'>>1.pft echo case '4b': ' 75 K'>>1.pft echo case '4c': ' 76 L'>>1.pft echo case '4d': ' 77 M'>>1.pft echo case '4e': ' 78 N'>>1.pft echo case '4f': ' 79 O'>>1.pft echo case '50': ' 80 P'>>1.pft echo case '51': ' 81 Q'>>1.pft echo case '52': ' 82 R'>>1.pft echo case '53': ' 83 S'>>1.pft REM 123456789012345678 echo case '54': ' 84 T'>>1.pft echo case '55': ' 85 U'>>1.pft echo case '56': ' 86 V'>>1.pft echo case '57': ' 87 W'>>1.pft echo case '58': ' 88 X'>>1.pft echo case '59': ' 89 Y'>>1.pft echo case '5a': ' 90 Z'>>1.pft echo case '5b': ' 91 ['>>1.pft echo case '5c': ' 92 \'>>1.pft echo case '5d': ' 93 ]'>>1.pft echo case '5e': ' 94 Circunf'>>1.pft echo case '5f': ' 95 _'>>1.pft echo case '60': ' 96 agudo'>>1.pft echo case '61': ' 97 a'>>1.pft echo case '62': ' 98 b'>>1.pft echo case '63': ' 99 c'>>1.pft echo case '64': ' 100 d'>>1.pft echo case '65': ' 101 e'>>1.pft echo case '66': ' 102 f'>>1.pft echo case '67': ' 103 g'>>1.pft echo case '68': ' 104 h'>>1.pft REM 123456789012345678 echo case '69': ' 105 i'>>1.pft echo case '6a': ' 106 j'>>1.pft echo case '6b': ' 107 k'>>1.pft echo case '6c': ' 108 l'>>1.pft echo case '6d': ' 109 m'>>1.pft echo case '6e': ' 110 n'>>1.pft echo case '6f': ' 111 o'>>1.pft echo case '70': ' 112 p'>>1.pft echo case '71': ' 113 q'>>1.pft echo case '72': ' 114 r'>>1.pft echo case '73': ' 115 s'>>1.pft echo case '74': ' 116 t'>>1.pft echo case '75': ' 117 u'>>1.pft echo case '76': ' 118 v'>>1.pft echo case '77': ' 119 w'>>1.pft echo case '78': ' 120 x'>>1.pft echo case '79': ' 121 y'>>1.pft echo case '7a': ' 122 z'>>1.pft echo case '7b': ' 123 {'>>1.pft echo case '7c': ' 124 pipe'>>1.pft echo case '7d': ' 125 }'>>1.pft REM 123456789012345678 echo case '7e': ' 126 til'>>1.pft echo case '7f': ' 127 DELETE'>>1.pft echo case '80': ' 128'>>1.pft echo case '81': ' 129'>>1.pft echo case '82': ' 130'>>1.pft echo case '83': ' 131'>>1.pft echo case '84': ' 132'>>1.pft echo case '85': ' 133'>>1.pft echo case '86': ' 134'>>1.pft echo case '87': ' 135'>>1.pft echo case '88': ' 136'>>1.pft echo case '89': ' 137'>>1.pft echo case '8a': ' 138'>>1.pft echo case '8b': ' 139'>>1.pft echo case '8c': ' 140'>>1.pft echo case '8d': ' 141'>>1.pft echo case '8e': ' 142'>>1.pft echo case '8f': ' 143'>>1.pft echo case '90': ' 144'>>1.pft echo case '91': ' 145'>>1.pft echo case '92': ' 146'>>1.pft REM 123456789012345678 echo case '93': ' 147'>>1.pft echo case '94': ' 148'>>1.pft echo case '95': ' 149'>>1.pft echo case '96': ' 150'>>1.pft echo case '97': ' 151'>>1.pft echo case '98': ' 152'>>1.pft echo case '99': ' 153'>>1.pft echo case '9a': ' 154'>>1.pft echo case '9b': ' 155'>>1.pft echo case '9c': ' 156'>>1.pft echo case '9d': ' 157'>>1.pft echo case '9e': ' 158'>>1.pft echo case '9f': ' 159'>>1.pft echo case 'a0': ' 160'>>1.pft echo case 'a1': ' 161'>>1.pft echo case 'a2': ' 162'>>1.pft echo case 'a3': ' 163'>>1.pft echo case 'a4': ' 164'>>1.pft echo case 'a5': ' 165'>>1.pft echo case 'a6': ' 166'>>1.pft echo case 'a7': ' 167'>>1.pft REM 123456789012345678 echo case 'a8': ' 168'>>1.pft echo case 'a9': ' 169'>>1.pft echo case 'aa': ' 170'>>1.pft echo case 'ab': ' 171'>>1.pft echo case 'ac': ' 172'>>1.pft echo case 'ad': ' 173'>>1.pft echo case 'ae': ' 174'>>1.pft echo case 'af': ' 175'>>1.pft echo case 'b0': ' 176'>>1.pft echo case 'b1': ' 177'>>1.pft echo case 'b2': ' 178'>>1.pft echo case 'b3': ' 179'>>1.pft echo case 'b4': ' 180'>>1.pft echo case 'b5': ' 181'>>1.pft echo case 'b6': ' 182'>>1.pft echo case 'b7': ' 183'>>1.pft echo case 'b8': ' 184'>>1.pft echo case 'b9': ' 185'>>1.pft echo case 'ba': ' 186'>>1.pft echo case 'bb': ' 187'>>1.pft echo case 'bc': ' 188'>>1.pft REM 123456789012345678 echo case 'bd': ' 189'>>1.pft echo case 'be': ' 190'>>1.pft echo case 'bf': ' 191'>>1.pft echo case 'c0': ' 192 A grave'>>1.pft echo case 'c1': ' 193 A agudo'>>1.pft echo case 'c2': ' 194 A circunflexo'>>1.pft echo case 'c3': ' 195 A til'>>1.pft echo case 'c4': ' 196 A trema'>>1.pft echo case 'c5': ' 197'>>1.pft echo case 'c6': ' 198'>>1.pft echo case 'c7': ' 199 C cedilha'>>1.pft echo case 'c8': ' 200 E grave'>>1.pft echo case 'c9': ' 201 E agudo'>>1.pft echo case 'ca': ' 202 E circunflexo'>>1.pft echo case 'cb': ' 203 E trema'>>1.pft echo case 'cc': ' 204 I grave'>>1.pft echo case 'cd': ' 205 I agudo'>>1.pft echo case 'ce': ' 206 I circunflexo'>>1.pft echo case 'cf': ' 207 I trema'>>1.pft echo case 'd0': ' 208'>>1.pft echo case 'd1': ' 209 N til'>>1.pft REM 123456789012345678 echo case 'd2': ' 210 O grave'>>1.pft echo case 'd3': ' 211 O agudo'>>1.pft echo case 'd4': ' 212 O circunflexo'>>1.pft echo case 'd5': ' 213 O til'>>1.pft echo case 'd6': ' 214 O trema'>>1.pft echo case 'd7': ' 215'>>1.pft echo case 'd8': ' 216'>>1.pft echo case 'd9': ' 217 U grave'>>1.pft echo case 'da': ' 218 U agudo'>>1.pft echo case 'db': ' 219 U circunflexo'>>1.pft echo case 'dc': ' 220 U trema'>>1.pft echo case 'dd': ' 221'>>1.pft echo case 'de': ' 222'>>1.pft echo case 'df': ' 223'>>1.pft echo case 'e0': ' 224 a grave'>>1.pft echo case 'e1': ' 225 a agudo'>>1.pft echo case 'e2': ' 226 a circunflexo'>>1.pft echo case 'e3': ' 227 a til'>>1.pft echo case 'e4': ' 228 a trema'>>1.pft echo case 'e5': ' 229'>>1.pft echo case 'e6': ' 230'>>1.pft REM 123456789012345678 echo case 'e7': ' 231 c cedilha'>>1.pft echo case 'e8': ' 232 e grave'>>1.pft echo case 'e9': ' 233 e agudo'>>1.pft echo case 'ea': ' 234 e circunflexo'>>1.pft echo case 'eb': ' 235 e trema'>>1.pft echo case 'ec': ' 236 i grave'>>1.pft echo case 'ed': ' 237 i agudo'>>1.pft echo case 'ee': ' 238 i circunflexo'>>1.pft echo case 'ef': ' 239 i trema'>>1.pft echo case 'f0': ' 240'>>1.pft echo case 'f1': ' 241 n til'>>1.pft echo case 'f2': ' 242 o grave'>>1.pft echo case 'f3': ' 243 o agudo'>>1.pft echo case 'f4': ' 244 o circunflexo'>>1.pft echo case 'f5': ' 245 o til'>>1.pft echo case 'f6': ' 246 o trema'>>1.pft echo case 'f7': ' 247'>>1.pft echo case 'f8': ' 248'>>1.pft echo case 'f9': ' 249 u grave'>>1.pft echo case 'fa': ' 250 u agudo'>>1.pft echo case 'fb': ' 251 u circunflexo'>>1.pft REM 123456789012345678 echo case 'fc': ' 252 u trema'>>1.pft echo case 'fd': ' 253'>>1.pft echo case 'fe': ' 254'>>1.pft echo case 'ff': ' 255'>>1.pft echo endsel,>>1.pft echo c27,>>1.pft echo f(val(v1030^^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :WASCII REM Conjunto de caracteres ASCII REM 1 2 3 4 5 6 7 8 REM 12345678901234567890123456789012345678901234567890123456789012345678901234567890 echo 'QAPLA Servicos Informatica S/C Analise Estatistica de Base de Dados ISIS',/,>1.pft echo ' Analise de Distribuicao de Caracteres ASCII - ADC-ASCII',/,>> 1.pft echo '------------------------------------------------------------------------------',/#,>> 1.pft echo if p(v1001) then>> 1.pft echo " Nome da Base : "v1001>> 1.pft echo fi,>> 1.pft echo if p(v1003) then>> 1.pft echo c35,>> 1.pft echo 'data de analise : ',v1003*6.2,'/',v1003*4.2,'/',v1003*0.4,/,>> 1.pft echo fi,/,>> 1.pft echo ' Total de regs : 'v1009,/#,>> 1.pft echo '------------------------------------------------------------------------------',/#,>> 1.pft echo ' Carac Ocorrencias',/,>>1.pft echo 'HEX DEC',/,>>1.pft echo '-------------------------------------',/#,>>1.pft echo (>>1.pft echo c02,>>1.pft echo v1030^^x,>>1.pft echo select v1030^^x>>1.pft REM 123456789012345678 echo case '00': ' 00 NUL'>>1.pft echo case '01': ' 01 SOH'>>1.pft echo case '02': ' 02 STX'>>1.pft echo case '03': ' 03 ETX'>>1.pft echo case '04': ' 04 EOT'>>1.pft echo case '05': ' 05 ENQ'>>1.pft echo case '06': ' 06 ACK'>>1.pft echo case '07': ' 07 BEL'>>1.pft echo case '08': ' 08 BS'>>1.pft echo case '09': ' 09 HT'>>1.pft echo case '0a': ' 10 LF'>>1.pft echo case '0b': ' 11 VT'>>1.pft echo case '0c': ' 12 FF'>>1.pft echo case '0d': ' 13 CR'>>1.pft echo case '0e': ' 14 SO'>>1.pft echo case '0f': ' 15 SI'>>1.pft echo case '10': ' 16 DLE'>>1.pft echo case '11': ' 17 DC1'>>1.pft echo case '12': ' 18 DC2'>>1.pft echo case '13': ' 19 DC3'>>1.pft echo case '14': ' 20 DC4'>>1.pft REM 123456789012345678 echo case '15': ' 21 NAK'>>1.pft echo case '16': ' 22 SYN'>>1.pft echo case '17': ' 23 ETB'>>1.pft echo case '18': ' 24 CAN'>>1.pft echo case '19': ' 25 EM'>>1.pft echo case '1a': ' 26 SUB'>>1.pft echo case '1b': ' 27 ESCAPE'>>1.pft echo case '1c': ' 28 FS'>>1.pft echo case '1d': ' 29 GS'>>1.pft echo case '1e': ' 30 RS'>>1.pft echo case '1f': ' 31 US'>>1.pft echo case '20': ' 32 SPACE'>>1.pft echo case '21': ' 33 !'>>1.pft echo case '22': ' 34 ASPAS'>>1.pft echo case '23': ' 35 #'>>1.pft echo case '24': ' 36 $'>>1.pft echo case '25': ' 37 Percent'>>1.pft echo case '26': ' 38 e cml'>>1.pft echo case '27': ' 39 apostrofe'>>1.pft echo case '28': ' 40 ('>>1.pft echo case '29': ' 41 )'>>1.pft REM 123456789012345678 echo case '2a': ' 42 *'>>1.pft echo case '2b': ' 43 +'>>1.pft echo case '2c': ' 44 ,'>>1.pft echo case '2d': ' 45 -'>>1.pft echo case '2e': ' 46 .'>>1.pft echo case '2f': ' 47 /'>>1.pft echo case '30': ' 48 num. 0'>>1.pft echo case '31': ' 49 num. 1'>>1.pft echo case '32': ' 50 num. 2'>>1.pft echo case '33': ' 51 num. 3'>>1.pft echo case '34': ' 52 num. 4'>>1.pft echo case '35': ' 53 num. 5'>>1.pft echo case '36': ' 54 num. 6'>>1.pft echo case '37': ' 55 num. 7'>>1.pft echo case '38': ' 56 num. 8'>>1.pft echo case '39': ' 57 num. 9'>>1.pft echo case '3a': ' 58 :'>>1.pft echo case '3b': ' 59 ;'>>1.pft echo case '3c': ' 60 menor'>>1.pft echo case '3d': ' 61 ='>>1.pft echo case '3e': ' 62 maior'>>1.pft REM 123456789012345678 echo case '3f': ' 63 ?'>>1.pft echo case '40': ' 64 @'>>1.pft echo case '41': ' 65 A'>>1.pft echo case '42': ' 66 B'>>1.pft echo case '43': ' 67 C'>>1.pft echo case '44': ' 68 D'>>1.pft echo case '45': ' 69 E'>>1.pft echo case '46': ' 70 F'>>1.pft echo case '47': ' 71 G'>>1.pft echo case '48': ' 72 H'>>1.pft echo case '49': ' 73 I'>>1.pft echo case '4a': ' 74 J'>>1.pft echo case '4b': ' 75 K'>>1.pft echo case '4c': ' 76 L'>>1.pft echo case '4d': ' 77 M'>>1.pft echo case '4e': ' 78 N'>>1.pft echo case '4f': ' 79 O'>>1.pft echo case '50': ' 80 P'>>1.pft echo case '51': ' 81 Q'>>1.pft echo case '52': ' 82 R'>>1.pft echo case '53': ' 83 S'>>1.pft REM 123456789012345678 echo case '54': ' 84 T'>>1.pft echo case '55': ' 85 U'>>1.pft echo case '56': ' 86 V'>>1.pft echo case '57': ' 87 W'>>1.pft echo case '58': ' 88 X'>>1.pft echo case '59': ' 89 Y'>>1.pft echo case '5a': ' 90 Z'>>1.pft echo case '5b': ' 91 ['>>1.pft echo case '5c': ' 92 \'>>1.pft echo case '5d': ' 93 ]'>>1.pft echo case '5e': ' 94 Circunf'>>1.pft echo case '5f': ' 95 _'>>1.pft echo case '60': ' 96 agudo'>>1.pft echo case '61': ' 97 a'>>1.pft echo case '62': ' 98 b'>>1.pft echo case '63': ' 99 c'>>1.pft echo case '64': ' 100 d'>>1.pft echo case '65': ' 101 e'>>1.pft echo case '66': ' 102 f'>>1.pft echo case '67': ' 103 g'>>1.pft echo case '68': ' 104 h'>>1.pft REM 123456789012345678 echo case '69': ' 105 i'>>1.pft echo case '6a': ' 106 j'>>1.pft echo case '6b': ' 107 k'>>1.pft echo case '6c': ' 108 l'>>1.pft echo case '6d': ' 109 m'>>1.pft echo case '6e': ' 110 n'>>1.pft echo case '6f': ' 111 o'>>1.pft echo case '70': ' 112 p'>>1.pft echo case '71': ' 113 q'>>1.pft echo case '72': ' 114 r'>>1.pft echo case '73': ' 115 s'>>1.pft echo case '74': ' 116 t'>>1.pft echo case '75': ' 117 u'>>1.pft echo case '76': ' 118 v'>>1.pft echo case '77': ' 119 w'>>1.pft echo case '78': ' 120 x'>>1.pft echo case '79': ' 121 y'>>1.pft echo case '7a': ' 122 z'>>1.pft echo case '7b': ' 123 {'>>1.pft echo case '7c': ' 124 pipe'>>1.pft echo case '7d': ' 125 }'>>1.pft REM 123456789012345678 echo case '7e': ' 126 til'>>1.pft echo case '7f': ' 127 DELETE'>>1.pft echo case '80': ' 128 C cedilha'>>1.pft echo case '81': ' 129 u trema'>>1.pft echo case '82': ' 130 e agudo'>>1.pft echo case '83': ' 131 a circunflexo'>>1.pft echo case '84': ' 132 a trema'>>1.pft echo case '85': ' 133 a grave'>>1.pft echo case '86': ' 134 a bola'>>1.pft echo case '87': ' 135 c cedilha'>>1.pft echo case '88': ' 136 e circunflexo'>>1.pft echo case '89': ' 137 e trema'>>1.pft echo case '8a': ' 138 e grave'>>1.pft echo case '8b': ' 139 i trema'>>1.pft echo case '8c': ' 140 i circunflexo'>>1.pft echo case '8d': ' 141 i grave'>>1.pft echo case '8e': ' 142 A trema'>>1.pft echo case '8f': ' 143 A bola'>>1.pft echo case '90': ' 144 E agudo'>>1.pft echo case '91': ' 145 ae'>>1.pft echo case '92': ' 146 AE'>>1.pft REM 123456789012345678 echo case '93': ' 147 o circunflexo'>>1.pft echo case '94': ' 148 o trema'>>1.pft echo case '95': ' 149 o grave'>>1.pft echo case '96': ' 150 u circunflexo'>>1.pft echo case '97': ' 151 u grave'>>1.pft echo case '98': ' 152 y trema'>>1.pft echo case '99': ' 153 O trema'>>1.pft echo case '9a': ' 154 U trema'>>1.pft echo case '9b': ' 155 fi'>>1.pft echo case '9c': ' 156 Libra'>>1.pft echo case '9d': ' 157 FI'>>1.pft echo case '9e': ' 158 versus'>>1.pft echo case '9f': ' 159'>>1.pft echo case 'a0': ' 160 a agudo'>>1.pft echo case 'a1': ' 161 i agudo'>>1.pft echo case 'a2': ' 162 o agudo'>>1.pft echo case 'a3': ' 163 u agudo'>>1.pft echo case 'a4': ' 164 n til '>>1.pft echo case 'a5': ' 165 N til '>>1.pft echo case 'a6': ' 166 primeiro'>>1.pft echo case 'a7': ' 167 primeira'>>1.pft REM 123456789012345678 echo case 'a8': ' 168 ? espanhol'>>1.pft echo case 'a9': ' 169 registrada'>>1.pft echo case 'aa': ' 170'>>1.pft echo case 'ab': ' 171 meio'>>1.pft echo case 'ac': ' 172 1 quarto'>>1.pft echo case 'ad': ' 173 ! espanhol'>>1.pft echo case 'ae': ' 174 dup menor'>>1.pft echo case 'af': ' 175 dup maior'>>1.pft echo case 'b0': ' 176'>>1.pft echo case 'b1': ' 177'>>1.pft echo case 'b2': ' 178'>>1.pft echo case 'b3': ' 179'>>1.pft echo case 'b4': ' 180'>>1.pft echo case 'b5': ' 181 A agudo'>>1.pft echo case 'b6': ' 182 A circunflexo'>>1.pft echo case 'b7': ' 183 A grave'>>1.pft echo case 'b8': ' 184 copyright'>>1.pft echo case 'b9': ' 185'>>1.pft echo case 'ba': ' 186'>>1.pft echo case 'bb': ' 187'>>1.pft echo case 'bc': ' 188'>>1.pft REM 123456789012345678 echo case 'bd': ' 189 cents'>>1.pft echo case 'be': ' 190 Yene'>>1.pft echo case 'bf': ' 191'>>1.pft echo case 'c0': ' 192'>>1.pft echo case 'c1': ' 193'>>1.pft echo case 'c2': ' 194'>>1.pft echo case 'c3': ' 195'>>1.pft echo case 'c4': ' 196'>>1.pft echo case 'c5': ' 197'>>1.pft echo case 'c6': ' 198 a til'>>1.pft echo case 'c7': ' 199 A til'>>1.pft echo case 'c8': ' 200'>>1.pft echo case 'c9': ' 201'>>1.pft echo case 'ca': ' 202'>>1.pft echo case 'cb': ' 203'>>1.pft echo case 'cc': ' 204'>>1.pft echo case 'cd': ' 205'>>1.pft echo case 'ce': ' 206'>>1.pft echo case 'cf': ' 207'>>1.pft echo case 'd0': ' 208'>>1.pft echo case 'd1': ' 209'>>1.pft REM 123456789012345678 echo case 'd2': ' 210 E circunflexo'>>1.pft echo case 'd3': ' 211 E trema'>>1.pft echo case 'd4': ' 212 E grave'>>1.pft echo case 'd5': ' 213'>>1.pft echo case 'd6': ' 214 I agudo'>>1.pft echo case 'd7': ' 215 I circunflexo'>>1.pft echo case 'd8': ' 216 I trema'>>1.pft echo case 'd9': ' 217'>>1.pft echo case 'da': ' 218'>>1.pft echo case 'db': ' 219'>>1.pft echo case 'dc': ' 220'>>1.pft echo case 'dd': ' 221'>>1.pft echo case 'de': ' 222 I grave'>>1.pft echo case 'df': ' 223'>>1.pft echo case 'e0': ' 224 O agudo'>>1.pft echo case 'e1': ' 225'>>1.pft echo case 'e2': ' 226 O circunflexo'>>1.pft echo case 'e3': ' 227 O grave'>>1.pft echo case 'e4': ' 228 o til'>>1.pft echo case 'e5': ' 229 O til'>>1.pft echo case 'e6': ' 230 micro min'>>1.pft REM 123456789012345678 echo case 'e7': ' 231'>>1.pft echo case 'e8': ' 232'>>1.pft echo case 'e9': ' 233 U agudo'>>1.pft echo case 'ea': ' 234 U circunflexo'>>1.pft echo case 'eb': ' 235 U grave'>>1.pft echo case 'ec': ' 236 y agudo'>>1.pft echo case 'ed': ' 237 Y agudo'>>1.pft echo case 'ee': ' 238'>>1.pft echo case 'ef': ' 239 agudo'>>1.pft echo case 'f0': ' 240'>>1.pft echo case 'f1': ' 241 +/-'>>1.pft echo case 'f2': ' 242'>>1.pft echo case 'f3': ' 243 3 quartos'>>1.pft echo case 'f4': ' 244'>>1.pft echo case 'f5': ' 245 paragrafo'>>1.pft echo case 'f6': ' 246 dividir'>>1.pft echo case 'f7': ' 247'>>1.pft echo case 'f8': ' 248 grau'>>1.pft echo case 'f9': ' 249 trema'>>1.pft echo case 'fa': ' 250'>>1.pft echo case 'fb': ' 251'>>1.pft REM 123456789012345678 echo case 'fc': ' 252 ao cubo'>>1.pft echo case 'fd': ' 253 quadrado'>>1.pft echo case 'fe': ' 254'>>1.pft echo case 'ff': ' 255'>>1.pft echo endsel,>>1.pft echo c27>>1.pft echo f(val(v1030^^n),10,0),>>1.pft echo />>1.pft echo )>>1.pft goto :character :character REM *************************************************************************** REM Gera o relatorio estatistico de caracteres da Base de Dados REM *************************************************************************** x\mx stat pft=@1.pft -all now>> %1.sta :coda REM *************************************************************************** REM * Apaga os arquivos de trabalho REM *************************************************************************** if exist stat.mst del stat.mst if exist stat.xrf del stat.xrf if exist 1.pft del 1.pft