elitenet

Ola Alexandre Seria possivel me passar as orientações para homologação dp TEF e PAF ou onde consigo as mesmas. Pois peguei um projeto para desenvolver para uma softhouse e não sei nem por onde começar, pois nunca mexi nesta area. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Jeff Vai ai um relato de minha experiencia, tenho uma DLL de recursos que foi criada em um sistema rodando Windows XP Professional, criei varias dialogs usando este mesmo sistema operacional. A Algum tempo atras comprei um notebook que veio com Windows Vista, por questoes de licença do windows ( Teria que comprar mais uma do XP ) mantive o Vista mesmo ( Pois veio totalmente original ). Mas o caso é o seguinte quando eu acrescentava novas dialogs na DLL usando o windows Vista ou modificava uma dialog e executava o sistema no Vista ia blz 100 %, mas quando executava no XP era bug na certa. Fiz o teste ao contrario e funcionava perfeito, então foi para cima da DLL de recursos e não consegui descobrir o que, mas a um ponto eu conseguir chegar. Quando você altera o mesmo pelo Vista ele acrescenta alguma coisa na dialog que o XP não possui e começam os problemas. Faça o teste para você ver, retire essa dialog va para o XP e criei uma nova da mesma forma. No meu caso funcionou sem problema!... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Luiz Augusto Pode me enviar este roteiro, pois estou precisando muito!... E-mail: elitenet@terra.com.br FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Vailtom Desculpe mas poderia dar uma olhadinha no topico na sQLLIB FORUM. http://www.sqllib.com.br/forum/viewtopic.php?f=1&t=958 Obrigado... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE Editado por - elitenet on 29/01/2010 20:21:30

Caros Amigos Sei que aqui não é o lugar para esta postagem, mas como o Vailton se encontra mais aqui do que no forum da SqlLib, então resolvi postar aqui que a resposta vem mais rapido. Estou utilizando a SqlLib Demo que baixei a muito tempo atras, tinha começado os testes mas tive que parar e agora voltei a testar. Como faço para criar uma tabela com os campos abaixo neste formato: Exemplo: aDb := {} aAdd( aDb, { "codban_ag" , "C", 3, 0,,,,.t. } ) aAdd( aDb, { "agencia_ag" , "C", 10, 0,,,,.t. } ) aAdd( aDb, { "dv_agen_ag" , "C", 1, 0,,,,.t. } ) Como você pode observar os 3 campos são chave primaria da tabela, mas não poderão ser autoincremento. O Campo codban_ag alem de fazer parte da chave primaria ele tambem possue chave estrangeira, pois ele vem de outra tabela. A Chave estrangeira eu ja criei sem problema algum pelo sistema, mas criar estes campos com dbcreate sendo os mesmos chave primaria não esta dando certo. Pelo que percebi quando utilizo o dbcreate ele da erro porque ele adiciona o campo Sqlrowid como chave primaria e auto incremento. Como posso criar esta tabela usando o dbcreate da sqllib com estes 3 campos sendo chave primaria? Observacao: O dbCreate não cria a tabela e da a mensagem de erro abaixo!... SQLLIB 1000/ MYSQL RDD: Incorrect column specifier for column 'codban_ag' Se eu tirar o .t. do array ele cria sem problema, mas ai ao olhar pelo Gerenciador do MySql percebo que na tabela somente o sqlrowid e chave primaria!... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Caros Amigos Sei que aqui não é o lugar para esta postagem, mas como o Vailton se encontra mais aqui do que no forum da SqlLib, então resolvi postar aqui que a resposta vem mais rapido. Estou utilizando a SqlLib Demo que baixei a muito tempo atras, tinha começado os testes mas tive que parar e agora voltei a testar. Como faço para criar uma tabela com os campos abaixo neste formato: Exemplo: aDb := {} aAdd( aDb, { "codban_ag" , "C", 3, 0,,,,.t. } ) aAdd( aDb, { "agencia_ag" , "C", 10, 0,,,,.t. } ) aAdd( aDb, { "dv_agen_ag" , "C", 1, 0,,,,.t. } ) Como você pode observar os 3 campos são chave primaria da tabela, mas não poderão ser autoincremento. O Campo codban_ag alem de fazer parte da chave primaria ele tambem possue chave estrangeira, pois ele vem de outra tabela. A Chave estrangeira eu ja criei sem problema algum pelo sistema, mas criar estes campos com dbcreate sendo os mesmos chave primaria não esta dando certo. Pelo que percebi quando utilizo o dbcreate ele da erro porque ele adiciona o campo Sqlrowid como chave primaria e auto incremento. Como posso criar esta tabela usando o dbcreate da sqllib com estes 3 campos sendo chave primaria? Observacao: O dbCreate não cria a tabela e da a mensagem de erro abaixo!... SQLLIB 1000/ MYSQL RDD: Incorrect column specifier for column 'codban_ag' Se eu tirar o .t. do array ele cria sem problema, mas ai ao olhar pelo Gerenciador do MySql percebo que na tabela somente o sqlrowid e chave primaria!... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Vailton Aproveitando você por aqui, poderia por favor responder uma pergunta que coloquei no forum da Sqllib. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE Editado por - elitenet on 28/01/2010 19:15:38

