MyTetra Share
Делитесь знаниями!
время в текствый формат
Время создания: 14.05.2019 07:15
Текстовые метки: TimePoint,List_hour_min_R]
Раздел: !Закладки - MSO - Access

--\\ время в текствый формат

t_Point: IIf([TimePoint]>#01.01.1900#;Format([TimePoint];"Краткий формат времени") & ":00";"")


d_Decl:CDATE(IIf(Format([TimeDecl];"hh:mm")<"06:45";Format([TimeDecl]-1;"DD.MM.YYYY");Format([TimeDecl];"DD.MM.YYYY")))

d_Decl: CDate(IIf(Format([TimeDecl];"Краткий формат времени")<"06:45";Format([TimeDecl]-1;"Краткий формат даты");Format([TimeDecl];"Краткий формат даты")))


--\\ Определить по какому расписанию считать

Id_R: IIf([1_PJI(SFP2)]![TimePoint]<CDate("04.02.2019 7:00:00") And [1_PJI(SFP2)]![TimePoint]>CDate("04.12.2017 7:00:00");"R";IIf(InStr(1;DatePart('ww';[1_PJI(SFP2)]![TimePoint];0;2)/2;",";0)=0;"R1";"R2"))


EQ:

IIf([1_PJI(SFP2)_pr]![Id_R]="R";[List_hour_min_R]![EQ];

IIf([1_PJI(SFP2)_pr]![Id_R]="R1";[List_hour_min_R]![EQR1];

IIf([1_PJI(SFP2)_pr]![Id_R]="R2";[List_hour_min_R]![EQR2];"-")))


Id_Hour:

IIf([1_PJI(SFP2)_pr]![Id_R]="R";[List_hour_min_R]![Id_Hour];

IIf([1_PJI(SFP2)_pr]![Id_R]="R1";[List_hour_min_R]![Id_Hour_R1];

IIf([1_PJI(SFP2)_pr]![Id_R]="R2";[List_hour_min_R]![Id_Hour_R2];"-")))


Lib_Hour:

IIf([1_PJI(SFP2)_pr]![Id_R]="R";[List_hour_min_R]![Lib_Hour];

IIf([1_PJI(SFP2)_pr]![Id_R]="R1";[List_hour_min_R]![Lib_hourR1];

IIf([1_PJI(SFP2)_pr]![Id_R]="R2";[List_hour_min_R]![Lib_hourR2];"-")))

Так же в этом разделе:
 
MyTetra Share v.0.53
Яндекс индекс цитирования