Errore MI4199

git-svn-id: svn://10.65.10.50/trunk@3664 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-09-26 09:47:05 +00:00
parent f60f242316
commit c23251e603

View File

@ -2,13 +2,6 @@
#include "batbban.h" #include "batbban.h"
TOOLBAR "" 0 18 0 3 TOOLBAR "" 0 18 0 3
/*
BUTTON DLG_NULL 8
BEGIN
PROMPT -16 -3 "~Delega"
MESSAGE RUN,ba2,-0,del#F_CODICEABI
END
*/
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
@ -36,21 +29,20 @@ BEGIN
PROMPT 28 1 "Codice CAB " PROMPT 28 1 "Codice CAB "
FIELD %BAN->CODTAB[6,10] FIELD %BAN->CODTAB[6,10]
FLAGS "Z" FLAGS "Z"
KEY 1 KEY 1
USE %BAN USE %BAN
INPUT CODTAB[1,5] F_CODICEABI INPUT CODTAB[1,5] F_CODICEABI
INPUT CODTAB[6,10] F_CODICECAB INPUT CODTAB[6,10] F_CODICECAB
DISPLAY "ABI@5" CODTAB[1,5] DISPLAY "ABI@5" CODTAB[1,5]
DISPLAY "CAB@5" CODTAB[6,10] DISPLAY "CAB@5" CODTAB[6,10]
DISPLAY "Dipendenza" I0 DISPLAY "Dipendenza" I0
DISPLAY "Denominazione@50" S0 DISPLAY "Denominazione@50" S0
OUTPUT F_CODICEABI CODTAB[1,5]
OUTPUT F_CODICECAB CODTAB[6,10] OUTPUT F_CODICECAB CODTAB[6,10]
OUTPUT F_DENOM S0 OUTPUT F_DENOM S0
OUTPUT H_DENOMABI S0 OUTPUT H_DENOMABI S0
OUTPUT F_CODICEABI CODTAB[1,5]
MESSAGE SHOW,F_ISTIT|SHOW,F_CODICEDIP|HIDE,H_DENOMABI|SHOW,F_DENOM MESSAGE SHOW,F_ISTIT|SHOW,F_CODICEDIP|HIDE,H_DENOMABI|SHOW,F_DENOM
MESSAGE EMPTY HIDE,F_ISTIT|HIDE,F_CODICEDIP|SHOW,H_DENOMABI|HIDE,F_DENOM MESSAGE EMPTY HIDE,F_ISTIT|HIDE,F_CODICEDIP|SHOW,H_DENOMABI|HIDE,F_DENOM
// VALIDATE AUTOEXIT_FUNC 2 F_CODICEABI F_CODICECAB
GROUP GR_SEARCH GROUP GR_SEARCH
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
@ -107,7 +99,6 @@ BEGIN
DISPLAY "CAB@5" CODTAB[6,10] DISPLAY "CAB@5" CODTAB[6,10]
DISPLAY "Dipendenza" I0 DISPLAY "Dipendenza" I0
COPY OUTPUT F_CODICECAB COPY OUTPUT F_CODICECAB
OUTPUT H_DENOMABI S0
MESSAGE K_TAB,F_CODICECAB MESSAGE K_TAB,F_CODICECAB
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
WARNING "Manca la denominazione dell'istituto" WARNING "Manca la denominazione dell'istituto"
@ -134,7 +125,7 @@ STRING F_COMUNE 4
BEGIN BEGIN
PROMPT 6 11 "Codice comune " PROMPT 6 11 "Codice comune "
FLAGS "U" FLAGS "U"
FIELD %BAN->S5 FIELD %BAN->S5
USE LF_COMUNI USE LF_COMUNI
INPUT STATO "" INPUT STATO ""
INPUT COM F_COMUNE INPUT COM F_COMUNE