campo-sirio/src/ef/ef0300b.uml

// DEFINIZIONE MASCHERE, PER RIGHE DISTINTA, PER LA GESTIONE DISTINTE
#include "ef0300.h"

PAGE "Righe Distinta"  -1 -1 73 14

BOOLEAN F_CHECK 
BEGIN        
  PROMPT 2 1 "Da eliminare     "
END

NUMBER F_NRIBA 7 
BEGIN               
  PROMPT 2 2 "Numero RiBa      "
  FIELD LF_EFFETTI->NPROGTR  
  FLAGS "D"
END

DATA F_SCAD
BEGIN          
  PROMPT 2 3 "Scadenza         "
  FIELD LF_EFFETTI->DATASCAD
  FLAGS "D"
END

STRING F_CLIENTE  50
BEGIN         
  PROMPT 2 4  "Cliente          "  
  FLAGS "D"
END              

STRING F_BANCA  50
BEGIN         
  PROMPT 2 5  "Banca d'appoggio "  
  FLAGS "D"
END              

NUMBER F_NFATT 7 
BEGIN               
  PROMPT 2 6 "Numero Fattura   "
  FIELD LF_REFFETTI->NFATT    
  FLAGS "D"
END

DATA F_DATAFATT
BEGIN          
  PROMPT 2 7 "Data Fattura     "
  FIELD LF_REFFETTI->DATAFATT
  FLAGS "D"
END

NUMBER F_NRATA  3 
BEGIN
  PROMPT 2 8 "Numero Rata      "
  FIELD LF_REFFETTI->NRATA
  FLAGS "D"
END

STRING F_VALUTA 3
BEGIN         
  PROMPT 2 9 "Valuta           "
  FIELD LF_EFFETTI->CODVAL
  FLAGS "D"
END

CURRENCY F_IMPORTO 18 
BEGIN         
  PROMPT 2 10 "Importo          "
  FIELD LF_EFFETTI->IMPORTO
  FLAGS "DR"
END

CURRENCY F_IMPORTOVAL 18
BEGIN         
  PROMPT 2 11 "Importo Valuta   "
  FIELD LF_EFFETTI->IMPORTOVAL
  FLAGS "DR"
  DRIVENBY F_VALUTA
END

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -13 -1 ""
END

BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT -23 -1 ""
END

BUTTON DLG_DELREC 10 2
BEGIN
  PROMPT -33 -1 ""
  MESSAGE "X",F_CHECK
END

ENDPAGE

ENDMASK