Histórico da Página
EICA130
...
Cadastro de NCM
Produto: | Easy Import Control | |||||||
Versões: | Versão 12 | |||||||
Ocorrência: | Esta rotina possibilita a inclusão/alteração/exclusão de NCM, no Cadastro de NCM de forma automática. | |||||||
Sistemas Operacionais: | Todos | |||||||
Compatível às Bases de Dados: | Todos | |||||||
Idiomas: | Português (Brasil) | |||||||
Exemplo: | O exemplo, | demostra demonstra a inclusão, alteração e exclusão de um | produto NCM através da utilização da rotina automática. |
Local aRotAuto := {} aAdd(aRotAuto, {"YD_TEC", "11223344", Nil}) aAdd(aRotAuto, {"YD_UNID", "DM", Nil}) aAdd(aRotAuto, {"YD_PER_II", 1, Nil}) aAdd(aRotAuto, {"YD_PER_IPI", 2, Nil}) aAdd(aRotAuto, {"YD_ICMS_RE", 3, Nil}) aAdd(aRotAuto, {"YD_PER_PIS", 4, Nil}) aAdd(aRotAuto, {"YD_VLU_PIS", 5, Nil}) aAdd(aRotAuto, {"YD_RED_PIS", 6, Nil}) aAdd(aRotAuto, {"YD_PER_COF", 7, Nil}) aAdd(aRotAuto, {"YD_VLU_COF", 8, Nil}) aAdd(aRotAuto, {"YD_RED_COF", 9, Nil}) aAdd(aRotAuto, {"YD_ICMS_PC", 10, Nil}) aAdd(aRotAuto, {"YD_MAJ_COF", 11, Nil}) aAdd(aRotAuto, {"YD_MAJ_PIS", 12, Nil}) aAdd(aRotAuto, {"YD_PER_IE", 13, Nil}) Private lMsErroAuto := .F. MSExecAuto({|x,y| EICA130(x, y)}, aRotAuto, 3) If lMsErroAuto Mostraerro() EndIf |
Local aRotAuto := {} aAdd(aRotAuto, {"YD_FILIAL", xFilial("SYD"), Nil}) aAdd(aRotAuto, {"YD_TEC", "28112210", Nil}) aAdd(aRotAuto, {"YD_UNID", "AR", Nil}) Private lMsErroAuto := .F. MSExecAuto({|x,y| EICA130(x, y)}, aRotAuto, 4) If lMsErroAuto Mostraerro() EndIf | --------------------------------------------------
Local aRotAuto := {} aAdd(aRotAuto, {"YD_FILIAL", xFilial("SYD"), Nil}) aAdd(aRotAuto, {"YD_TEC", "11222222", Nil}) aAdd(aRotAuto, {"YD_EX_NCM", "3", Nil}) Private lMsErroAuto := .F. MSExecAuto({|x,y| EICA130(x, y)}, aRotAuto, 5) If lMsErroAuto Mostraerro() EndIf | Observações: |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas