root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Introdotto un rpad prima di un cat nelle variabili codice

Browse Source 
In questo modo si evitano messaggi di warning in debug


git-svn-id: svn://10.65.10.50/trunk@4983 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-07-30 13:40:12 +00:00
parent c60d03fbf9
commit 3ce702a635
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mg/mglib03.cpp
View File

@ -82,7 +82,7 @@ bool TForm_stampemg::validate(TForm_item &cf, TToken_string &s)
int lv=atoi(s.get()); int lv=atoi(s.get());
do { do {
valore=relation()->lfile(LF_ANAMAG).get("CODART"); valore=relation()->lfile(LF_ANAMAG).get("CODART");
valore.cut(_artlev->packed_lenght(lv)); valore.rpad(25).cut(_artlev->packed_lenght(lv));
} while (--lv>0 && valore==""); } while (--lv>0 && valore=="");
cf.set(valore); cf.set(valore);
@ -93,7 +93,7 @@ bool TForm_stampemg::validate(TForm_item &cf, TToken_string &s)
} }
if (subcode=="CODCATMER") { if (subcode=="CODCATMER") {
valore=relation()->lfile(LF_ANAMAG).get("GRMERC"); valore=relation()->lfile(LF_ANAMAG).get("GRMERC");
valore.cut(_sottocatmer ? 5:3); valore.rpad(5).cut(_sottocatmer ? 5:3);
cf.set(valore); cf.set(valore);
} }
if (subcode=="LIVELLIGIAC") { if (subcode=="LIVELLIGIAC") {