Routine: ECXTRYIT

Information

ECXTRYIT ;BIR/DMA-Test Run for Setup Extract Print Population ;6/15/17 15:30

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option will print the admission data and data for the last",!,"transfer and treating specialty change for all patients who",!,"were in the hospital on the day you select.",!! Line Location: EN+2
Function Call: WRITE	Prompt: !!,"NOTE - This will generate a report of your inpatient population on the",!,"BEGINNING of the day you select, not the end of the day as MAS/HAS reports",! Line Location: EN+3
Function Call: WRITE	Prompt: "do. For example, for this report, if you choose October 1, 1994, the report",!,"will start at midnight at the beginning of the day." Line Location: EN+4
Function Call: WRITE	Prompt: " For the MAS/HAS report,",!,"you would choose September 30, 1994. The MAS/HAS report begins at midnight",!,"at the end of the day.",!!! Line Location: EN+5
Function Call: WRITE	Prompt: !!,"Must be a date in the past",!! Line Location: DATE+0
Function Call: WRITE	Prompt: !!,"This report must be queued to a 132 column printer.",! Line Location: DATE+1
Function Call: WRITE	Prompt: F Line Location: START+20
Function Call: WRITE	Prompt: Q:W="" Line Location: START+20
Function Call: WRITE	Prompt: !,?5,$P(NAM,"^"),?45,$P(EC,"^"),?66,$$FMTE^XLFDT($P(EC,"^",2)) Line Location: START+20
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HEAD+0
Function Call: WRITE	Prompt: !!,?30,"INPATIENT WARD LIST (DSS) FOR ",$$FMTE^XLFDT(ECD)," FOR WARD ",W,!!,?12,"PATIENT",?50,"SSN",?66,"ADMIT DATE",! Line Location: HEAD+0