Patch level : 10.0
Files correlati : cg0100a.msk Ricompilazione Demo : [ ] Commento : 0001450: 001639 - S. Maria degli Angeli Verificare problema su campi di 4° direttiva su piano dei conti contabile git-svn-id: svn://10.65.10.50/trunk@19315 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									2db3591554
								
							
						
					
					
						commit
						11a51e9564
					
				@ -19,9 +19,8 @@ BEGIN
 | 
			
		||||
  PROMPT 2 1 "Gruppo     "
 | 
			
		||||
  HELP "Codice del gruppo"
 | 
			
		||||
  FIELD GRUPPO
 | 
			
		||||
  FLAGS "R"
 | 
			
		||||
  KEY 1
 | 
			
		||||
  USE LF_PCON KEY 1 SELECT CONTO=""
 | 
			
		||||
  USE LF_PCON SELECT CONTO=""
 | 
			
		||||
  INPUT GRUPPO FLD_CM1_GRUPPO
 | 
			
		||||
  DISPLAY "Gruppo" GRUPPO
 | 
			
		||||
  DISPLAY "Descrizione@50" DESCR
 | 
			
		||||
@ -41,9 +40,8 @@ BEGIN
 | 
			
		||||
  PROMPT 2 2 "Conto      "
 | 
			
		||||
  HELP "Codice dell'eventuale conto"
 | 
			
		||||
  FIELD CONTO
 | 
			
		||||
  FLAGS "R"
 | 
			
		||||
  KEY 1
 | 
			
		||||
  USE LF_PCON KEY 1 SELECT ((CONTO!="")&&(SOTTOCONTO=""))
 | 
			
		||||
  USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO=""))
 | 
			
		||||
  COPY INPUT FLD_CM1_GRUPPO
 | 
			
		||||
  INPUT CONTO FLD_CM1_CONTO
 | 
			
		||||
  DISPLAY "Gruppo" GRUPPO
 | 
			
		||||
@ -69,7 +67,7 @@ BEGIN
 | 
			
		||||
  HELP "Codice dell'eventuale sottoconto"
 | 
			
		||||
  FIELD SOTTOCONTO
 | 
			
		||||
  KEY 1
 | 
			
		||||
  USE LF_PCON KEY 1 SELECT SOTTOCONTO!=""
 | 
			
		||||
  USE LF_PCON SELECT SOTTOCONTO!=""
 | 
			
		||||
  COPY INPUT FLD_CM1_CONTO
 | 
			
		||||
  INPUT SOTTOCONTO FLD_CM1_SOTTOCONTO
 | 
			
		||||
  DISPLAY "Gruppo" GRUPPO
 | 
			
		||||
@ -88,7 +86,7 @@ NUMBER FH_SOTTOCONTO 6
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 60 1 ""
 | 
			
		||||
  FLAGS "HG"
 | 
			
		||||
  USE LF_PCON KEY 1
 | 
			
		||||
  USE LF_PCON
 | 
			
		||||
  COPY INPUT FLD_CM1_SOTTOCONTO
 | 
			
		||||
  COPY DISPLAY FLD_CM1_SOTTOCONTO
 | 
			
		||||
  COPY OUTPUT FLD_CM1_SOTTOCONTO
 | 
			
		||||
@ -173,9 +171,9 @@ BEGIN
 | 
			
		||||
  GROUP 1 4
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_LETTIVD 1 1
 | 
			
		||||
STRING FLD_CM1_LETTIVD 1
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 51 7 ""
 | 
			
		||||
  PROMPT 49 7 ""
 | 
			
		||||
  HELP "Codice del conto secondo la IV direttiva CEE"
 | 
			
		||||
  FIELD LETTIVD
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
@ -184,30 +182,30 @@ END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_LETTIVDH 1
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 51 7 ""
 | 
			
		||||
  PROMPT 49 7 ""
 | 
			
		||||
  FLAGS "HDU"
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER FLD_CM1_NUMRIVD 8 4
 | 
			
		||||
NUMBER FLD_CM1_NUMRIVD 8 
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 55 7 ""
 | 
			
		||||
  PROMPT 51 7 ""
 | 
			
		||||
  HELP "Codice del conto secondo la IV direttiva CEE"
 | 
			
		||||
  FIELD NUMRIVD
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
  FLAGS "MZ"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER FLD_CM1_NUMRIVDH 8 4
 | 
			
		||||
NUMBER FLD_CM1_NUMRIVDH 8 
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 55 7 ""
 | 
			
		||||
  PROMPT 51 7 ""
 | 
			
		||||
  FLAGS "HDMZ"
 | 
			
		||||
  GROUP  1 5
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_NUMIVD 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 64 7 ""
 | 
			
		||||
  PROMPT 60 7 ""
 | 
			
		||||
  FIELD NUMIVD[1,2]
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
  USE %IVD
 | 
			
		||||
