campo-sirio/ve/vetbcvm.uml

#include "vetbcvm.h"

TOOLBAR "Toolbar" 0 0 0 2
#include <relapbar.h>
ENDPAGE

PAGE "Conti di vendita per categoria e gruppo" 0 2 0 0

GROUPBOX DLG_NULL 78 3
BEGIN
  PROMPT 1 0 "@bCategoria di vendita"
END

STRING F_CVM_COD 2
BEGIN
  PROMPT 2 1 "Codice "
  USE CVE
  INPUT CODTAB F_CVM_COD
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_CVM_COD CODTAB
  OUTPUT F_CVM_DES S0
  CHECKTYPE REQUIRED
  KEY 1
END

STRING F_CVM_DES 50
BEGIN
  PROMPT 16 1 ""
  USE CVE KEY 2
  INPUT S0 F_CVM_DES
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice" CODTAB
  COPY OUTPUT F_CVM_COD
  CHECKTYPE NORMAL
  KEY 1
END

TEXT DLG_NULL
BEGIN
  PROMPT 1 3 "@bGruppi merceologici"
END

SPREADSHEET F_CVM_SHT
BEGIN
  PROMPT 0 4 ""
  ITEM "Gruppo\nMerc."
  ITEM "Descrizione\nGruppo merceologico@50"
  ITEM "Gruppo\nCont."
  ITEM "Conto\nCont."
  ITEM "Sottoconto\nCont."
  ITEM "Descrizione\nConto contabile@50"
END

ENDPAGE

ENDMASK

PAGE "Conto" -1 -1 60 6

GROUPBOX DLG_NULL 58 3
BEGIN
  PROMPT 1 1 "Gruppo Merceologico"
END

STRING F_CVM_CODGM 5
BEGIN
  PROMPT 2 2 "Codice "
END

STRING F_CVM_DESGM 50
BEGIN
  PROMPT 12 2 ""
END

GROUPBOX DLG_NULL 58 4
BEGIN
  PROMPT 1 4 "Conto contabile"
END

NUMBER F_CVM_GRUPPO 3
BEGIN
  PROMPT 2 5 "Gruppo "
END

NUMBER F_CVM_CONTO 3
BEGIN
  PROMPT 16 5 "Conto      "
END

NUMBER F_CVM_SOTTOCONTO 6
BEGIN
  PROMPT 30 5 "Sottoconto "
  USE LF_PCON
  INPUT GRUPPO F_CVM_GRUPPO
  INPUT CONTO F_CVM_CONTO
  INPUT SOTTOCONTO F_CVM_SOTTOCONTO
END

STRING F_CVM_DESCONTO 50
BEGIN
  PROMPT 1 6 "Descrizione"
END

ENDPAGE

ENDMASK