Como: |
Linguagens Disponíveis: Reporting, Maintain
A função HSETPT insere o valor numérico de um componente especifico dentro de um valor do tio data-hora.
HSETPT(datetime, 'component', value, length, output)
onde:
Data-hora
É o valor data-hora a partir no qual o componente é inserido, o nome de um campo data-hora que contém o valor ou uma expressão que resulta no valor.
Alfanumérico
É o nome do componente a ser inserido entre aspas simples.
Inteiro
É o valor numérico a ser inserido para o componente solicitado, o nome de um campo numérico que contém o valor ou uma expressão que resulta no valor.
Inteiro
É o comprimento do valor data-hora retornado. Valores válidos são:
Data-hora
É o valor data-hora obtido do qual um componente selecionado é atualizado. Todos os outros componentes são copiados de um valor de data e hora fonte.
É o campo que contém o resultado ou o formato do valor de saída posto entre aspas simples. Este campo deve ter o formato data-hora (tipo de dados H).
HSETPT insere o dia como 28 no campo ADD_MONTH e armazena o resultado em INSERT_DAY:
TABLE FILE VIDEOTR2
PRINT CUSTID TRANSDATE AS 'DATE-TIME' AND COMPUTE
ADD_MONTH/HYYMDS = HADD(TRANSDATE, 'MONTH', 2, 8, 'HYYMDS');
INSERT_DAY/HYYMDS = HSETPT(ADD_MONTH, 'DAY', 28, 8, 'HYYMDS');
WHERE DATE EQ 2000;
END
A saída é:
CUSTID DATE-TIME ADD_MONTH INSERT_DAY ------ --------- --------- ---------- 1118 2000/06/26 05:45 2000/08/26 05:45:00 2000/08/28 05:45:00 1237 2000/02/05 03:30 2000/04/05 03:30:00 2000/04/28 03:30:00
HSETPT insere o dia em ADD_MONTH:
MAINTAIN FILE DATETIME
FOR 1 NEXT ID INTO STK;
COMPUTE
ADD_MONTH/HYYMDS = HADD(STK.DT1,'MONTH', 2, 8, ADD_MONTH);
INSERT_DAY/HYYMDS = HSETPT(ADD_MONTH,'DAY', 28, 8, INSERT_DAY);
TYPE "STK(1).DT1 = <STK(1).DT1";
TYPE "ADD_MONTH = <ADD_MONTH";
TYPE "INSERT_DAY = <INSERT_DAY";
END
Information Builders |