| 001 |
BA3_DESPLA |
SuBstr(BI3->BI3_DESCRI, 1, TamSx3("BA3_DESPLA")[1]) |
P |
BI3 |
xFilial("BI3") + M->BA3_CODINT + M->BA3_CODPLA + IIf(!Empty(M->BA3_VERSAO), M->BA3_VERSAO, "") |
|
| 002 |
BA3_TIPCON |
BI3->BI3_TIPCON |
P |
|
|
|
| 003 |
BA3_DESTCO |
Posicione("BII", 1, xFilial("BII") + M->BA3_TIPCON, "BII_DESCRI") |
P |
|
|
|
| 004 |
BA3_SEGPLA |
PL260MPAG('_CODSEG') |
P |
|
|
|
| 005 |
BA3_DESSEG |
Posicione("BI6", 1, xFilial("BI6") + M->BA3_SEGPLA, "BI6_DESCRI") |
P |
|
|
|
| 006 |
BA3_MODPAG |
PL260MPAG('_MODPAG') |
P |
|
|
|
| 007 |
BA3_APLEI |
PL260MPAG('_APOSRG') |
P |
|
|
|
| 008 |
BA3_ABRANG |
PL260MPAG('_ABRANG') |
P |
|
|
|
| 009 |
BA3_DESABR |
Posicione("BF7", 1, xFilial("BF7") + M->BA3_ABRANG, "BF7_DESORI") |
P |
|
|
|
| 010 |
BA3_CODACO |
PL260MPAG('_CODACO') |
P |
|
|
|
| 011 |
BA3_DESACO |
Posicione("BI4", 1, xFilial("BI4") + M->BA3_CODACO, "BI4_DESCRI") |
P |
|
|
|
| 012 |
BA3_VERSAO |
BI3->BI3_VERSAO |
P |
|
|
|
| 013 |
BA3_CODFID |
Iif(lJuridico, " ", BI3->BI3_CODFID) |
P |
|
|
|