73 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			73 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "batbind.h"
 | 
						|
 | 
						|
TOOLBAR "" 0 18 0 3
 | 
						|
 | 
						|
#include <toolbar.h>
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Tabella studio per invio" -1 -1 78 18
 | 
						|
 | 
						|
STRING F_NOMEID 10
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 1 "Nome simbolico studio per trasferimenti "
 | 
						|
  FIELD %INS->CODTAB
 | 
						|
  FLAGS "ZU"
 | 
						|
  KEY 1     
 | 
						|
  USE %INS
 | 
						|
  INPUT CODTAB[1,10] F_NOMEID
 | 
						|
  DISPLAY "Nome simbolico" CODTAB
 | 
						|
  DISPLAY "Codice ditta inviante" I0
 | 
						|
  OUTPUT F_DITTAINV I0
 | 
						|
  OUTPUT F_NOMEID CODTAB
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 76 6
 | 
						|
BEGIN
 | 
						|
  PROMPT 1 3 "Eventuale ultimo invio non completato"  
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_DITTAINV 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 4 "ditta inviante "
 | 
						|
  FLAGS "G"
 | 
						|
  FIELD %INS->I0
 | 
						|
END
 | 
						|
 | 
						|
STRING F_RAGSOC 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 24 4 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_NUMULINV 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 6 "Numero invio   "
 | 
						|
  FLAGS "R"
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATAULIN 
 | 
						|
BEGIN
 | 
						|
  PROMPT 44 6 "Data ultimo invio   "
 | 
						|
END
 | 
						|
            
 | 
						|
STRING F_STATO 1
 | 
						|
BEGIN                        
 | 
						|
  PROMPT 2 7 "Stato invio    "
 | 
						|
END             
 | 
						|
 | 
						|
STRING F_USELAB 1
 | 
						|
BEGIN
 | 
						|
  PROMPT 20 7 ""
 | 
						|
END
 | 
						|
 | 
						|
STRING F_CHIAVE 15
 | 
						|
BEGIN
 | 
						|
  PROMPT 23 7 ""
 | 
						|
END
 | 
						|
                
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 |