Patch level : 12.00 1263
Files correlati : Commento : Aggiunto stato alla copia documento
This commit is contained in:
parent
7f416cbc7b
commit
c6f94af3f4
@ -228,6 +228,8 @@ void TCopydoc_app::main_loop()
|
||||
sf.items() == filtro.items())
|
||||
filtro.cut(0);
|
||||
|
||||
TString stato = m.get(F_TO_STATO);
|
||||
|
||||
TRelation rel(LF_DOC);
|
||||
TCursor cur(&rel, filtro, 1, &rec_from, &rec_to);
|
||||
|
||||
@ -286,6 +288,8 @@ void TCopydoc_app::main_loop()
|
||||
}
|
||||
}
|
||||
}
|
||||
if (stato.full())
|
||||
newdoc.put(DOC_STATO, stato);
|
||||
newdoc.write();
|
||||
}
|
||||
}
|
||||
|
@ -15,6 +15,7 @@
|
||||
#define F_TO_PROVV 303
|
||||
#define F_TO_DES 304
|
||||
#define F_TO_NDOC 305
|
||||
#define F_TO_STATO 306
|
||||
|
||||
#define F_TIPO_SEL 101
|
||||
#define F_TIPO_DOC 102
|
||||
|
@ -96,7 +96,18 @@ END
|
||||
|
||||
NUMBER F_TO_NDOC 6
|
||||
BEGIN
|
||||
PROMPT 30 6 "Numero "
|
||||
PROMPT 29 6 "Numero "
|
||||
END
|
||||
|
||||
STRING F_TO_STATO 1
|
||||
BEGIN
|
||||
PROMPT 45 6 "Stato "
|
||||
USE %STD
|
||||
INPUT CODTAB F_TO_STATO
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_TO_STATO CODTAB
|
||||
FLAG "U"
|
||||
END
|
||||
|
||||
LIST F_TO_PROVV 1 12
|
||||
|
Loading…
x
Reference in New Issue
Block a user