Corrette intestazioni

git-svn-id: svn://10.65.10.50/trunk@3277 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-07-29 16:52:26 +00:00
parent 0477c02861
commit 4359d28caf
2 changed files with 32 additions and 32 deletions

View File

@ -9,7 +9,7 @@ ENDPAGE
PAGE "Tabella condizioni di pagamento" -1 -1 78 15
BOOLEAN 909
BEGIN
BEGIN
PROMPT 0 0 ""
FLAGS "GH"
FIELD B1
@ -27,7 +27,7 @@ BEGIN
HELP "Codice condizione di pagamento"
FLAGS "U#"
FIELD CODTAB
USE %CPG KEY 1
USE %CPG KEY 1
INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
@ -36,14 +36,14 @@ BEGIN
CHECKTYPE REQUIRED
ADD NONE
KEY 1
END
END
STRING F_DESC 50
BEGIN
PROMPT 6 2 "Descrizione "
HELP "Descrizione condizione di pagamento"
FIELD S0
USE %CPG KEY 2
USE %CPG KEY 2
INPUT S0 F_DESC
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
@ -51,7 +51,7 @@ BEGIN
CHECKTYPE REQUIRED
KEY 2
ADD NONE
END
END
GROUPBOX DLG_NULL 71 7
BEGIN
@ -69,11 +69,11 @@ BEGIN
ITEM "F|Data fattura"
ITEM "M|Fine mese"
ITEM "I|Da impostare"
WARNING "La partenza del calcolo deve essere specificata"
FLAGS "U"
END
WARNING "La partenza del calcolo deve essere specificata"
FLAGS "U"
END
STRING F_TIPO_PRIMA_RATA 1
STRING F_TIPO_PRIMA_RATA 1
BEGIN
PROMPT 28 5 "Tipo prima rata "
HELP "Tipo di conteggio per la prima rata"
@ -88,7 +88,7 @@ BEGIN
ITEM "4|Solo imposte"
ITEM "5|Solo spese"
ITEM "6|Imposte + spese"
END
END
NUMBER F_NUM_RATE 3
@ -102,7 +102,7 @@ LIST F_RATE_DIFF 1 30
BEGIN
PROMPT 5 6 "Rate "
ITEM "1|Differenziate" MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "2|Uguali (obbligate dalla 2a)" MESSAGE "",909|ENABLE,F_NUM_RATE
ITEM "2|Uguali (obbligate dalla 2a)" MESSAGE "",909|ENABLE,F_NUM_RATE
ITEM "3|Uguali dalla prossima modif." MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "4|Uguali finche' possibile" MESSAGE "X",909|DISABLE,F_NUM_RATE
END
@ -118,15 +118,15 @@ END
LIST F_TIPO_RATA 1 29
BEGIN
PROMPT 5 7 "Tipo rata "
ITEM "1|Rimessa diretta o contanti"
ITEM "2|Tratta"
ITEM "1|Rimessa diretta o contanti"
ITEM "2|Tratta"
ITEM "3|Ricevuta bancaria"
ITEM "4|Cessione"
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interban. diretti"
ITEM "9|Bonifici"
ITEM "4|Cessione"
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interban. diretti"
ITEM "9|Bonifici"
FIELD S4
END
@ -135,13 +135,13 @@ BEGIN
PROMPT 57 7 "Ult. class. "
FLAGS "U"
USE %CLR
INPUT CODTAB[1,1] F_TIPO_RATA SELECT
INPUT CODTAB[1,1] F_TIPO_RATA SELECT
INPUT CODTAB[2,2] F_ULT_CLASS
DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Tipo pag." CODTAB[1,1]
DISPLAY "Class." CODTAB[2,2]
DISPLAY "Descrizione@50" S0
OUTPUT F_ULT_CLASS CODTAB[2,2]
CHECKTYPE NORMAL
CHECKTYPE NORMAL
FIELD S5
END
@ -149,7 +149,7 @@ NUMBER F_FIXSCAD_1 2
BEGIN
PROMPT 5 9 "Giorni scadenza fissi (1) "
FIELD I0
HELP "Giorno scadenza obbligato: prima alternativa"
HELP "Giorno scadenza obbligato: prima alternativa"
END
NUMBER F_FIXSCAD_2 2
@ -171,14 +171,14 @@ BEGIN
PROMPT 54 9 "Mese commerciale"
HELP "Indicare se si utilizza il mese commerciale (30 gg)"
FIELD B0
END
END
SPREADSHEET F_SHEET_RPG
BEGIN
PROMPT 0 11 ""
ITEM "N.ro giorni rata"
ITEM "Percentuale"
ITEM "Tipo@1"
ITEM "Tipo@1"
ITEM "Class.@1"
ITEM "Descrizione@50"
END
@ -205,7 +205,7 @@ BEGIN
PROMPT 4 5 "Tipo pagamento "
SHEET "Codice|Tipo pagamento@32"
INPUT 103
OUTPUT 103
OUTPUT 103
OUTPUT 105
ITEM "1|Rimessa diretta o contanti"
ITEM "2|Tratta"
@ -214,9 +214,9 @@ BEGIN
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interb. diretti"
ITEM "9|Bonifici"
END
ITEM "8|Rapporti interb. diretti"
ITEM "9|Bonifici"
END
STRING 104 1
BEGIN
@ -232,7 +232,7 @@ BEGIN
OUTPUT 105 S0
VALIDATE NOT_EMPTY_CHECK_FIELD
WARNING "Codice ulteriore classificazione errato"
CHECKTYPE NORMAL
CHECKTYPE NORMAL
END
STRING 105 50 28

View File

@ -43,7 +43,7 @@ BEGIN
USE %CLR
INPUT CODTAB[1,1] F_CODICERATA
INPUT CODTAB[2,2] F_CODICEALFA
DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Tipo pag." CODTAB[1,1]
DISPLAY "Class." CODTAB[2,2]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODICERATA CODTAB[1,1]
@ -60,7 +60,7 @@ BEGIN
USE %CLR KEY 2
INPUT S0 F_DESCR
DISPLAY "Descrizione@50" S0
DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Tipo pag." CODTAB[1,1]
DISPLAY "Class." CODTAB[2,2]
OUTPUT F_CODICERATA CODTAB[1,1]
OUTPUT F_CODICEALFA CODTAB[2,2]