phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Made Changes to align with new shift designations

Browse Source
This commit is contained in:
Infineon\Ouellette
2024-10-09 14:41:02 -07:00
committed by Ouellette Jonathan (CSC FI SPS MESLEO)
parent 9119e91998
commit 531504c6b0
5 changed files with 16812 additions and 2601 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
LSL2/STPROC/COMM_NCR_QUERY.txt
View File

@ -239,10 +239,10 @@ Ctrls := @WINDOW:'.STAGE_PRE':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.STAGE_POST':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.BY_MANUFACTURING':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.BY_CUSTOMER':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.TEAM1':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.TEAM2':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.TEAM3':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.TEAM4':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.CHK_TEAM_A':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.CHK_TEAM_B':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.CHK_TEAM_C':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.CHK_TEAM_D':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.REACTOR':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.CUST_NO':@RM ; Props := 'DEFPROP':@RM
Ctrls := @WINDOW:'.PROD_SPEC_NO':@RM ; Props := 'DEFPROP':@RM
@ -260,10 +260,10 @@ StagePre = Props[COL2()+1,@RM]
StagePost = Props[COL2()+1,@RM]
ByManufacturing = Props[COL2()+1,@RM]
ByCustomer = Props[COL2()+1,@RM]
Team1 = Props[COL2()+1,@RM]
Team2 = Props[COL2()+1,@RM]
Team3 = Props[COL2()+1,@RM]
Team4 = Props[COL2()+1,@RM]
TeamA = Props[COL2()+1,@RM]
TeamB = Props[COL2()+1,@RM]
TeamC = Props[COL2()+1,@RM]
TeamD = Props[COL2()+1,@RM]
Reactor = Props[COL2()+1,@RM]
CustNo = Props[COL2()+1,@RM]
PsnNo = Props[COL2()+1,@RM]
@ -312,10 +312,10 @@ IF CausedBy THEN SearchStr<-1> = 'LOSS_BY':@VM:CausedBy
Shifts = '' ;* * * * * * Teams (Shift)
IF Team1 THEN Shifts<1,-1> = '1'
IF Team2 THEN Shifts<1,-1> = '2'
IF Team3 THEN Shifts<1,-1> = '3'
IF Team4 THEN Shifts<1,-1> = '4'
IF TeamA THEN Shifts<1,-1> = 'A'
IF TeamB THEN Shifts<1,-1> = 'B'
IF TeamC THEN Shifts<1,-1> = 'C'
IF TeamD THEN Shifts<1,-1> = 'D'
IF Shifts NE '' THEN SearchStr<-1> = 'SHIFT':@VM:Shifts
@ -371,3 +371,4 @@ RETURN

3
LSL2/STPROC/COPY_NCR_RECORD_TO_SQL.txt
View File

@ -34,7 +34,7 @@ DataFields = "ENTRY_ID" :@VM:SQL_Format(Rec(NCR_ENTRY_ID$), "S
DataFields := "ENTRY_DATE" :@VM:SQL_Format(Rec(NCR_ENTRY_DATE$), "DATE"):@FM
DataFields := "ENTRY_TIME" :@VM:SQL_Format(Rec(NCR_ENTRY_TIME$), "TIME"):@FM
DataFields := "DEPT" :@VM:SQL_Format(Rec(NCR_DEPT$), "STR"):@FM
DataFields := "SHIFT" :@VM:SQL_Format(Rec(NCR_SHIFT$), "INT"):@FM
DataFields := "SHIFT" :@VM:SQL_Format(Rec(NCR_SHIFT$), "STR"):@FM
DataFields := "STATUS" :@VM:SQL_Format(NCR_Status, "STR"):@FM
DataFields := "LOSS_COMMENTS" :@VM:SQL_Format(Rec(NCR_LOSS_COMMENTS$), "STR", 1):@FM
DataFields := "AC_COMMENTS" :@VM:SQL_Format(Rec(NCR_AC_COMMENTS$), "STR", 1):@FM
@ -199,3 +199,4 @@ If Ans EQ "" AND PartNo NE "" then
end
Return Ans