Solução/Implementação: | | X1_GRUPO | X1_ORDEM | X1_PERGUNT | X1_VARIAVL | X1_TIPO | X1_TAMANHO | X1_DECIMAL | X1_PRESEL | X1_GSC | X1_VALID | X1_VAR01 | X1_DEF01 | X1_CNT01 | X1_DEF02 | X1_F3 | X1_PYME | X1_GRPSXG | X1_HELP | X1_PICTURE | X1_IDFIL |
|---|
| GPE210A | 1 | Arquivo ? | MV_CH1 | C | 99 |
|
| G | fDir() | MV_PAR01 |
|
|
|
|
|
| .GPE210A01. |
|
| | GPE210A | 2 | Codigo? | MV_CH2 | C | 3 |
|
| G | NaoVazio() .And. ExistCpo('RFJ') | MV_PAR02 |
|
|
| RFJ |
|
| .GPE210A02. |
|
| | GPE210A | 3 | Sobrepoe ? | MV_CH3 | N | 1 |
| 1 | C |
| MV_PAR03 | SIM |
| Não |
|
|
| .GPE210A03. | @E 9 |
| | GPE210A | 4 | Situação? | MV_CH4 | C | 5 |
|
| G | fSituacao | MV_PAR04 |
| ADFT |
|
|
|
| .GPE210A04. |
|
| | GPE210A | 5 | Data de referencia ? | MV_CH5 | D | 8 |
|
| G |
| MV_PAR05 |
|
|
|
|
|
| .GPE210A5. |
|
| | GPE210B | 1 | Processo ? | MV_CH1 | C | 5 |
|
| G | NaoVazio() .and. Gp210SetVar('cProcesso',MV_PAR01) | MV_PAR01 |
|
|
| RCJ |
|
| .GPE210B1. |
|
| | GPE210B | 2 | Roteiro ? | MV_CH2 | C | 3 |
|
| G | NaoVazio() .and. Gp210SetVar('cRot',MV_PAR02) | MV_PAR02 |
|
|
| SRY |
|
| .GPE210B2. |
|
| | GPE210B | 3 | Periodo? | MV_CH3 | C | 6 |
|
| G |
| MV_PAR03 |
|
|
| RCH |
|
| .GPE210B3. |
|
| | GPE210B | 4 | Nro. Pagamento ? | MV_CH4 | C | 2 |
|
| G | Gp210Valid(MV_PAR01,MV_PAR02,MV_PAR03,MV_PAR04) | MV_PAR04 |
|
|
|
|
|
| .GPE210B4. |
|
| | GPE210B | 5 | Totaliza Lanþto ? | MV_CH5 | N | 1 |
| 1 | C |
| MV_PAR05 | Sim |
| Não |
|
|
| .GPE210B5. | @E 9 |
| | GPE210B | 6 | Demitidos p/ Lanc. Futuros ? | MV_CH6 | N | 1 |
| 2 | C |
| MV_PAR06 | Sim |
| Não |
|
|
| .GPE210B06. |
|
| | GPE210C | 1 | Tipo Lancam. ? | MV_CH1 | N | 1 |
|
| C | fGp210TpLanc(MV_PAR01) | MV_PAR01 | 1=Co-Particip. |
| 2=Reembolso |
|
|
| .GPE210C01. | @E 9 |
| | GPE210C | 2 | Compet Pagto ? | MV_CH2 | C | 6 |
|
| G | fGp210MAno(MV_PAR02) | MV_PAR02 |
|
|
|
|
|
| .GPE210C02. | @R 9999/99 |
|
| X1_GRUPO | X1_ORDEM | X1_PERGUNT | X1_VARIAVL | X1_TIPO | X1_TAMANHO | X1_DECIMAL | X1_PRESEL | X1_GSC | X1_VALID | X1_VAR01 | X1_DEF01 | X1_CNT01 | X1_DEF02 | X1_F3 | X1_PYME | X1_GRPSXG | X1_HELP | X1_PICTURE | X1_IDFIL |
|---|
| GP210AR1 | 01 | Arquivo ? | MV_CH1 | C | 99 |
|
| G | fDir() | MV_PAR01 |
|
|
|
|
|
| .GP210AR101. |
|
| | GP210AR1 | 02 | Codigo ? | MV_CH2 | C | 3 |
|
| G | NaoVazio() .AND. ExistCpo("RFJ") | MV_PAR02 |
|
|
| RFJ |
|
| .GP210AR102. |
|
| | GP210AR1 | 03 | Sobrepoe ? | MV_CH3 | N | 1 |
|
| C |
| MV_PAR03 | Sim |
| Não |
|
|
| .GP210AR103. | @E 9 |
| | GP210AR1 | 04 | Situação ? | MV_CH4 | C | 5 |
|
| G | fSituacao() | MV_PAR04 |
| ADFT |
|
|
|
| .GP210AR104. |
|
| | GP210BR1 | 01 | Processo ? | MV_CH1 | C | 5 |
|
| G | NaoVazio() .AND. GP210SetVar("cProcesso", MV_PAR01) | MV_PAR01 |
|
|
| RCJ |
|
| .GP210BR101. |
|
| | GP210BR1 | 02 | Procedimento de Calculo ? | MV_CH2 | C | 3 |
|
| G | NaoVazio() .AND. GP210SetVar("cRot", MV_PAR02) | MV_PAR02 |
|
|
| SRY |
|
| .GP210BR102. |
|
| | GP210BR1 | 03 | Periodo? | MV_CH3 | C | 6 |
|
| G |
| MV_PAR03 |
|
|
| RCH |
|
| .GP210BR103. |
|
| | GP210BR1 | 04 | Nro. Pagamento ? | MV_CH4 | C | 2 |
|
| G | GP210Valid(MV_PAR01, MV_PAR02, MV_PAR03, MV_PAR04) | MV_PAR04 |
|
|
|
|
|
| .GP210BR104. |
|
| | GP210BR1 | 05 | Totaliza Lancamento? | MV_CH5 | N | 1 |
| 1 | C |
| MV_PAR05 | Sim |
| Não |
|
|
| .GP210BR105. | @E 9 |
| | GP210BR1 | 06 | Demitidos p/ Lanc. Futuros ? | MV_CH6 | N | 1 |
| 2 | C |
| MV_PAR06 |
|
|
|
|
|
| .GP210BR106. |
|
|
|