OOPSGUIF ;WIOFO/LLH-RPC routine for OSHA Log ;11/5/01
Source file <OOPSGUIF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OSHA(RESULTS,INPUT,CALL) | ; get the data
; Input: INPUT - contains 4 values, the START AND END DATE, ; STATION, and INCLUDE NAME ON REPORT. The Date of ; Occ (fld #4) is used to in/exclude claims from the ; report. If Include name = Y, then names are ; printed, else they will not,and if Station='ALL' ; then all claims are included, if not 'All', then ; only 1 station is included. ; CALL - Contains the calling menu. If caller = "U"nion ; name is excluded from printing. ; Output: RESULTS - the results array passes data back to the client. |
|
| NSTICK(RESULTS,INPUT,CALL) | ; NeedleStick Log get data logic
; Input: INPUT - contains 4 values, the START DATE, END DATE, ; STATION, and INCLUDE NAME ON REPORT. The Date of ; Occurrence (field #4) will be used to include/ ; exclude claims from the report. If the Include ; name is = Y then the names will be printed, if no ; they will not, and if the Station = 'ALL' then any ; claim will be include, if not 'All', but the ; station number then only 1 station is included. ; CALL - Contains the calling menu. This will be used ; to exclude the name from printing if the caller ; is 'U'nion. ; Output: RESULTS - the results array passes the data back to the ; client. |
|
| OCCDESC(IEN) | ;Get Occupation Description
|
|
| DSPUTE | ; Reason for Dispute Report - called from DSPUTE^OOPSGUIR
; code in DSPUTE^OOPSGUIF requires case to be a CA1 |
| RPC Name | Call Tags |
|---|---|
| OOPS GET OSHA DATA | OSHA |
| OOPS NEEDLESTICK LOG | NSTICK |
| FileNo | Call Tags |
|---|---|
| ^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |
