COntrollo segni runtime

git-svn-id: svn://10.65.10.50/trunk@4901 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-07-24 13:28:16 +00:00
parent 75ec45b9a0
commit 723a3dbb7d

View File

@ -122,22 +122,17 @@ BEGIN
END
NUMBER F_SUMSIGN 4 0
BEGIN
PROMPT 2 19 "Controllo segni "
FLAGS "DG"
END
LISTBOX F_SGNGIAC 1
BEGIN
PROMPT 2 10 "Movimentazione giacenza "
FIELD S2[1,2]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END
@ -146,11 +141,11 @@ BEGIN
PROMPT 2 11 " '' '' rim.iniz. "
FIELD S2[23,24]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -159,11 +154,11 @@ BEGIN
PROMPT 2 12 " '' '' acquistato "
FIELD S2[3,4]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -172,11 +167,11 @@ BEGIN
PROMPT 42 12 "Movimentazione venduto "
FIELD S2[7,8]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -185,11 +180,11 @@ BEGIN
PROMPT 2 13 " '' '' entrato "
FIELD S2[5,6]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -198,11 +193,11 @@ BEGIN
PROMPT 42 13 " '' '' uscito "
FIELD S2[9,10]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -212,11 +207,11 @@ BEGIN
PROMPT 2 14 " '' '' ord. forn. "
FIELD S2[13,14]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -225,23 +220,24 @@ BEGIN
PROMPT 42 14 " '' '' ord. cli. "
FIELD S2[11,12]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
LISTBOX F_SGNSCAR 1
BEGIN
PROMPT 2 15 " '' '' scarti "
FIELD S2[25,26]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNVAL
END
@ -250,11 +246,11 @@ BEGIN
PROMPT 2 16 " '' '' prod. fin. "
FIELD S2[21,22]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END
@ -263,11 +259,11 @@ BEGIN
PROMPT 42 16 " '' '' prod.comp. "
FIELD S2[19,20]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END
@ -276,11 +272,11 @@ BEGIN
PROMPT 2 17 " '' '' a conto l. "
FIELD S2[17,18]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END
@ -289,11 +285,11 @@ BEGIN
PROMPT 42 17 " '' '' in conto l."
FIELD S2[15,16]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END
@ -302,11 +298,11 @@ BEGIN
PROMPT 2 18 " '' '' etichette "
FIELD S2[27,28]
ITEM "0| "
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "+1|+"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
ITEM "-1|-"
MESSAGE K_TAB,F_SUMSIGN
MESSAGE CHECK,F_SUMSIGN
GROUP G_SGNQTA
END