cpc-bosauexportaesocial.p

• Rotina utilizada para imprimir o layout de importação A500exportar o e-social.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização

• Dentro do programa rc0512mbosauexportaesocial.p. quando p quando exporta o layout ref. ao A500 para insumos e procedimentos e-social. 

Ponto de Utilização

• "EXPORTAFINAL-DADOSENDERECO" => Rotina utilizada quando exporta o layout ref. ao A500 para insumos e procedimentos.Após buscar o endereço do prestador, permitindo manutenir o dado antes de envia-lo.

Include das definições das tabelas temporárias

• CPCcpc-RC0512nbosauexportaesocial.Ii

Tabelas de entrada e saída

Tabela de entrada tmpentrada tmp-cpc-rc0512mbosauesocial-entrada

def temp-table tmp-cpc-rc0512mbosauesocial-entrada no-undo

field in-evento-programa as char format "x(15)"
field nm-field nm-ponto-chamada-cpc cpc  as char format "x(15)"
field tipo-movimento as char format "x(1)"
field id-pessoa             like usuario.id-pessoa.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-rc0512m.p.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0512m.p:
• tipo-movimento - Tipo do Movimento (I - Insumo / P - Procedimento)
•  
• id-pessoa - Id da pessoa física sendo exportada.

Tabela de saída tmp-cpc-bosauesocialTabela de saída tmp-cpc-rc0512m-saida

def temp-table tmp-cpc-rc0512mbosauesocial-saida nosaida no-undo

field lgfield lg-undo-retry as log
field ds-mensagem as charmodif-end          as log
field ds-complemento        like endereco.ds-complemento
field ds-bairro             like endereco.ds-bairro
field cd-cep                like endereco.cd-cep
field ds-logradouro         as char
field nr-logradouro         as char
field cd-municipio          like dzcidade.int-3
field cd-uf                 like dzcidade.estado
field cd-tipo-logradouro    as char
field lg-undo-retry         as log
field ds-mensagem           as char.

Definição campo a campo da tabela de saída

• lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.Ds-mensagem – Mensagem de aviso ou modif-end - Indica se o endereço foi manutenido.
  ds-complemento - Complemento do endereço.
  ds-bairro - Bairro do endereço.
  cd-cep - CEP do endereço.
  ds-logradouro - Logradouro do endereço.
  nr-logradouro - Número do endereço.
  cd-municipio - Município do endereço.
  cd-uf - UF do endereço.
  cd-tipo-logradouro - Tipo de logradouro do endereço.
  lg-undo-retry - Informa ao programa se deve continuar ou voltar e desfazer.
  ds-mensagem - Mensagem de erro.