Jump to content

Search the Community

Showing results for tags 'phc'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Bem-vindos ao Portugal-a-Programar
    • Sugestões, Críticas ou Dúvidas relativas ao P@P
    • Acerca do P@P
  • Comunidade a Trabalhar
    • Wiki P@P
    • Apresentação de Projectos de Programação
    • Downloads
  • Revista PROGRAMAR
    • Revista PROGRAMAR
  • Desenvolvimento Geral
    • C
    • C++
    • Java
    • Haskell
    • Pascal
    • Python
    • Bases de Dados
    • Dispositivos Móveis
    • Outras Linguagens
  • Desenvolvimento Orientado para Web
    • PHP
    • HTML
    • CSS
    • Javascript
    • Outras Linguagens de WebDevelopment
    • Desenvolvimento Web
  • Desenvolvimento .NET
    • C#
    • Visual Basic .NET
    • ASP.NET
    • WPF & SilverLight
  • Software e Sistemas Operativos
    • Software de Produtividade
    • Sistemas Operativos
    • Apresentação de Software
  • Informática
    • Interfaces Visuais
    • Computação Gráfica
    • Algoritmia e Lógica
    • Segurança e Redes
    • Hardware
    • Electrónica
    • Automação Industrial
    • Matemática
    • Dúvidas e Discussão de Programação
    • Notícias de Tecnologia
  • Outras Áreas
    • Dúvidas Gerais
    • Discussão Geral
    • Eventos
    • Anúncios de Emprego
    • Tutoriais
    • Snippets / Armazém de Código
  • Arquivo Morto
    • Projectos Descontinuados
    • System Empires

Blogs

  • Blog dos Moderadores
  • Eventos
  • Notícias de Tecnologia
  • Blog do Staff
  • Revista PROGRAMAR
  • Projectos
  • Wiki

