[RESOLVIDO] CPAPI012

Pessoal estou fazendo uma customização que utiliza a API CPAPI012, a mesma esta apresentando o seguinte erro:

O parametro identificador de temp-table tt-requis não confere com a temp-table destino tt-requis (5363).

Alguem tem a definição dessa tabela tt-requis. ?

At.

Boa tarde, Valdir.

Você pode pegar a temp-table do ".r". Basta abrir o programa ".r" e procurar por "temp-table" + "nome da temp-table". Exemplo de duas tabelas do cpapi012 uma com indice e outra sem.

TEMP-TABLE tt-requis 0,0 0 NO,tipo-trans integer 0 0,nr-ord-produ integer 1 0,quantidade decimal 2 0,data date 3 0,item-ini character 4 0,item-fim character 5 0,deposito-ini character 6 0,deposito-fim character 7 0,op-codigo-ini integer 8 0,op-codigo-fim integer 9 0,cod-localiz-ini character 10 0,cod-localiz-fim character 11 0,procura-saldos logical 12 0,carrega-reservas logical 13 0,prog-seg character 14 0,time-out integer 15 0,tentativas integer 16 0,cod-versao-integracao integer 17 0,nro-docto character 18 0,serie-docto character 19 0 TEMP-TABLE tt-aloca 1,nr-ord-produ,sequencia:seq 0 NO,selec logical 0 0,cod-estabel character 1 0,it-codigo character 2 0,nr-ord-produ integer 3 0,cod-depos character 4 0,cod-localiz character 5 0,lote-serie character 6 0,quant-aloc decimal 7 0,quant-calc decimal 8 0,qt-a-req decimal 9 0,cod-refer character 10 0,op-codigo integer 11 0,cod-roteiro character 12 0,item-pai character 13 0,un character 14 0,dt-vali-lote date 15 0,per-ppm decimal 16 0,tipo-formula integer 17 0,rw-aloca-reserva rowid 18 0,sequencia integer 19 0

Veja a temp-table tt-requis não tem indice definido já a tt-aloca se verificar tem um separador ":" para indice seq. Para montar os campos só verificar os separadores "," de campo e formato.

Separando a tabela tt-requis ficaria assim:

TEMP-TABLE tt-requis 0,
0 0 NO,
tipo-trans integer 0 0,
nr-ord-produ integer 1 0,
quantidade decimal 2 0,
data date 3 0,
item-ini character 4 0,
item-fim character 5 0,
deposito-ini character 6 0,
deposito-fim character 7 0,
op-codigo-ini integer 8 0,
op-codigo-fim integer 9 0,
cod-localiz-ini character 10 0,
cod-localiz-fim character 11 0,
procura-saldos logical 12 0,
carrega-reservas logical 13 0,
prog-seg character 14 0,
time-out integer 15 0,
tentativas integer 16 0,
cod-versao-integracao integer 17 0,
nro-docto character 18 0,
serie-docto character 19 0

Transformando em temp-table:

DEFINE TEMP-TABLE tt-requis NO-UNDO
FIELD tipo-trans AS INTEGER
FIELD nr-ord-produ AS INTEGER
FIELD quantidade AS DECIMAL
FIELD data AS DATE
FIELD item-ini AS CHARACTER
FIELD item-fim AS CHARACTER
FIELD deposito-ini AS CHARACTER
FIELD deposito-fim AS CHARACTER
FIELD op-codigo-ini AS INTEGER
FIELD op-codigo-fim AS INTEGER
FIELD cod-localiz-ini AS CHARACTER
FIELD cod-localiz-fim AS CHARACTER
FIELD procura-saldos AS LOGICAL
FIELD carrega-reservas AS LOGICAL
FIELD prog-seg AS CHARACTER
FIELD time-out AS INTEGER
FIELD tentativas AS INTEGER
FIELD cod-versao-integracao AS INTEGER
FIELD nro-docto AS CHARACTER
FIELD serie-docto AS CHARACTER.

Obs.: eu sempre faço assim e funciona bem, espero ter ajudado.

Também tive problemas com essa include.

Segue as duas que eu uso, e deram certo.

/******************************************************************************
**
** INCLUDE : CPAPI012.I
**
** OBJETIVO : Definir as temp-tables da API de Requis. de Materiais
**
******************************************************************************/

