Ponto-de-Entrada: PLS660TAB - Contém tabelas que podem ser copiadas para o novo subcontrato.
| Abrangências: | Advanced Protheus 7.10 |
| Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Português (Brasil) |
Descrição:
Esse Ponto de Entrada, contém tabelas que podem ser copiadas de um subcontrato para o outro.
Programa Fonte
PLSA660C
Sintaxe
PLS660TAB - Contém tabelas que podem ser copiadas para o novo subcontrato. ( [ aArray ] ) --> aArray
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| aArray | Array of Record | Contem as tabelas que para o tratamento entes de serem copiadas. |
Retorno
-
aArray(array_of_record)
- Contem as tabelas que serão copiadas.
Exemplos
User function PLS660TAB()Local aArray:=Paramixb[1]Local aBkaArray:={} Local i MsgInfo("Chamada do Ponto de Entrada PLS660TAB")For i:=1 to Len(aArray) If aArray[i,1]<>"BYA" Aadd(aBkaArray,aArray[i]) Endif Next i aArray:=Aclone(aBkaArray)Return(aArray)