Categories

  • Revista PROGRAMAR
  • Tutoriais
  • Textos Académicos
  • Exercícios Académicos
    • Exercícios c/ Solução
    • Exercícios s/ Solução
  • Bibliotecas e Aplicações
  • Outros

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Found 27 results

  1. André Moura

    PHC - Campo utilizador com formula

    Olá a todos, precisava do vossa ajuda, de um nivel mais acima... Ou seja, preciso de criar um campo de utilizador na tabela ST com a operação de multiplicação de dois campos da mesma tabela. Portanto, será o st.stock * st.conversao. isto é um select simples, mas ja percurri por varios sitios e nao consegui com que retornasse corretamente ao dito campo. Posso obter a vossa ajuda? desde já obrigado!!
  2. camexavi

    PHC - tecla em janela de idu

    Boa noite meus caros, Precisava de atribuir uma tecla de utilizador a um ecrã de impressão de IDU. Como consigo saber o nome desse ecrã ?? Grato pela V/ ajuda
  3. Boas, Tenho tido dificuldades na importação de ficheiro excel para o PHC (versão corporate), para as linhas da grelha (tabela ML) de contabilidade (tabela DO). Criei o seguinte código, corre tudo bem, mas não consegue colocar o ecrã em modo de edição nem criar as linhas nem preencher o conteúdo. Será que alguém me consegue ajudar? if messagebox('Para iniciar a importação de linhas p/ a CTB, os campos devem ser (obrigatória e respetivamente): "CONTA", "DEBITO", "CREDITO", "CANALITICO", "DESCRITIVO" e "NUMDOC". Confirma?',32+4)=7 return endif qfile = Getfile('XLSX','Escolher', 'Abrir',0,'Escolha o ficheiro a importar') If Empty(qfile) Return Endif mvisible=.T. Wait Window 'A abrir o ficheiro...' Nowait oExcel = Createobject("Excel.Application") oExcel.Visible = mvisible oExcel.Application.UserControl=mvisible oExcel.Application.Interactive=mvisible oExcel.DisplayAlerts = mvisible oWorkbook = oExcel.Application.Workbooks.Open(qfile) oSheet = oWorkbook.activesheet.Name Wait Window 'A verificar a versão do ficheiro...' Nowait If Val(oExcel.Version) > 11 Wait Window 'A guardar o ficheiro em formato compativel...' Nowait oWorkbook.SaveAs(ac_dir+"excel95.xls", 39) && xlExcel8 qfile=ac_dir+"excel95.xls" Endif Wait Window 'A fechar a folha...' Nowait oWorkbook.Close() Wait Window 'A fechar a aplicação excel...' Nowait oExcel.Quit() **************Nr de colunas igual ao excel Create Cursor curgastos (CONTA c(20),DEBITO n(18,2),CREDITO n(18,2),CANALITICO C(20),DESCRITIVO c(50),NUMDOC c(20) ) *************** Select curgastos Erro = .F. Try Mvar = "APPEND FROM '"+qfile+"' TYPE XL5" &Mvar Catch When .T. &&msg('O ficheiro não pode estar aberto ou não existe fisicamente!') &&merror = .t. &&msg(qfile) Endtry If Erro = .T. Return Endif Delete File ac_dir+"excel95.xls" * 3. Conta o nº de colunas da tabela, se não corresponder a 6 não continua. Select curgastos If Fcount("curgastos")<>6 Msg("O Ficheiro excel é INVÁLIDO! Nº de colunas INCONSISTENTE!!!","DIRECTA") Use In curgastos Return EndIf * 4. Altera as decimais que são utilizadas por defeito na aplicação set point to "." * 5. Mostra a informação e pede p/ cancelar a execução ou mandar prosseguir select curgastos go top delete go top m.escolheu=.F. mostrameisto("curgastos", "** Detalhe do lançamento ***** ") If ! (m.escolheu) Return Endif if messagebox('Vai iniciar a importação de linhas p/ a CTB. Os campos devem ser (respetivamente): "CONTA", "DEBITO", "CREDITO", "CANALITICO", "DESCRITIVO" e "NUMDOC". Confirma?',32+4)=7 return endif * 6. Nº DE REGISTOS E ACUMULADOS A DR E CR numerototal=reccount("curgastos")-1 local tvalordeb, tvalorcred tvalordeb=0 tvalorcred=0 select curgastos go top scan tvalordeb = tvalordeb + curgastos.debito tvalorcred = tvalorcred + curgastos.credito endscan Messagebox("6. Total registos = " +astr(reccount("curgastos")-1) +" . Somam a DR = " +astr(tvalordeb) + " €. Somam a CR = " +astr(tvalorcred) + " €. Saldo = " +astr(tvalordeb-tvalorcred) ) * 7. INSERÇÃO DE LINHAS sdo.showsave() Select curgastos go top replace DO.CRIADOIMP with .t. sdo.refresh() * Se o ecrã de DO estiver em modo de introdução ou alteração são eliminados todas as linhas do Docº * Se o ecrã de DO não estiver em modo de introdução ou alteração é colocado em modo de introdução If SDO.Adding or SDO.Editing Select ML Delete All sdo.refresh() Else return EndIf SDO.showsave() Select curgastos go top scan replace ML.CONTA with alltrim(curgastos.CONTA) replace ML.EDEB with curgastos.DEBITO replace ML.ECRE with curgastos.CREDITO replace ML.CCT with curgastos.CANALITICO replace ML.DESCRITIVO with curgastos.DESCRITIVO replace ML.ADOC with curgastos.NUMDOC do dotots with .t. sdo.refresh() endscan fecha("curgastos")
  4. Henrique Caçador

    Ajuda PHC

    Boa tarde, Será possível darem-me uma ajuda. Na ficha de clientes no phc o campo observação está limitado. A minha ideia é criar um campo observação2 onde se preenche com o texto pretendido, ao gravar vai atualizar o campo observação com o texto escrito no observação2 ate ao limite de careteres, se estes forem superiores ele escreve no inicio da frase para consultar a ficha de cliente se for inferior ele escreve o texto da observação2. Podem-me ajudar no código? PHC ADVANCED
  5. Boa tarde meus caros, Preciso uma vez mais da vossa preciosa ajuda, para importar artigos de um ficheiro excel. O objetivo seria importar para a tabela ST e STOBS Importar para ST consigo, mas não consigo para STOBS. O código que tenho é: m_file=Getfile("XLS","Ficheiro","Escolher",0,"Seleccione o Ficheiro a Importar") If Type("m_file")<>"C" Or Not File(m_file) Messagebox("Ficheiro Não Encontrado") Return Endif Create cursor PLANO (a c(100), b c(100), c c(100), d c(100), e c(100), f c(100), g c(100), h c(100), i c(100), j c(100), k c(100), l c(100), m c(100), n c(100), o c(100), p c(100), q c(100), r c(100), s c(100), t c(100), u c(100), v c(100), w c(100), x c(100), y c(100), z c(100), aa c(100), ab c(100), ac c(100), ad c(100), ae c(100)) set point to "." APPEND FROM (m_file) XLS select PLANO go top scan for alltrim(PLANO.a)<>'ref' select st select stobs TEXT TO msel NOSHOW insert into st (st.ststamp,st.ref,st.codigo,st.design,st.epcusto,st.pcusto,st.epv4,st.epv5,st.pv4,st.pv5,st.desc5,st.desc6,st.usr3,st.usr4,st.usr6,st.iva4incl,st.iva5incl,st.forref,st.fornecedor,st.usr2,st.usr1,st.tabiva,st.fornec,st.imagem,st.imgqlook,st.cpoc,st.containv,st.contacev,st.unidade) select ?alltrim(u_stamp()), ?alltrim(PLANO.a), ?alltrim(PLANO.b), ?alltrim(PLANO.c), ?val(PLANO.d), ?val(PLANO.e), ?val(PLANO.f), ?val(PLANO.g), ?val(PLANO.h), ?val(PLANO.i), ?alltrim(PLANO.j), ?alltrim(PLANO.k), ?alltrim(PLANO.l), ?alltrim(PLANO.m), ?alltrim(PLANO.n), ?val(PLANO.o), ?val(PLANO.p), ?alltrim(PLANO.q), ?alltrim(PLANO.r), ?alltrim(PLANO.s), ?alltrim(PLANO.t), ?val(PLANO.u), ?val(PLANO.v), ?alltrim(PLANO.w), ?alltrim(PLANO.x), ?val(PLANO.y), ?val(PLANO.z), ?val(PLANO.aa), ?alltrim(PLANO.ab); insert into stobs (stobs.stobsstamp,stobs.ref,stobs.tipoprod,stobs.tfcla,stobs.tfcladesc) select ?alltrim(u_stamp()), ?alltrim(PLANO.a), ?alltrim(PLANO.ac), ?alltrim(PLANO.ad), ?alltrim(PLANO.ae); ENDTEXT u_sqlexec(msel) endscan mensagem('Terminado...','directa') Agradecia a V/ ajuda . Muito obrigado!
  6. Conceição Martins

    Integração de CRM PHC

    Boa tarde. A empresa onde trabalho utiliza o ERP e o CRM PHC. Tenho um problema: o CRM do PHC não permite a integração com a plataforma de envio de comunicações (e-mails) que utilizo, que é o e-Goi. Será que é possível desenvolver uma integração entre as duas ferramentas? Se sim, gostaríamos de receber contactos/ propostas. Podem contactar-me através do e-mail conceicao.martins@infocontrol.pt. Obrigada
  7. asimas

    PHC: criar novo preço

    Bom dia a todos, Comecei agora nas andanças do PHC cá na empresa e foi-me pedido que criasse um novo preço P7 à semelhança do que foi feito (por um antigo funcionário) com o P6. O que acontece atualmente com o P6 é que no POS tem um botão "P6" que pede ao utilizador a referencia do produto e insere a linha já com o valor do P6. Sei que tenho que criar o campo de utilizador e adicioná-lo no desenho da ficha de produto, bem como replicar as teclas existentes do P6 para o P7. Até aí tudo bem, mas não encontro a secção onde terei de adicionar o tal botão que aciona a tecla. Suspeito que seja no POS Back > "Opções das zonas do Touch", mas não encontro nenhuma opção que se pareça com o botão do P6. Será que alguém me pode dar uma ajuda, assim como referir algo em falta ou implicação que possa existir que me poderá causar problemas futuros nos pagamentos/faturação? Isto para o PHC CS Advanced 21. Desde já, muito obrigado!
  8. Boa noite. Sou utilizador do PHC há mais de 10 anos e considero-o um excelente software, apesar das limitações já identificadas, mais concretamente, a incapacidade de importar ficheiros SAFT para a contabilidade. Com a introdução das taxonomias e a necessidade de, no próximo ano, submeter à apreciação da AT, o ficheiro SAFT da contabilidade, apenas pode haver um ficheiro SAFT. Acontece que, como contabilista que sou, assumi um novo cliente a 1 de Setembro de 2018, e o anterior colega passou-me o ficheiro SAFT com toda a contabilidade até 31/8/2018. Já tenho toda a informação em excel, pronta a ser importada. Não haverá possibilidade de fazer insert na tabela DO de todos os documentos contabilisticos, e na tabela ML de todas as linhas daqueles documentos, através da consola do SQL Server? Como fazê-lo e assegurar a equivalencia de stamps das tabelas DO e ML, por forma a assegurar a ligação entre ambos? Atentamente, Rui Costa
  9. soares chirrute

    PHC: Corporate V22

    Bom dia! Alguém pode me ajudar com seguinte questão: Não deixar gravar um registro de cliente se o número de caracteres do campo NUIT ( número de contribuinte) for inferior a 9 caracteres.
  10. Bom dia a todos. Comecei agora a programar o PHC cá da casa e tenho a seguinte necessidade: No modulo de assistências necessitava de criar no ecrã dos clientes um botão (ou uma tecla de utilizador) para abrir um novo pedido de assistência para esse cliente. Alguém me pode ajudar nesta tarefa? Obrigado.
  11. Ola a todos , Tenhos nos meus IDU, todos tem um logotipo ( imagem) , queria saber se é possivel fazer um link no logotipo para ir ao website. Se alguem ja conseguio fazer isto? exemplo: logotipo , quando carrego vai para o site www.teste.com.pt Obrigado, Jose
  12. Caros, Bom dia. tenho a seguinte duvida: Tenho um campo em PHC onde coloco manualmente o caminho completo de um determinado ficheiro. por exemplo: \\meu_server\docs\meu_doc.txt Pretendia agora criar um botão que ao clicar, abrisse o documento do diretorio acima. Conseguem ajudar? Obrigado.
  13. Olá a todos, Necessito de uma ajuda para quem possa disponibilizar tecla de utilizador para importar do excel V.97 ou superior para o PHC Corporate os documentos de faturação e de tesouraria. Obrigado, António
  14. Filipe Alves

    PHC - Controlo de acessos

    Ola. Tenho o PHC Corporate v22 e tenho andado a investigar como consigo definir controlo de acessos (sem ser controlo por área) da seguinte forma: Utilizador X apenas consegue aceder/visualizar os seus dossiers internos. Sei que no PHC Advanced existe "Filtros de Utilizador" e queria criar algo semelhante para o PHC Corporate. Alguma ideia de como o fazer ?
  15. Developer17

    SQL/PHC

    Boas pessoal. Estou com um nó e precisava de uma ajuda vossa. Estou a fazer uma query em sql para usar num desenvolvimento que estou a criar em PHC. A query é a seguinte: select ft.ftstamp, ft.nmdoc, ft.fno, ft.nome, ft.fdata, ft.estab, ft.etotal, (case when fi.bistamp<>'' then (select bi.bistamp, bi.obrano, bi.nmdos from fi inner join bi on fi.bistamp=bi.bistamp) end) from ft inner join fi on fi.ftstamp=ft.ftstamp where ft.fdata='20161228' com esta query dá-me o seguinte erro: Only one expression can be specified in the select list when the subquery is not introduced with EXISTS. O meu problema é o seguinte: Necessito de receber toda a informação pedida da tabela FT e, caso na tabela FI o campo bistamp esteja preenchido, ir buscar também à tabela BI 2 campos. E queria agrupar esta informação pelos dados da tabela FT.
  16. tiago.nunes9

    XBASE num botão PHC

    Boa tarde. Alguém me pode ajudar com uma programação em xbase? Eu tive de criar um botão que anule o documento. A tabela chama-se po e o botão u_anular. Obrigado
  17. Developer17

    PHC - xvars com decimal

    Boas. Criei uma tecla com um cursor xvars para pesquisar valores. Na caixa para inserir o valor aparece-me isto: 0.00 consoante se digito 152.96 ele não assume o ponto, tenho de digitar 152 e depois com o rato selecionar a área após o ponto para colocar os 96. Alguém me consegue dar uma ajuda?
  18. sinx

    Manual PHC xbase

    Boa noite ! Conseguem disponibilizar o manual do PHC ? Trabalho com o phc advanced (PHC18), mas qualquer manual seria bem vindo! refiro-me a manual das suas funções internas (xbase) ! Muito obrigado !
  19. sinx

    PHC - xbase - compras

    Boas ! Alguém que possa partilhar um pequeno snippet, para criar uma entrada nas compras a fornecedores ? Algo do genero ... doread('BO','SBO') do tsread with "",76 v_bibostamp='' requery('bi') v_bostamp='' requery('bo') select bo2 append blank select bo3 append blank select bo append blank replace bo.bostamp with u_stamp() replace bo2.bo2stamp with BO.BOSTAMP replace bo3.bo3stamp with BO.BOSTAMP replace bo2.armazem with 1 (...) mas para as tabelas FO, FN .. Não tenho acesso à biblioteca .. Obrigado !
  20. Bom dia, Criei um botão na página "Clientes" que permite Inactivar o cliente selecionado: dim stamp_ as string = mpage.request.querystring("stamp") dim stamp2 as string = XCFOX.U_SDECRYPT(stamp_) dim str_inact as string = "update cl set inactivo ='1' WHERE cl.clstamp='"+stamp2+"'" cdata.updatedata(str_inact) dim str_link as string = "../neg/clform.aspx" Mpage.response.redirect(str_link) gostaria de saber como posso fazer o cliente em questão desaparecer da pesquisa assim que é inactivado,pois este aparece na barra lateral de pesquisa, apenas indica que está inactivado ao clicar no mesmo. obrigado desde já Nuno Santos
  21. Viva! No sistema PHC em que trabalho temos criada uma tecla para fazer a exportação de facturas por EDI. Num caso especial, dum cliente específico, foi necessário acrescentar o prefixo PT ao número de contribuinte do dito cliente, coisa que se resolveu. Agora é necessário fazer a mesma coisa mas para o nosso campo de nif, da nossa empresa. Uma vez que a importação dos nossos dados é feita directamente da Ficha da Empresa (julgo!!!) como posso fazer para conseguir esse prefixo aparecer? Obrigado
  22. Olá preciso da vossa ajuda se faz favor quanto à criação de uma regra. Eis o problema em questão: Tenho dois grupos de utilizador: Chefe de vendas Corporate e chefe de vendas via expresso, mas apenas 1 utilizador no grupo de chefe de vendas corporate. Este utilizador só deve ver corporate. Nos dossiers e nos documentos de facturação já consegui filtrar pelos acessos dos grupos de utilizador, o problema reside para a tesouraria. Para este utilizador corporate pretendo que o PHC nas contas de tesouraria, não deixe gravar alterações nas outras contas especificadas e apenas para a sua. Existe uma conta corporate e só deve poder gravar nessa. Primeiro usei a tabela BL, mas depois cheguei a conclusão que a BA (Movimentos de Tesouraria) é melhor para o fim ou tenho que criar uma regra nas duas? Agora tenho um problema na tabela BA nao encontro na tabela o campo "Conta de Tesouraria" A minha duvida é também como é que a regra reconhece qual o utilizador que está logado no sistema, se é so para aquele? O PHC é o Advanced. fiz este código. select bl select ug local msel,msel2,msel3 msel=ug.nome msel2=bl.banco msel3=bl.conta scan if msel='Chefe de loja Corpor' if msel2=Caixa and msel3=Corporate return .t. else return .f. endif else if msel='Chefe de Loja Via Ex' if msel2=Caixa and msel3=Corporate return .f. else return .t. endif endif endif endscan Obrigado.
  23. Boas Tardes, Eu sou novo nestas coisas de sites e web´s. por isso tenho muitas duvidas. Será que e possível utilizar a BD do programa de facturação PHC no CMS para uma loja/site consulta de produtos. Tem que ter algum CMS especifico para isso. Obrigado por o vosso tempo agradeço uma resposta breve. Os melhor Comprimentos de um Programador.
  24. Boa tarde, Preciso de ajuda, este código funciona na consola de SQL update st set st.epcpond = (select (((ST2.STOCK- FN.QTT)*(ST2.EPCPOND))+(FO.EVALACRES+FN.ETILIQUIDO))/(ST2.STOCK) from fo (nolock), fn (nolock), ST as ST2(nolock) WHERE FO.ADOC=FN.ADOC AND FO.DOCNOME='V/Fatura' AND FN.REF <> ' ' AND FO.FOSTAMP = FN.FOSTAMP AND ST2.REF=FN.REF AND FO.FOSTAMP = 'ADM14123059639,549675320 ' AND ST.REF=FN.REF) where st.ref in (select fn.ref from fo (nolock),fn(nolock) WHERE FO.ADOC= FN.ADOC AND FO.DOCNOME='V/Fatura' AND FN.REF <> ' ' AND FO.FOSTAMP = FN.FOSTAMP AND FO.FOSTAMP = 'ADM14123059639,549675320 ') e não funciona na Framework - Eventos da PHC select FN sqlUpdPCP = "" sqlUpdPCP = sqlUpdPCP +"update st set st.epcpond = (select (((ST2.STOCK- FN.QTT)*(ST2.EPCPOND))+(FO.EVALACRES+FN.ETILIQUIDO))/(ST2.STOCK) from fo (nolock), fn (nolock), ST as ST2(nolock) " sqlUpdPCP = sqlUpdPCP +"WHERE FO.ADOC=FN.ADOC AND FO.DOCNOME='V/Fatura' AND FN.REF <> ' ' AND FO.FOSTAMP = FN.FOSTAMP AND ST2.REF=FN.REF AND FO.FOSTAMP = '"+ astr(FN.FOSTAMP) +"' AND ST.REF=FN.REF) " sqlUpdPCP = sqlUpdPCP +"where st.ref in (select fn.ref from fo (nolock),fn(nolock) WHERE FO.ADOC= FN.ADOC AND FO.DOCNOME='V/Fatura' " sqlUpdPCP = sqlUpdPCP +"AND FN.REF <> ' ' AND FO.FOSTAMP = FN.FOSTAMP AND FO.FOSTAMP = '"+ astr(FN.FOSTAMP) +"')" u_sqlexec(sqlUpdPCP,"tmpUpdST") messagebox (sqlUpdPCP,"tmpUpdST" ) fecha("tmpUpdST") Obrigada
  25. Bom dia a todos, Alguém sabe se, no software PHC, é possível o administrador do sistema entrar em modo alter ego para fazer testes em utilizadores específicos sem utilizar as suas passwords? Obrigado!
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.