Files correlati : tc1.exe Ricompilazione Demo : [ ] Commento : Trasferimento a Zucchetti git-svn-id: svn://10.65.10.50/trunk@19931 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			154 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			154 lines
		
	
	
		
			2.0 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "tc1100a.h"
 | 
						|
 | 
						|
TOOLBAR "topbar" 0 0 0 2
 | 
						|
 | 
						|
BUTTON DLG_ELABORA 10 2
 | 
						|
BEGIN
 | 
						|
  PROMPT -12 -11 "~Elabora"
 | 
						|
  PICTURE BMP_ELABORA
 | 
						|
  MESSAGE EXIT,K_ENTER
 | 
						|
END
 | 
						|
 | 
						|
#include <helpbar.h>
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
TOOLBAR "" 0 -2 0 2
 | 
						|
 | 
						|
STRING DLG_PROFILE 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 9 0 "Profilo "
 | 
						|
  PSELECT
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
PAGE "Invio dati contabilita' a Zucchetti" 0 2 0 0
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 76 3
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 1 "@bDitta corrente"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_CODDITTA 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 2 "Codice      "
 | 
						|
  FLAGS "FD"
 | 
						|
  USE LF_NDITTE
 | 
						|
  INPUT CODDITTA F_CODDITTA
 | 
						|
  OUTPUT F_RAGSOC RAGSOC
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
END
 | 
						|
 | 
						|
STRING F_RAGSOC 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 23 2 ""
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
GROUPBOX DLG_NULL 76 6
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 4 "Dati da inviare"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_CAUSALI
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 5 "Causali"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_CONTI
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 6 "Conti"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_CLIFOR
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 7 "Clienti/Fornitori"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_MOVCONT
 | 
						|
BEGIN
 | 
						|
  PROMPT 3 8 "Movimenti contabili"
 | 
						|
  MESSAGE TRUE,ENABLE F_DATAFIN
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_MOVIVA
 | 
						|
BEGIN
 | 
						|
  PROMPT 40 5 "Movimenti IVA"
 | 
						|
  MESSAGE TRUE,ENABLE F_DATAFIN
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_CORRISP
 | 
						|
BEGIN
 | 
						|
  PROMPT 40 6 "Corrispettivi"
 | 
						|
  MESSAGE TRUE,ENABLE F_DATAFIN
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_SALDACONTO
 | 
						|
BEGIN
 | 
						|
  PROMPT 40 7 "Saldaconto"
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
LISTBOX F_TIPOINVIO 20
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 10 "Invio a      "
 | 
						|
  ITEM "Z|Zucchetti"
 | 
						|
END
 | 
						|
 | 
						|
STRING F_DESTINAZIONE 20
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 11 "Destinazione "
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_TRCAU
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 12 "Trascodifica causali"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_TRCON
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 13 "Trascodifica conti"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_TRIVA
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 14 "Trascodifica codici IVA"
 | 
						|
END
 | 
						|
 | 
						|
BOOLEAN F_TRBAN
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 15 "Trascodifica banche"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_NUMEROINVIO 2
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 16 "Numero invio "
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATAINI
 | 
						|
BEGIN
 | 
						|
  PROMPT 20 16 "Data iniz. "
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATAFIN
 | 
						|
BEGIN
 | 
						|
  PROMPT 44 16 "Data fin. "
 | 
						|
END
 | 
						|
 | 
						|
BUTTON F_RIPRISTINA 20
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 18 "Annulla invio"
 | 
						|
  MESSAGE SHOW,F_DATARIPRISTINO|ENABLE,F_DATARIPRISTINO
 | 
						|
END
 | 
						|
 | 
						|
DATE F_DATARIPRISTINO
 | 
						|
BEGIN
 | 
						|
  PROMPT 25 18 "Annulla invio fino al "
 | 
						|
  FLAGS "HD"
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
ENDMASK
 |