O Protheus ainda tem muita coisa parecida com Five, tive a alguns meses em uma grande transportadora com mais de 700 carretas e ate o rastreamento estava integrado ao Protheus. Aproveitei para dar uma fuçadinha lá e tem muita coisa ainda igual ao Five. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

E so ele dar um rlock quando carregar as variaveis com os valores e um Unlock no final da rotina FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Emmota Rapaz pela sua experiencia, podia jurar que você era mais velho. Hehehe Desculpe!... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Ico E so fazer assim que funciona, nao precisa nem de funcao ou classe: Local wAdm := cTod("\\") Redefine Get oGet[3] Var wAdm ID nn Of oFld:Adialogs[1] Valid ( Field->ADMISAO := wAdmReturn, .t. ) id=code>id=code>FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Caros Amigos Emotta e NetSys Perto de vocês ainda sou novo, pois tenho apenas 30 anos. Mas acompanho a historia da Microsiga deste 94, isso mesmo pois ganhei o que se pode chamar de computador com 12 anos, era um AS400 que podia se criar programas usando basic. Aos 14 anos ja programava e ficava antenado no mercado de tecnologia, acompanhava a finco as duas empresas que mais eu podia ter contato que era Microsiga ( DBASE E CLIPPER ) e RM Sistsemas ( PASCAL ). Lia tudo sobre as mesmas e acompanhava ate manuais dos sistemas da epoca. Conheci o Five ante do FiveWin, na epoca era o FIVEDOS ( Creio que se procurar aqui nos meus CDS ainda tenho a lib ), na epoca podia se programar em @ say e quando saiu a primeira versao do Fivewin, lembro que compilei o sistema e algumas coisas funcionavam perfeitamente. Mas voltando ao assunto, cresci acompanhando a trajetoria destas duas empresas e em especial a Microsiga, pois quando aprendi a programar em DBase III adorei e não parei mais. Trabalhei em uma empresa no meu primeiro emprego entrei ja como programador com 16 anos, e montei um sistema de contabilidade espelhado no da Microsiga ( Siga Contabilidade ) vinha com um Manual da Capa verde, montei o sistema so lendo o manual. Hoje não estou mais na empresa, mas ela ganhou tubos de dinheiro com este sistema, no entatnto o Dono que é um amigo meu depois deste sistema acompanha todos os passos da Microsiga. E eu estou indo seguindo os passos dos caras, e desenvolvendo meus sistemas. Ja ganhei concorrencia com a propria Microsiga por causa que meus sistemas contemplava requisitos que so a Microsiga tinha em seus sistemas, e os caras analizaram o meu sistema e viram uma demonstracao da propria Microsiga e como meu sistema tinha o que o da Microsiga fazia da mesma forma, pela razao dos custos o meu bem mais em conta ficaram comigo. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE Editado por - elitenet on 23/01/2010 21:31:52

