Olá,
Você não pode passar uma tabela interna para uma sub-rotina através de um script, só pode passar campos necessários.
Espero que você saiba o formato de chamada de uma sub-rotina:
Por exemplo, se você precisar adicionar o preço unitário (KOMVD-KBERT), então na janela principal onde esse valor é coletado, escreva esta rotina
/: DEFINE &TOT_PRICE&
/: PERFORM F_GET_PRICE NO PROGRAMA <nome do programa da sub-rotina> /:USING &KOMVD-KBERT& /:CHANGING &TOT_PRICE& /:ENDPERFORM
Em seguida, escreva a variável onde deseja que seja impressa (geralmente será na janela do rodapé)
Em seguida, crie um programa de sub-rotina pool e você terá que escrever o código.
FORM F_GET_PRICE tables int_cond structure itcsy
outt_cond structure itcsy.
data : value type kbert.
statics value1 type kbert.
Leia a tabela int_cond no Índice 1.
value = int_cond-value.
value1 = value1 + value.
Leia a tabela outt_cond no Índice 1.
outt_cond-value = value1.
Modifique outt_cond no Índice 1.
ENDFORM.
Saudações,
Narendra.
°Recompensa se foi útil!