R/F4801.R

In ejneer/camdata: User Friendly Access to CAM Data Sources

#' Work Order Master File
#' 
#' F4801 - Work Order Master File 
#' 
#' @param db2_connection JDE Database Connection
#' @param friendly_names Flag to return human-readable column names.  Default TRUE.
#' @export
F4801 <- function(db2_connection, friendly_names = TRUE) {
    F4801 <- dplyr::tbl(db2_connection, dbplyr::in_schema('PRODDTA', 'F4801'))
        if (friendly_names) {
            F4801 <- F4801 %>% dplyr::select(
                `Order Type` = `WADCTO`,
                `Document (Order No Invoice etc.)` = `WADOCO`,
                `Order Suffix` = `WASFXO`,
                `Related PO/SO/WO Order Type` = `WARCTO`,
                `Related PO/SO/WO Number` = `WARORN`,
                `Line Number` = `WALNID`,
                `Peg to Work Order` = `WAPTWO`,
                `Number - Parent WO Number` = `WAPARS`,
                `Type - W.O.` = `WATYPS`,
                `Priority - W.O.` = `WAPRTS`,
                `Description` = `WADL01`,
                `Status - Comment` = `WASTCM`,
                `Company` = `WACO`,
                `Business Unit` = `WAMCU`,
                `Branch` = `WAMMCU`,
                `Location` = `WALOCN`,
                `Aisle` = `WAAISL`,
                `Bin` = `WABIN`,
                `Status Code W.O.` = `WASRST`,
                `Date - Status Changed` = `WADCG`,
                `Subsidiary` = `WASUB`,
                `Address Number` = `WAAN8`,
                `Address Number - Originator` = `WAANO`,
                `Address Number - Manager` = `WAANSA`,
                `Supervisor` = `WAANPA`,
                `Address Number - Assigned To` = `WAANP`,
                `Date - W.O. Planned Completed` = `WADPL`,
                `Address Number - Inspector` = `WAANT`,
                `Next Address Number` = `WANAN8`,
                `Date - Order/Transaction` = `WATRDJ`,
                `Date - Start (Julian)` = `WASTRT`,
                `Date - Requested` = `WADRQJ`,
                `Date - Completion (Julian)` = `WASTRX`,
                `Date - Assigned to` = `WADAP`,
                `Date - Assigned to Inspector` = `WADAT`,
                `Date - Paper Printed Date` = `WAPPDT`,
                `Categories - Work Order 01` = `WAWR01`,
                `Categories - Work Order 02` = `WAWR02`,
                `Categories - Work Order 03` = `WAWR03`,
                `Categories - Work Order 04` = `WAWR04`,
                `Categories - Work Order 05` = `WAWR05`,
                `EnterpriseOne Consulting - Status` = `WAWR06`,
                `EnterpriseOne Consulting - Service Type` = `WAWR07`,
                `EnterpriseOne Consulting - Skill Type` = `WAWR08`,
                `E1 Consulting - Experience Level` = `WAWR09`,
                `Categories - Work Order 10` = `WAWR10`,
                `Reference` = `WAVR01`,
                `Reference 2` = `WAVR02`,
                `Amount - Estimated` = `WAAMTO`,
                `Crew Size` = `WASETC`,
                `Revenue Rate Markup Override` = `WABRT`,
                `Pay/Deduction/Benefit Type` = `WAPAYT`,
                `Amount - Change to Original Dollars` = `WAAMTC`,
                `Hours - Estimated` = `WAHRSO`,
                `Hours - Change to Original Hours` = `WAHRSC`,
                `Amount - Actual` = `WAAMTA`,
                `Hours - Actual` = `WAHRSA`,
                `Item Number - Short` = `WAITM`,
                `3rd Item Number` = `WAAITM`,
                `2nd Item Number` = `WALITM`,
                `Asset Item Number` = `WANUMB`,
                `Unit or Tag Number` = `WAAPID`,
                `Units - Order/Transaction Quantity` = `WAUORG`,
                `Units - Qty Backordered/Held` = `WASOBK`,
                `Units - Quantity Canceled/Scrapped` = `WASOCN`,
                `Quantity Shipped` = `WASOQS`,
                `Units - Shipped to Date` = `WAQTYT`,
                `Unit of Measure as Input` = `WAUOM`,
                `Message Number` = `WASHNO`,
                `Time - Beginning (HH/MM/SS)` = `WAPBTM`,
                `Type Bill of Material` = `WATBM`,
                `Type of Routing` = `WATRT`,
                `WO Pick List Printed` = `WASHTY`,
                `Posting Edit` = `WAPEC`,
                `Variance Flag` = `WAPPFG`,
                `Bill of Material (N)` = `WABM`,
                `Route Sheet (N)` = `WARTG`,
                `Work Order Flash Message` = `WASPRT`,
                `Work Order Freeze Code` = `WAUNCD`,
                `Indented Code` = `WAINDC`,
                `Resequence Code` = `WARESC`,
                `Amount - Miles or Hours (units)` = `WAMOH`,
                `Date - Scheduled Tickler` = `WATDT`,
                `Amount - Memo Budget Changes` = `WAPOU`,
                `Percent Complete` = `WAPC`,
                `Leadtime Level` = `WALTLV`,
                `Leadtime Cumulative` = `WALTCM`,
                `Hours - Unaccounted Direct Labor` = `WACTS1`,
                `Lot/Serial Number` = `WALOTN`,
                `Lot Potency` = `WALOTP`,
                `Lot Grade` = `WALOTG`,
                `Ratio _ Critical Ratio Priority 1` = `WARAT1`,
                `Ratio - Critical Ratio Priority 2` = `WARAT2`,
                `Document Type` = `WADCT`,
                `Subledger Inactive Code` = `WASBLI`,
                `Company - Key (Related Order)` = `WARKCO`,
                `Bill Revision Level` = `WABREV`,
                `Routing Revision Level` = `WARREV`,
                `Drawing Change` = `WADRWC`,
                `Routing Change` = `WARTCH`,
                `New Part Number` = `WAPNRQ`,
                `Reason for ECO` = `WAREAS`,
                `Phase In` = `WAPHSE`,
                `Existing Disposition` = `WAXDSP`,
                `BOM Change` = `WABOMC`,
                `User Reserved Code` = `WAURCD`,
                `User Reserved Date` = `WAURDT`,
                `User Reserved Amount` = `WAURAT`,
                `User Reserved Number` = `WAURAB`,
                `User Reserved Reference` = `WAURRF`,
                `User ID` = `WAUSER`,
                `Program ID` = `WAPID`,
                `Work Station ID` = `WAJOBN`,
                `Date - Updated` = `WAUPMJ`,
                `Time of Day` = `WATDAY`,
                `Parent Number` = `WAAAID`,
                `Next Status - W.O.` = `WANTST`,
                `Criticality - Work Order` = `WAXRTO`,
                `Estimated Downtime Hours` = `WAESDN`,
                `Actual Downtime Hours` = `WAACDN`,
                `Service Address Number` = `WASAID`,
                `Meter Position` = `WAMPOS`,
                `Approval Type` = `WAAPRT`,
                `Amount - Estimated Labor` = `WAAMLC`,
                `Amount - Estimated Material` = `WAAMMC`,
                `Amount - Estimated Other` = `WAAMOT`,
                `Amount - Actual Labor` = `WALBAM`,
                `Amount - Actual Material` = `WAMTAM`
            )
        }
    return(F4801)
}