home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / ibm370 / ik0vpt.pkt < prev    next >
Text File  |  2020-01-01  |  14KB  |  178 lines
  1. R:5 S~% @-#&1~X  ~0___DX.
  2. R:-!FIK0VPT.UPDJ.
  3. R:Q"A!"15."I1"!A*'CI6/100/#AMJ#119941129 10:36:49@ ..
  4. R:h#D./ * CICS-specific#M#J./ R 01202060 01202420 $ 1202060 30~3 11/05/92 S.
  5. R:h$D11:28:19#M#J#&ANYCICS SETC 'qualquer programa CICS'~9 @SC90264#M#J#&BN.
  6. R:h%DADFSPC SETC 'Especificacao de arquivo invalida'~. @SC90264#M#J#&BADOU..
  7. R:h&DTF SETC 'Arquivo de saida ilegal'~8 @SC90264#M#J#&BYTSALW SETC ' byte0.
  8. R:h'Ds permitidos, '~< @SC90264#M#J#&BYTSUSD SETC ' bytes usados em '~> @S7.
  9. R:h(DC90264#M#J#&CWDERRM SETC 'Deve ser um prefixo de arquivo valido'~* @SJ.
  10. R:i)DC92300#M#J#&DIRHDNG SETC 'Nome~3 RFM~# LRECL~$ regs~" Kbytes~" Tipo+#MJ.
  11. R:h*D#J~4 Data/hora'~A @SC92150#M#J#&FILCLSN SETC 'Nome de arquivo duplicaO.
  12. R:h+Ddo'~6 @SC90264#M#J#&FMTFSPC SETC 'Digite especificacao do arquivo'~0 3.
  13. R:h,D@SC91224#M#J#&NODIRDF SETC 'Nao ha diretorio definido'~6 @SC90264#M#J .
  14. R:h-D#&NOFSPEC SETC 'Especificacao de arquivo ausente'~/ @SC90264#M#J#&OTHM.
  15. R:h.DERL6 SETC 'OUTRA'~' Must be length <7~2 @SC92300#M#J./ * MUSIC-specifU.
  16. R:h/Dic#M#J./ R 01148060 01148420 $ 1148060 30~3 11/05/92 11:28:19#M#J#&BA=.
  17. R:h0DDFSPC SETC 'Nome de arquivo invalido'~7 @SC92300#M#J#&CWDERRM SETC 'D>.
  18. R:h1Deve ser um diretorio MUSIC valido'~- @SC93236#M#J#&CWDPRVS SETC 'Sem U.
  19. R:h2Dprivilegios necessarios para mudar codigo'~" @SC92300#M#J#&DIRHDNG SEV.
  20. R:h3DTC 'Nome~5 Lrecl RFM~" Kbytes~# Linhas~% +#M#J~0 Data/hora'~E @SC9208'.
  21. R:h4D6#M#J#&FILCLSN SETC 'Nome de arquivo duplicado'~6 @SC88049#M#J#&FILCO%.
  22. R:h5DPY SETC 'Arquivo copiado'~( (<26 bytes)~- @SC92300#M#J#&FILDELT SETC H.
  23. R:h6D'Arquivo removido'~' (<26 bytes)~- @SC92300#M#J#&FILRENM SETC 'Arquiv^.
  24. R:h7Do renomeado'~& (<26 bytes)~- @SC92300#M#J#&FMTFSPC SETC 'EspecificacaR.
  25. R:h8Do de arquivo tem o formato: fn'~% @SC91224#M#J#&KBYTFRE SETC ' KBytesG.
  26. R:h9D livres'~A @SC92300#M#J#&NOCPCMD SETC 'Comandos CP nao suportados'~5 J.
  27. R:h:D@SC92300#M#J#&NOFSPEC SETC 'Nome de arquivo ausente'~8 @SC92300#M#J./$.
  28. R:h;D * TSO-specific#M#J./ R 01051~#0 010~#500 $ 1051~#0 500~2 11/05/92 ->4.
  29. R:h<D4.3<-#M#J#&~%AOK SETC 'OK'~, (see QQWRITE)~4 @SC88076#M#J#&BADFSPC SE,.
  30. R:h=DTC 'DSN Invalido'~C @SC86299#M#J#&CWDERRM SETC 'Deve ser um prefixo vF.
  31. R:h>Dalido de DSN'~. @SC86299#M#J#&FILCLSN SETC '~" Nome de arquivo duplic%.
  32. R:h?Dado'~4 @SC88049#M#J#&FMTFSPC SETC 'Digite d.s.n'~C @SC91224#M#J#&MIGR6.
  33. R:h@DATD SETC '~" Dataset nao on-line'~" (2 leading blanks)~& @SC89250#M#J+.
  34. R:hAD#&NOFSPEC SETC 'DSN ausente'~D @SC86299#M#J#&NOTCPER SETC 'Kermit-TSOK.
  35. R:hBD deve ser um processador de comandos' @SC86299#M#J#&QQWRITE SETC ' ex6.
  36. R:hCDiste.~" Responda "OK" para sobrepor:'~) @SC87015#M#J#&SPACERR SETC 'S^.
  37. R:iDDPACE nao implementado' (see AASPACE)~+ @SC86299#M#J./ * CMS-specific#M'.
  38. R:jED#J./ R 01082100 01082300 $ 1082100 50~3 11/05/92 ->4.3<-#M#J#&CPCMND~" 4.
  39. R:hFDSETC 'Especifique um comando CP'~6 @SC92300#M#J#&CWDERRM SETC 'Deve s(.
  40. R:hGDer um CMS mode valido'~4 @SC86295#M#J#&FILCLSN SETC 'Nome de arquivo 8.
  41. R:hHDduplicado'~6 @SC88049#M#J#&FMTFSPC SETC 'Formato de especificacao de  .
  42. R:hIDarquivo: fn ft [fm]' SC92300#M#J#&NONXAMS SETC 'Este 'e um Kermit naoU.
  43. R:hJD-XA: SET MACHINE 370'~& @SC89235#M#J./ * Generic#M#J./ R 01430800~* $'.
  44. R:hKD 1430800 200~2 11/05/92 ->4.3<-#M#J#&FSPCPRM SETC '[<prim-ult[_CC]>]'9.
  45. R:hLD~$ Goes with FMTFSPC~) @SC92300#M#J./ R 01431200 01431400 $ 1431200 2'.
  46. R:hMD00~2 11/05/92 ->4.3<-#M#J#&OPRMUB~" SETC 'Operando deve ter '~= @SC86!.
  47. R:hND295#M#J#&OPRMUL~" SETC 'de comprimento'~A @SC86295#M#J./ R 01432200 0 .
  48. R:hOD1432400 $ 1432200 200~2 11/05/92 ->4.3<-#M#J#&INVALID SETC 'Invalido'7.
  49. R:hPD~% Must be same length as "missing"~" @SC92300#M#J#&MISSING SETC 'Fal(.
  50. R:hQDtando'~% Must be same length as "invalid"~" @SC92300#M#J./ R 01432800F.
  51. R:hRD 01437800 $ 1432800 200~2 11/05/92 ->4.3<-#M#J#&NOERROR SETC 'Sem err).
  52. R:hSDos'~8 Err ##00~' @SC86156#M#J#&NOTRANS SETC 'Nenhum arquivo transferi6.
  53. R:hTDdo ainda' Err ##01~' @SC86156#M#J#&TCANCEL SETC 'Transferencia cancel..
  54. R:hUDada'~* Err ##02~' @SC86156#M#J#&BADSERV SETC 'Comando de servidor inv4.
  55. R:hVDalido'~% Err ##03~' @SC86156#M#J#&TERMIOE SETC 'Erro de E/S no terminR.
  56. R:hWDal'~* Err ##04~' @SC86156#M#J#&BADCHEK SETC 'Chksum/Contador de pacotL.
  57. R:hXDes incorr' Err##05~' @SC86156#M#J#&BADPSYN SETC 'Sintaxe do pacote inY.
  58. R:hYDvalida'~' Err ##06~' @SC86158#M#J#&BADPTYP SETC 'Tipo de pacote invalI.
  59. R:hZDido'~* Err ##07~' @SC86156#M#J#&LOSTPAK SETC 'Perdi um pacote'~2 Err Y.
  60. R:i[D##08~' @SC86156#M#J#&GOTNAK~" SETC 'Micro enviou um NAK'~. Err ##09~' :.
  61. R:i\D@SC86156#M#J#&MICROAB SETC 'Micro abortou'~4 Err ##10~' @SC86156#M#J#&M.
  62. R:h]DBADNAME SETC 'Nome de arquivo invalido'~) Err ##11~' @SC86156#M#J#&NOF.
  63. R:h^DTFOUN SETC 'Arquivo nao encontrado'~+ Err ##12~' @SC92300#M#J#&DSKFULH.
  64. R:h_DL SETC 'Disco ou arquivo cheio'~+ Err ##13~' @SC86345#M#J#&DSKIOER SEK.
  65. R:h DTC 'Erro de E/S no disco'~- Err ##14~' @SC86345#M#J#&MISSOPR SETC 'OpU.
  66. R:h!Derando ausente'~1 Err ##15~' @SC86158#M#J#&BADSCMD SETC 'Comando ileg9.
  67. R:h"Dal de sistema'~( Err ##16~' @SC86268#M#J#&KCMDERR SETC 'Erro em comanD.
  68. R:h#Ddo Kermit'~+ Err ##17~' @SC86171#M#J#&NOPACKS SETC 'Nenhum pacote recF.
  69. R:j$Debido'~+ Err ##18~' @SC86355#M#J#&RECTRNC SETC 'Registros truncados'~. ;.
  70. R:h%DErr ##19~' @SC87268#M#J#&BADCOMM SETC 'Linha de comunicacao ruim'~( EK.
  71. R:h&Drr ##20~' @SC87300#M#J#&NO8THBQ SETC 'Caracter de 8vo bit nao definid9.
  72. R:h'Do' Err ##21~' @SC89072#M#J#&TOOSHRT SETC 'Arquivo muito pequeno'~, Er).
  73. R:h(Dr ##22~' @SC89218#M#J#&NOSTART SETC 'Inicio-do-pacote perdido'~) Err C.
  74. R:h)D##23~' @SC89219#M#J#&BADOPTN SETC 'Erro de opcao-especif. de arquivo'0.
  75. R:h*D Err##24~' @SC89249#M#J#&BADDISP SETC 'Impossivel usar arquivo'~* ErrO.
  76. R:h+D ##25~' @SC90037#M#J./ R 01438200 01451600 $ 1438200 200~2 11/05/92 -W.
  77. R:h,D>4.3<-#M#J#&~&AS SETC '~" como '~& (gives filespec actually sent)~$ @X.
  78. R:h-DSC87300#M#J#&~%AIS SETC ' eh '~) (used for SHOW display)~+ @SC87034#M?.
  79. R:h.D#J#&ASCQUOT SETC 'um char com valor ASCII 33-62 ou 96-126'~( @SC862240.
  80. R:h/D#M#J#&AZDISAB SETC 'nao ON'~I @SC90239#M#J#&BACKDUP SETC '--original  .
  81. R:h0Drenomeado para ' (used for file coll.@SC90211#M#J#&BADDELF SETC 'Erro%.
  82. R:h1D de opcao: Delimitador final invalido'~& @SC89249#M#J#&BADDELM SETC '9.
  83. R:h2DErro de opcao: Delimitador invalido'~, @SC89249#M#J#&BADOPTS SETC 'ErF.
  84. R:h3Dro de opcao: Opcoes de arquivo desconhecidas' @SC89249#M#J#&BADRNGE S7.
  85. R:h4DETC 'Erro de opcao: Range de linhas invalido'~( @SC89249#M#J#&BADSBCMC.
  86. R:h5D SETC 'Nao eh um subcomando valido'~4 @SC86355#M#J#&BADTABS SETC 'Tab,.
  87. R:h6Ds fora de sequencia'~9 @TS86100#M#J#&BYTPSEC SETC 'Bytes/seg di discoR.
  88. R:h7D: '~; @SC86295#M#J#&CANNOT~" SETC 'Impossivel '~' (used with MAIL, PR>.
  89. R:h8DINT, SUB) @SC90239#M#J#&COLDISC SETC 'Arquivo ja existe, RECEPCAO des7.
  90. R:i9Dcartada'~) @SC90061#M#J#&DEBGERR SETC 'Erro de DEBUG'~B @SC87012#M#J#&^.
  91. R:h:DDELIMSG SETC 'Delimitador de linha: um ou nenhum caracter'~$ @SC88095A.
  92. R:i;D#M#J#&DSCARDD SETC '--descartado como duplicata'~" (file collision)~" V.
  93. R:i<D@SC90033#M#J#&DWRDSTK SETC ' dwords de pilha usadas.'~7 @SC89089#M#J#&!.
  94. R:h=DENDSRV~" SETC 'Para finalizar o servidor use '~" (BYE/FINISH')~" @SC9 .
  95. R:h>D2300#M#J#&ENTHINT SETC 'Digite #&~#AHINT para iniciar'~3 @SC91295#M#J4.
  96. R:h?D#&ERRTAKE SETC 'Erro lendo arquivo TAKE'~8 @SC86239#M#J#&EXTRAOP SETC'.
  97. R:h@D 'Operando extra'~A @SC91312#M#J#&FINISHD SETC '** concluido **'~@ @S..
  98. R:hADC91172#M#J#&FORFSPC SETC 'Arquivo remoto'~A @SC88035#M#J#&FSENLST SET8.
  99. R:hBDC ' arquivo(s) enviado(s).'~8 @SC86295#M#J#&HANDXON SETC 'Handshake e4.
  100. R:hCDsta XON -- desnecessario'~, @SC87338#M#J#&LASTFIL SETC 'Ultimo arquiv?.
  101. R:hDDo usado: '~9 @BS86090#M#J#&MANYFIL SETC 'Muitos arquivos a enviar'~7 ;.
  102. R:hED@SC88306#M#J#&MANYOPT SETC 'Muitas opcoes'~B @SC90239#M#J#&MANYTAB SE@.
  103. R:hFDTC 'Muitos tabs'~D @SC86355#M#J#&MAXNEST SETC 'Ultrapassado limite deB.
  104. R:hGD aninhamentos em TAKE'~$ @SC92300#M#J#&MISSOPS SETC 'Erro de opcao: O3.
  105. R:hHDpcao(oes) ausente(s)'~+ @SC89249#M#J#&MRCTRNC SETC ' registros truncaC.
  106. R:hIDdos'~; @SC87268#M#J#&MSGFILE SETC 'Arquivo '~G @SC87300#M#J#&MSGFILL B.
  107. R:hJDSETA 8~P @SC87300#M#J#&NOBUFFS SETC 'Impossivel alocar buffers'~6 @SCM.
  108. R:hKD92300#M#J#&NOFSENT SETC 'Nenhum arquivo enviado'~9 @SC86295#M#J#&NOHE:.
  109. R:hLDLPF SETC 'Arquivo de Help nao disponivel'~1 @SC90264#M#J#&NOOPERS SET0.
  110. R:hMDC 'Nao sao necessarios (mais) operandos'~+ @SC90179#M#J#&NOWRITE SETCV.
  111. R:hND 'Impossivel gravar arquivo'~6 @SC87117#M#J#&ONEFOLL SETC 'Um dos segB.
  112. R:hODuintes:'~> @SC92300#M#J#&ONLY130 SETC 'Somente os primeiros 130 carac>.
  113. R:hPDteres mostrados'~" @PG88335#M#J#&ONOFFCH SETC 'Deve ser ON, OFF, ou uZ.
  114. R:jQDm caracter'~/ @SC87008#M#J#&OPTSIZE SETC 'Tamanho otimo de pacote: '~6 W.
  115. R:hRD@SC88120#M#J#&PKTABBR SETC 'pct'~* Must be 3 bytes~3 @SC86295#M#J#&PLQ.
  116. R:hSDSESCP SETC 'Favor sair para Kermit local agora'~- @SC92300#M#J#&READYI.
  117. R:hTDR~" SETC 'pronto para receber.'~; @SC92300#M#J#&READYS~" SETC 'prontoP.
  118. R:hUD para enviar.'~< @SC92300#M#J#&READYSR SETC 'entrando em modo servido\.
  119. R:hVDr.'~5 @SC92300#M#J#&RECFOLD SETC ' registros arquivados'~: @SC88120#M7.
  120. R:hWD#J#&RECVDAS SETC '~" Receber como '~@ @SC87300#M#J#&REPTCNT SETC ' paH.
  121. R:hXDcotes repetidos enviados'~4 @SC86316#M#J#&REQUIRG SETC ' requerendo '@.
  122. R:iYD~C @SC86295#M#J#&SECABBR SETC 'seg'~* Must be 3 bytes~3 @SC86295#M#J#&N.
  123. R:hZDSENDING SETC 'Enviando '~F @SC87300#M#J#&SENDPAK SETC 'Tamanho<20 perK.
  124. R:h[Digoso; >94 sem sentido para SEND' @SC90122#M#J#&SIMSHRT SETC 'ArquivoA.
  125. R:h\D de entrada nao encontrado/muito pequeno' SC91312#M#J#&SYSCMND SETC '2.
  126. R:h]DEspecifique um comando #&KSYS'~3 @SC86295#M#J#&SYSFSPC SETC 'Especifi=.
  127. R:h^Dcacao de arquivo #&KSYS'~1 @SC88035#M#J#&TAKLOOP SETC 'Loop em arquivT.
  128. R:h_Do TAKE'~; @SC86239#M#J#&TORECV~" SETC ' para receber arquivo(s).'~6 @C.
  129. R:i DSC92300#M#J#&TOSEND~" SETC ' para enviar arquivo(s).'~7 @SC92300#M#J#&".
  130. R:h!DUNDEFTR SETC 'Traducao de caracter indefinida'~0 @SC90040#M#J#&UNPRSO_.
  131. R:h"DP SETC 'Inicio-de-pacote nao imprimivel'~0 @SC92030#M#J#&VTAMERR SETC,.
  132. R:h#D 'Recuperacao de erro S/1 VTAM'~3 @TB87009#M#J#&XTYPMSG SETC 'Cadeia 3.
  133. R:h$Dde caracteres com ^X para cntl-X'~( @SC86165#M#J#&ZZBEWAR SETC 'atencA.
  134. R:h%Dao para arquivos existentes'~# (COLLISION) @SC92300#M#J./ R 01452~#0  .
  135. R:h&D01452200 $ 1452~#0 200~2 11/05/92 ->4.3<-#M#J#&~$ZOR~" SETC 'ou'~M @S_.
  136. R:i'DC92300#M#J#&ZZSHORT SETC 'pequeno'~( (for HINTS on BLOCK or PACKET)~" ?.
  137. R:h(D@SC92300#M#J./ R 04339~#0 04351~#0 $ 4339~#0 300~2 11/05/92 ->4.3<-#M+.
  138. R:h)D#J~) WTEXT 'Tecle ? para uma lista de comandos validos.'~# @SC92300#MF.
  139. R:i*D#J~) WTEXT 'Tecle ? a qualquer momento (e pressione ENTER) para uma.#M=.
  140. R:h+D#J~0 lista de opcoes.'~> @SC92300#M#J~) WTEXT '~" A abreviacao minima6.
  141. R:h,D estara em maiusculo.'~$ @SC92300#M#J~) WTEXT 'Geralmente, RECEIVE PA5.
  142. R:h-DCKET-SIZE deve ser definido o mai.#M#J~/ or possivel (para'~> @SC9230!.
  143. R:h.D0#M#J~) WTEXT '~" maximizar a eficiencia), mas podem existir limites ..
  144. R:h/Dde.#M#J~0 tamanho de buffer'~= @SC92300#M#J~) WTEXT '~" devido a hard#.
  145. R:h0D/soft de comunicacao. Por seguranca, def.#M#J~/ ina BLOCK-CHECK como'!.
  146. R:i1D~; @SC92300#M#J~) WTEXT '~" 2 ou 3 para pacotes > 100.'~2 @SC92300#M#J3.
  147. R:i2D~) WTEXT 'Para seguranca no envio de arquivos binarios, defina FI.#M#J-.
  148. R:h3D~/ LE TYPE como BINARY em'~9 @SC92300#M#J~) WTEXT '~" ambos os lados,3.
  149. R:i4D mas use V-BINARY neste lado para pres.#M#J~/ ervar os limites dos'~; K.
  150. R:h5D@SC92300#M#J~) WTEXT '~" registros do arquivo original. Muitos Kermit+.
  151. R:h6Ds estabel.#M#J~/ ecem o FILE TYPE'~? @SC92300#M#J~) WTEXT '~" automat2.
  152. R:h7Dicamente. Obs.: V-BINARY com RECEIVE somente p.#M#J~/ ode ser usado pA.
  153. R:h8Dara'~= @SC92300#M#J~) WTEXT '~" arquivos enviados originalmente desteN.
  154. R:h9D modo.' @SC92300#M#J~) WTEXT 'Defina TRANSFER CHARACTER-SET para algo?.
  155. R:h:D apropriado (o d.#M#J~/ efault do ASCII limita'~9 @SC92300#M#J~) WTEXG.
  156. R:h;DT '~" arquivos texto a 128 codigos, mas mapeia algumas vari.#M#J~/ anT.
  157. R:h<Dtes EBCDIC para os'~; @SC92300#M#J~) WTEXT '~" caracteres ASCII "espeE.
  158. R:h=Drados"). Redefina as tabelas se.#M#J~0 necessario.'~C @SC92300#M#J~) 5.
  159. R:h>DWTEXT 'Dica: inclua seu setup habitual no arquivo INIT.'#M#J./ R 0762F.
  160. R:h?D4500~* $ 7624500 500~2 11/05/92 ->4.3<-#M#J~) DC~$ C'Kermit-#&KSYS. SM.
  161. R:h@Dervidor aceita os comandos:'~# @SC86268#M#J./ R 07625500 07633~#0 $ 7A.
  162. R:hAD625500 200~2 11/05/92 ->4.3<-#M#J~) DC C'Funcao~- Comando Padrao',X'14.
  163. R:hBD5'~) @SC86158#M#J~) DC C'~&-~- ~0-',X'1515'~% @SC86158#M#J~) DC C'EnvH.
  164. R:hCDiar arquivo~% SEND arq.',X'15'~. @SC86158#M#J~) DC C'Recuperar arquivW.
  165. R:hDDo~" GET arq.',X'15'~/ @SC86158#M#J~) DC C'Sair do sistema~$ BYE ou LO..
  166. R:hEDGOUT',X'15'~* @SC86158#M#J~) DC C'Sair do servidor~# FINISH',X'15'~1 P.
  167. R:hFD@SC86158#M#J~) DC C'Enviar cmd Kermit~" REMOTE KERMIT cmd',X'15'~& @S1.
  168. R:hGDC86158#M#J~) DC C'Enviar cmd sist.~# REMOTE HOST {CP} cmd',X'15'~# @S?.
  169. R:hHDC86268#M#J~) DC C'Listar diretorio~# REMOTE DIRECTORY arq.',X'15'~" @O.
  170. R:hIDSC86158#M#J~) DC C'Mostrar arquivo~$ REMOTE TYPE arq.',X'15'~' @SC861W.
  171. R:iJD58#M#J~) DC C'Copiar arquivo~% REMOTE COPY a1 a2',X'15'~& @SC86158#M#J2.
  172. R:jKD~) DC C'Renomear arquivo~# REMOTE RENAME a1 a2',X'15'~$ @SC86158#M#J~) D.
  173. R:hLDDC C'Apagar arquivo~% REMOTE DELETE arq.',X'15'~% @SC86158#M#J~) DC C".
  174. R:hMD'Mudar de area~& REMOTE CWD area',X'15'~( @SC86158#M#J~) DC C'MostrarH.
  175. R:VND espaco dsk REMOTE SPACE area',X'15'~& @SC86158#M#J[.
  176. R:#OZ/.
  177. R:#PBW.
  178.