Files correlati : Ricompilazione Demo : [ ] Commento : 0000884: ba3 -1 reg stampa registri - espone tutto l'archivio e non l'esercizio indicato Descrizione Stampa registri - Indicando un esercizio la stampa è esposta su tutto il contenuto - inoltre non apre l'archivio dei report , sia con F9 che cliccando la freccia . git-svn-id: svn://10.65.10.50/trunk@17232 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			49 lines
		
	
	
		
			708 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			49 lines
		
	
	
		
			708 B
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
#include "ba3200.h" 
 | 
						|
 | 
						|
PAGE "Stampa registri" -1 -1 74 6
 | 
						|
 | 
						|
NUMBER F_CODDITTA 5
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 1 "Ditta           "
 | 
						|
  FLAGS "FRD"
 | 
						|
  USE LF_NDITTE KEY 1  
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
  INPUT CODDITTA F_CODDITTA
 | 
						|
  DISPLAY "Codice" CODDITTA
 | 
						|
  DISPLAY "Ragione sociale @50" RAGSOC
 | 
						|
  OUTPUT F_CODDITTA CODDITTA
 | 
						|
  OUTPUT F_RAGSOC RAGSOC
 | 
						|
END
 | 
						|
 | 
						|
STRING F_RAGSOC 50
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 2 "Ragione sociale "
 | 
						|
  FLAGS "D"
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_INIZIO1 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 3 "Stampa i registri dell'anno  "
 | 
						|
  FLAGS "Z"
 | 
						|
  FIELD FROM
 | 
						|
  MESSAGE COPY, F_FINE1
 | 
						|
  CHECKTYPE REQUIRED
 | 
						|
  GROUP 1
 | 
						|
END
 | 
						|
 | 
						|
NUMBER F_FINE1 4
 | 
						|
BEGIN
 | 
						|
  PROMPT 2 4 ""
 | 
						|
  FLAGS "HZ"
 | 
						|
  FIELD TO
 | 
						|
  GROUP 2
 | 
						|
END
 | 
						|
 | 
						|
ENDPAGE
 | 
						|
 | 
						|
TOOLBAR "topbar" 0 0 0 2
 | 
						|
#include <printbar.h>
 | 
						|
ENDPAGE
 | 
						|
ENDMASK
 | 
						|
 |