General information
Category:
Coding, syntax & commands
Title:
Multiuser and grids
Is this a solution with muliusers and grid.
To avoid conflict in updates??
PUBLIC mindbf,mindbf1,mindbf2
=RAND(-1)
mindbf='per'+ALLTRIM(STR(RAND()*1000))
mindbf1='per'+ALLTRIM(STR(RAND()*1000))
mindbf2='per'+ALLTRIM(STR(RAND()*1000))
SELECT *;
FROM hovedlønn;
INTO TABLE &mindbf
SELECT =mindbf
APPEND FROM korrdag
SELECT ansnavn,ansattnumm,avdeling,job,;
dato1,skift,lønnsartna,;
lønnsartnu,;
SUM(Timer) AS Timer;
FROM &mindbf;
GROUP BY ansattnumm,dato1,avdeling,job,lønnsartnu;
ORDER BY ansattnumm,dato1,avdeling,job,lønnsartnu;
INTO TABLE &mindbf1
INDEX ON ansnavn TAG ansnavn
SET ORDER TO ansnavn
GO TOP
IF THISFORM.ans.value="*"
THISFORM.Grid1.RecordSource=mindbf1
ELSE
THISFORM.Grid1.RecordSource=mindbf2
ENDIF
SELECT *;
FROM &mindbf1;
WHERE VAL(THISFORM.ans.value)=ansattnumm;
INTO TABLE &mindbf2
THISFORM.Grid1.ColumnCount=9
THISFORM.Grid1.FontSize=8
......
Best regards
Per Simmersholm
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only