Amigos Ja Coloquei em dicas a insalação do Siga Advanced 1997, era puro clipper e Fivewin. Quem baixar e instalar entre na opcao Debug selecione o arquivo RDDEMO._IW e veja que show ele faz. Depois abra o diretorio e e procure por este arquivo e edi ele com um editor de texto. Podem falar o que quiser, mas o sistema ter essa funcionalidade e ainda poder adicionar isso ao Menu sem ter que reompilar o executavel, tem que ser lider de mercado mesmo ( Isso em 1997 ). Obs: Aos Moderadores do site, esta instalação não é pirata, ela foi disponibilizada em um CD que vinha com o Livro "Teoria do ERP" publicado pela editora Makron Books. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Caro Amigo Este problema as vezes acontece por haver problema na memoria da maquina, eu particularmente quebrei cabeça com isso a um tempo atras e resolvi por ultimo testar em outra maquina. E olha o X da questão na outra maquina funcionava perfeitamente, arranquei os pentes de memoria e coloquei outros e pimba, não deu mais erro. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Caros Amigos A verdade e que a microsiga soube vender o peixe, e se deu bem com isso. Quem quiser eu tenho uma versão do Protheus bem simples, que a microsiga liberou com um livro que eles escreveram. Ela vem com o rdmake e a versao inicial que saiu no windows, e puro Five. Da para tirar umas boas ideias com esta versao, pricipalmente a parte de customização de menus, tratamentos de erros para o sistema não cair, customizacao de novas rotinas sem recompilar o executavel. Eu particularmente tirei grandes ideias deste sistema. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Caros Amigos Eu ja contemplo um pouco mais: Entrada: Devolucao de Venda Entrada de Compra Entrada de Consignacao Entrada de Transferencia Entrada de Complemento de ICMS Entrada de Complemento de IPI Saida: Devolucao de Compra Saida de Venda Saida de Transferencia Saida de Consignacao Saida de Complemento de ICMS Saida de Complemento de IPI FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Ico Isso e muito simples de fazer, eu faço isso constantemente para não ter inumeras janelas no resource e inclusive faço alterações nos objetos via codigo ( redimensionar, mudar de lugar na dialog, colocar invisivel e inclusive estou testando uma forma de incluir um novo objeto via codigo). Mas para responder a sua pergunta e so você fazer o seguinte: 1) No ressource coloque a propriedade VISIBLE dos objetos como FALSE. 2) Na dialog onde você quer que apareça os objetos definidos na mesma, você usa o comando abaixo no On Init for x := 1 to Len( Dialog:aControls ) Dialog:aControls[x]:Show() next FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Gostei Luiz, disse tudo... FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Joao No caso ela so retorna todos os feriados nacionais, ja os feriados estaduais e municipais tem que ser implementado. No caso dos feriados moveis o calculo so funciona ate 2019, pois nesta data o nosso calendario terá que sofrer um ajuste segundo informações que li na internet. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Marcio As empresas daqui agem mais ou menos desta forma, so que nas duas pasta existe o mesmo sistema sem modificação nenhuma. O que acontece e que o movimento e direcionado para outra base de dados. Mas o executavel é o mesmo, conheço casos aqui que foram pego pela receita mas so o cliente que tomou ferro. Porque isso, como o executavel era o mesmo idententico com todas as atualizações a softhouse alego que foi o cliente que instalou o sistema em outra maquina para sonegar e mostrou para os fiscais que ate o executavel era o mesmo isentando eles de qualquer responsabilidade. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Os Feriados Moveis Nacionais é facil! A Funcao abaixo lhe retorna se uma data e feriado ou não: Function feriados( dData, lTpRetorno ) Local cAno := Right( DToC( dData ), 4 ) Local aFeriados := Array( 12 ) Local c, d, n, k, i, j, l, m, dCarnaval, dCorpus, dPascoa, dSexta Local cRetorno := .F. Default lTpRetorno := .F. aFeriados[1] := { CToD( "01/01/" + cAno ), "Confraternização Mundial" } aFeriados[2] := { CToD( "21/04/" + cAno ), "Descobrimento do Brasil e Tiradentes" } aFeriados[3] := { CToD( "01/05/" + cAno ), "Dia do Trabalhador" } aFeriados[4] := { CToD( "07/09/" + cAno ), "Independência do Brasil" } aFeriados[5] := { CToD( "12/10/" + cAno ), "Nra. Senhora Aparecida" } aFeriados[6] := { CToD( "02/11/" + cAno ), "Finados" } aFeriados[7] := { CToD( "15/11/" + cAno ), "Proclamação da Republica" } aFeriados := { CToD( "25/12/" + cAno ), "Natal" } //--------- Feriados Moveis -----------------------------\\ c := Int( Val( cAno ) / 100 ) n := Int( Val( cAno ) - ( 19 * Int( Val( cAno ) / 19 ) ) ) k := Int( ( c - 17 ) / 25 ) i := Int( c - Int( c / 4 ) - Int( ( c - k ) / 3 ) + ( 19 * n ) + 15 ) i := Int( i - ( 30 * Int( i / 30 ) ) ) i := Int( i - ( Int( i / 28 ) * ( 1 - Int( i / 28 ) ) * Int( 29 / ( i + 1 ) ) * Int( ( 21 - n ) / 11 ) ) ) j := Int( Val( cAno ) + Int( Val( cAno ) / 4 ) + i + 2 - c + Int( c / 4 ) ) j := Int( j - ( 7 * Int( j / 7 ) ) ) l := Int( i - j ) m := Int( 3 + Int( ( l + 40 ) / 44 ) ) d := Int( l + 28 - ( 31 * Int( m / 4 ) ) ) dCarnaval := ( CtoD( ( StrZero( d, 2 ) + "/" + StrZero( m, 2 ) + "/" + cAno ) ) - 47 ) dCorpus := ( CtoD( ( StrZero( d, 2 ) + "/" + StrZero( m, 2 ) + "/" + cAno ) ) + 60 ) dPascoa := CtoD( StrZero( d, 2 ) + "/" + StrZero( m, 2 ) + "/" + cAno ) dSexta := ( CtoD( StrZero( d, 2 ) + "/" + StrZero( m, 2 ) + "/" + cAno ) - 2 ) aFeriados[9] := { dCarnaval, "Carnaval" } aFeriados[10] := { dCorpus , "Corpus Christi" } aFeriados[11] := { dPascoa , "Páscoa" } aFeriados[12] := { dSexta , "Sexta-Feira Santa" } If aScan( aFeriados, { |aVal| aVal[1] == dData } ) # 0 If lTpRetorno cRetorno := aFeriados[aScan( aFeriados, { |aVal| aVal[1] == dData } )][2] Else cRetorno := .T. EndIf EndIf Return(cRetorno) id=code>id=code>Obs: O Calculo dos feriados moveis esta seguindo o calculo estabelecido no Calendario Gregoriano. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE Editado por - elitenet on 13/01/2010 08:20:31

