English
Español
LeListaOpr
Lê a Lista Operações, que é carregada na função BuscaOpr_OP_Roteiro.
Sintaxe: LeListaOpr(Numero Pos,Numero End FLis,Alfa End Ori,Numero End OP, Numero End Etg,Numero End SEtr,Numero End SRot,Numero End SSeq,Alfa End Cre,Numero End MovOpr,Numero End PegVer,Numero End DatAlt,Numero End TmpTot);
Parâmetros:
| Nome | Tipo | Descrição |
|---|---|---|
| Pos | Numero | Variável que deve conter a posição atual na lista de componentes . |
| Flis | Numero | Variável que indica se a lista está posicionada no final. |
| Ori | Alfa | Variável que retorna o código da origem. |
| OP | Numero | Variável que retorna o número da OP. |
| Etg | Numero | Variável que retorna o código do estágio. |
| SEtr | Numero | Variável que retorna a opção do estágio. |
| SRot | Numero | Variável que retorna a opção da seq. do roteiro do estágio. |
| SSeq | Numero | |
| Cre | Alfa | Variável que retorna o código do centro de recursos. |
| MovOpr | Numero | Variável que retorna se Movimenta ou não O.Ps. |
| PegVer | Numero | Variável , se o retorno for 'S' busca dados da tabela de versões do roteiro, senão busca das sequências do roteiro. |
| DatAlt | Numero | Variável que retorna a data de alteração da seq. do roteiro. |
| TmpTot | Numero | Variável que retorna o tempo total do recurso. |
Tipo de retorno:
- Ori: Variável alfanumérica que retorna o código da origem.
- OP: Variável numérica que retorna o número da OP.
- Etg: Variável numérica que retorna o código do estágio.
- SEtr: Variável numérica que retorna a opção do estágio.
- SRot: Variável numérica que retorna a opção da seq. do roteiro do estágio.
- Cre: Variável alfanumérica que retorna o código do centro de recursos.
- MovOpr: Variável numérica que retorna se Movimenta ou não O.Ps.
- PegVer: Variável numérica, se o retorno for 'S' busca dados da tabela de versões do roteiro, senão busca das sequências do roteiro.
- DatAlt: Variável numérica que retorna a data de alteração da seq. do roteiro.
- TmpTot: Variável numérica que retorna o tempo total do recurso.
Exemplo:
Definir Alfa VCodOri;
Definir Alfa VCodCre;
BuscaOpr_OP_Roteiro(VCodOri, VNumOrp,ECodCre,ETipRel,'S','N');
Enquanto (FimMemList = 0)
inicio
LeListaOpr(Pos,FimMemList,VCodOri,FNumOrp,VCodEtg,VSfxEtr,FSeqRot,VSfxSeq,VCodCre,VMovOpr,VPegVer,
VDatAlt,FTmpTpr);
Se (FimMemList = 0)
inicio
ListaSecao("Adicional_4");
ListaSecao("Adicional_Branco");
Pos = Pos + 1;
fim;
fim;
Utilização da Função (dependentes): Nenhum dependente.
English
Español