def temp-table tt-requis no-undo
field tipo-trans as integer init 1
field nr-ord-produ like ord-prod.nr-ord-produ
field quantidade as decimal
field data as date
field item-ini as char init " "
field item-fim as char init "ZZZZZZZZZZZZZZZZ"
field deposito-ini as char init " "
field deposito-fim as char init "ZZZ"
field op-codigo-ini as integer init 0
field op-codigo-fim as integer init 9999
field cod-localiz-ini as char init " "
field cod-localiz-fim as char init "ZZZZZZZZZZ"
field procura-saldos as logical
field carrega-reservas as logical init yes
field prog-seg as char
field time-out as integer init 30
field tentativas as integer init 10
field cod-versao-integracao as integer format "999"
field nro-docto like movto-mat.serie-docto
field serie-docto like movto-mat.nro-docto.







/****************************************************************************
**
** Include: CPAPI012.I1 - Defini‡Æo das Temp-Tables Internas
**
*****************************************************************************/

def temp-table tt-aloca
field selec as logical init yes format "*/ ":U
field cod-estabel like aloca-reserva.cod-estabel
field it-codigo like aloca-reserva.it-codigo
field nr-ord-produ like aloca-reserva.nr-ord-produ
field cod-depos like aloca-reserva.cod-depos
field cod-localiz like aloca-reserva.cod-localiz
field lote-serie like reservas.lote-serie
field quant-aloc like aloca-reserva.quant-aloc
field quant-calc like aloca-reserva.quant-aloc
field qt-a-req like aloca-reserva.quant-aloc
field cod-refer like saldo-estoq.cod-refer
field op-codigo like aloca-reserva.op-codigo
field cod-roteiro like aloca-reserva.cod-roteiro
field item-pai like aloca-reserva.item-pai
field un like reservas.un
field dt-vali-lote like saldo-estoq.dt-vali-lote
&IF DEFINED (bf_man_per_ppm) &THEN
field per-ppm like reservas.per-ppm
field tipo-formula like reservas.tipo-formula
&ENDIF
field rw-aloca-reserva as rowid
field sequencia as integer
index seq is primary unique nr-ord-produ sequencia
index aloca item-pai
cod-roteiro
op-codigo
it-codigo
cod-estabel
cod-depos
cod-localiz
lote-serie
index rowid-aloca-reserva rw-aloca-reserva.

def temp-table tt-reservas
field selec as logical init yes format "*/ "
field proporcao as decimal
field log-sem-saldo as logical
field nr-ord-produ like reservas.nr-ord-produ
field cod-refer like reservas.cod-refer
field it-codigo like reservas.it-codigo
field quant-orig like reservas.quant-orig
field quant-aloc like reservas.quant-orig
field quant-atend like reservas.quant-orig
field quant-calc like reservas.quant-orig
field quant-requis like reservas.quant-orig
field quant-requis-aloc like reservas.quant-orig
field cod-depos like reservas.cod-depos
field cod-localiz like reservas.cod-localiz
field lote-serie like reservas.lote-serie
field dt-vali-lote like saldo-estoq.dt-vali-lote
field dt-saida as date format "99/99/9999" init today
field un like reservas.un
field estado like reservas.estado
field tipo-sobra like reservas.tipo-sobra
field item-pai like reservas.item-pai
field op-codigo like reservas.op-codigo
field cod-roteiro like reservas.cod-roteiro
/*&IF DEFINED (bf_man_per_ppm) &THEN*/
field per-ppm like reservas.per-ppm
field tipo-formula like reservas.tipo-formula
field qt-atend-lote like reservas.qt-atend-lote
/*&ENDIF*/
field processada as logical
field rw-reserva as rowid
field rw-saldo-estoq as rowid
field rw-mov-orig as rowid
field tipo-ordem as integer
field tempo as integer
field tentativas as integer
field sequencia as integer
index seq is primary unique nr-ord-produ sequencia
index proc nr-ord-produ processada
index rw-reserva rw-reserva
index codigo nr-ord-produ quant-orig processada
index tempo nr-ord-produ quant-orig processada tempo tentativas
index idx nr-ord-produ item-pai it-codigo cod-roteiro op-codigo cod-depos cod-localiz
index item nr-ord-produ it-codigo.

Obrigado pessoal
Paininet - a Tabela tt-requis
Marco.luques precisei das tabelas tt-aloca e tt-reserva

Agora ta com erro da tt-movto-old , usada na api ceapi001j.i
Vcs tem a def ?

Grato