Sage X3 не может получить доступ к табличным значениям - PullRequest
Новая
       28

Sage X3 не может получить доступ к табличным значениям

0 голосов
/ 06 июня 2018

Привет, кто-нибудь может мне помочь в Sage X3.

Я создал новую таблицу (ZITEMECO) и новый экран (ZITF0) для использования внутри окна OITF, но у меня проблемы с чтением таблицы,похоже, что действие $ LIENS вообще не работает, что я делаю не так?

Вот код SPEITF: 

# Gestão da máscara ITF0 (Específico)

$ACTION
  Case ACTION
    When "OUVRE"      : Gosub OUVRE
    When "APRES_CRE"  : Gosub APRES_CRE
    When "APRES_MOD"  : Gosub APRES_MOD
    When "LIENS"      : Gosub LIENS
    When Default
  Endcase
Return

$OUVRE
  If clalev([F:ZITE]) : Local File ZITMECO[ZITE] : Endif
  Local File ZITMECO [ZITE]

Return

$APRES_CRE
  Gosub APRES_CRE_MOD
Return

$APRES_MOD
  Gosub APRES_CRE_MOD
Return

$APRES_CRE_MOD

  Local Integer LN_EXISTE
  LN_EXISTE=1
  Read [ZITE]ZITE0=[M:ITF0]ITMREF;[M:ITF0]STOFCY
  If fstat=0
   LN_EXISTE=2
  Else
   LN_EXISTE=1
  Endif

    Trbegin[F:ZITE]
          [F:ZITE]ITMREF=[M:ITF0]ITMREF
          [F:ZITE]STOFCY=[M:ITF0]STOFCY
          [F:ZITE]VIDRO=[M:ZITF0]VIDRO
          [F:ZITE]PLASTICO=[M:ZITF0]PLASTICO
          [F:ZITE]PAPEL=[M:ZITF0]PAPEL
          [F:ZITE]ECAL=[M:ZITF0]ECAL
          [F:ZITE]ACO=[M:ZITF0]ACO
          [F:ZITE]ALUM=[M:ZITF0]ALUM
          [F:ZITE]MADEIRA=[M:ZITF0]MADEIRA
          [F:ZITE]OUTROS=[M:ZITF0]OUTROS
   If LN_EXISTE=2

       Rewrite [F:ZITE]
   Else

       Write [F:ZITE]
   Endif
          If fstat=0
            Commit
          Else
            Rollback
          Endif

Return

$LIENS

  Filter [F:ZITE]
  Filter [F:ZITE] Where [F:ZITE]ITMREF=[M:ITF0]ITMREF and [F:ZITE]STOFCY=[M:ITF0]STOFCY

          [M:ZITF0]VIDRO=[F:ZITE]VIDRO
          [M:ZITF0]PLASTICO=[F:ZITE]PLASTICO
          [M:ZITF0]PAPEL=[F:ZITE]PAPEL
          [M:ZITF0]ECAL=[F:ZITE]ECAL
          [M:ZITF0]ACO=[F:ZITE]ACO
          [M:ZITF0]ALUM=[F:ZITE]ALUM
          [M:ZITF0]MADEIRA=[F:ZITE]MADEIRA
          [M:ZITF0]OUTROS=[F:ZITE]OUTROS

  Affzo [M:ZITF0]

Return

Если кто-то может мне помочь, я застрялв этом ... я могу записать значения в таблицу и изменить их, но я не могу их прочитать.

1 Ответ

0 голосов
/ 06 июня 2018

В вашем блоке $LIENS нет чтения.Заявление фильтра просто фильтр.Вы должны добавить для [F:ZITE] ... next или Read [F:ZITE] последний или первый или read [F:ZITE]ZITE0=[M:ITF0]ITMREF;[M:ITF0]STOFCY

...