@ -231,9 +229,16 @@ BEGIN
 | 
			
		||||
  WARNING "Codice non presente"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_NUMIVDH 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 60 7 ""
 | 
			
		||||
  FLAGS "HD"
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
LIST F_SUB 2 9
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 69 7 ""
 | 
			
		||||
  PROMPT 65 7 ""
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
	ITEM "  |"
 | 
			
		||||
	ITEM "02|Bis"
 | 
			
		||||
@ -242,25 +247,11 @@ BEGIN
 | 
			
		||||
	ITEM "05|Quinquies"
 | 
			
		||||
	ITEM "06|Sexies"
 | 
			
		||||
  FIELD NUMIVD[3,4]
 | 
			
		||||
  KEY 1
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
LIST FLD_CM1_NUMIVDH 2 9
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 64 7 ""
 | 
			
		||||
  FLAGS "HD"
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
	ITEM "  |"
 | 
			
		||||
	ITEM "02|Bis"
 | 
			
		||||
	ITEM "03|Ter"
 | 
			
		||||
	ITEM "04|Quater"
 | 
			
		||||
	ITEM "05|Quinquies"
 | 
			
		||||
	ITEM "06|Sexies"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
LIST F_SUBH 2 9
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 69 7 ""
 | 
			
		||||
  PROMPT 65 7 ""
 | 
			
		||||
  GROUP 1 5
 | 
			
		||||
	ITEM "  |"
 | 
			
		||||
	ITEM "02|Bis"
 | 
			
		||||
@ -268,7 +259,6 @@ BEGIN
 | 
			
		||||
	ITEM "04|Quater"
 | 
			
		||||
	ITEM "05|Quinquies"
 | 
			
		||||
	ITEM "06|Sexies"
 | 
			
		||||
  KEY 1
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_DESCIVD 70 50
 | 
			
		||||
@ -311,7 +301,7 @@ END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_LETTIVDOPP 1
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 51 9 ""
 | 
			
		||||
  PROMPT 49 9 ""
 | 
			
		||||
  HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE"
 | 
			
		||||
  FIELD LETTIVDOPP
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
@ -320,7 +310,7 @@ END
 | 
			
		||||
 | 
			
		||||
NUMBER FLD_CM1_NUMRIVDOPP 8 4
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 55 9 ""
 | 
			
		||||
  PROMPT 51 9 ""
 | 
			
		||||
  HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE"
 | 
			
		||||
  FIELD NUMRIVDOPP
 | 
			
		||||
  FLAGS "MZ"
 | 
			
		||||
@ -329,7 +319,7 @@ END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_NUMIVDOPP 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 64 9 ""
 | 
			
		||||
  PROMPT 60 9 ""
 | 
			
		||||
  HELP "Codice del conto di sezione opposta secondo la IV direttiva CEE"
 | 
			
		||||
  FIELD NUMIVDOPP[1,2]
 | 
			
		||||
  GROUP 1 2 4 7
 | 
			
		||||
@ -352,7 +342,7 @@ END
 | 
			
		||||
 | 
			
		||||
LIST F_SUBOPP 9
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 69 9 ""
 | 
			
		||||
  PROMPT 65 9 ""
 | 
			
		||||
  GROUP 1 2 4 7
 | 
			
		||||
	ITEM "  |"
 | 
			
		||||
	ITEM "02|Bis"
 | 
			
		||||
@ -361,7 +351,6 @@ BEGIN
 | 
			
		||||
	ITEM "05|Quinquies"
 | 
			
		||||
	ITEM "06|Sexies"
 | 
			
		||||
  FIELD NUMIVDOPP[3,4]
 | 
			
		||||
  KEY 1
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FLD_CM1_DESCIVDOPP 70 50
 | 
			
		||||
@ -483,7 +472,6 @@ BEGIN
 | 
			
		||||
  PROMPT 1 16 "Stampa dettaglio sottoconti su analisi"
 | 
			
		||||
  HELP "Indicare se stampare il dettaglio dei sottoconti nell'analisi di bilancio"
 | 
			
		||||
  FIELD STSOTTAB
 | 
			
		||||
//  FLAGS "H"
 | 
			
		||||
  GROUP 1 3
 | 
			
		||||
  MESSAGE COPY,FLD_CM2_STSOTTABS
 | 
			
		||||
END
 | 
			
		||||
@ -492,7 +480,6 @@ BOOLEAN FLD_CM2_STSOTTABS
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 1 16 "Stampa dettaglio movimenti su analisi  "
 | 
			
		||||
  FIELD STSOTTAB
 | 
			
		||||
//  FLAGS "H"
 | 
			
		||||
  GROUP 1 2
 | 
			
		||||
  MESSAGE COPY,FLD_CM2_STSOTTAB
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user