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

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