Marcio Meu conselho e você não fazer este tipo de sistema, pois a dor de cabeça depois e grande. Obs: Aqui por perto de nós tem varias empresas de software que fazem isso e ate pior, conheço casos que ja passaram ate na mão da PF, mas não consiguiram pegar provas do esquema. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Jeff Isso é simples no caso de notas fiscais comuns ( creio que nfe seja a mesma coisa ) são os seguintes registros. "10 - Mestre do Estabelecimento" "11 - Dados Complementares do Informante",; "50 - NFE Saidas e Entrada do Estabelecimento do Informante" "51 - Registro IPI ( caso haja notas com IPI ) "53 - Registro Substituicao Tributaria ( caso haja notas com ST ) "54 - Registro Produto "74 - Registro Inventario ( Caso o contribuinte seja obrigado ) "75 - Registro Tipo 75" "90 - Final do Arquivo"} O Melhor e voce fazer uma rotina com uns checkbox onde o cliente marca quais registros ele quer enviar, pois assim ele liga para o contador dele e o contador fala para ele e ele marca e a rotina gera os registros somente dos que ele selecionou. Pelo menos foi assim que eu montei e sempre que teve problema o cliente, nao pode brigar comigo, pois foi ele quem selecionou quais registros deveriam ser enviados. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Gibaf Tinha um download de 300 Megas de exemplos e coisas para Fivewin de um pessoal do Mexico, que tinha um exemplo que voce fazia qualquer coisa no word, podia pesquisar, trocar palavras e muitos mais. Eu tinha isso no meu HD, mas ele queimou e eu esqueci o nome do site. Pergunte ao pessoal aqui do forum se alguem ainda tem isso, que tenho a certeza que vai resolver seu problema. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE

Narlem Existe uma forma de no mesmo executavel você rodar modo texto e Grafico, sei que tem que mudar muito pouca coisa. Ja vi em algum topico por aqui estes comentarios. FW 2.3C/CLIPPER 5.X/XHARBOUR/C/C++/JAVA/DELPHI/XMATE/MD/MYSQL/FIREBIRD/INTERBASE