(MS-DRG) Software - National Technical Information Service

More documents

Recommendations

Info

The layout of the system tape is shown in table 2–1.Table 2–1. MS-DRG system tape contentsFile File name LRECL BLKSIZE Description1 OBJLIB 80 27920 Object library2 TESTDB 960 27840 Test database3 SRCLIB 80 27920 Source library4 MDCDSC 80 27920 MDC titles5 DRGDSC3 80 27920 DRG titles (3-digit)6 DRGDSC4 85 27965 DRG titles (4-digit)7 EBC.DXTAB 112 27888 EBCDIC DXTAB8 EBC.SGTAB 208 27872 EBCDIC SGTAB9 EBC.DRGTAB 504 27720 EBCDIC DRGTAB10 EBC.CCPAIRS 9 27990 EBCDIC CC exclusionpairs3480 cartridge, No label2.4 Medicare Severity DRG Software Installation Guide 10/10
Copying the grouper program object library to diskThe system tape includes a program object library containing six programs,as listed in table 2–2.Table 2–2. Object library contentsProgramD280CND280GRD280RTD280CAD280UTDescriptionThe main control program (standard interface)The grouper programThe grouper tablesThe main control program (alternate interface)The grouper utility interfaceThe first three programs (D280CN, D280GR, D280RT) comprise themain grouper executor using the standard interface. SubstituteD280CA for D280CN (that is, use D280CA, D280GR, and D280RT)to compile the main grouper executor using the alternate (re-entrant,macro-free) interface. D280UT is a utility program that can serve asan interface if your input data meets specific criteria. Chapter 3 discussesthis program. Figure 2–1 shows the JCL necessary to copy theobject library to disk.// EXEC PGM=IEBUPDTE,PARM=NEW//SYSPRINT DD DUMMY//SYSIN DD DSN=OBJLIB,UNIT=TAPE,//VOL=(,RETAIN,SER=GRPXFR),//LABEL=(1,NL),DISP=OLD,//DCB=(RECFM=FB,LRECL=80,BLKSIZE=27920)//SYSUT2 DD DSN=GROUPER.OBJLIB,UNIT=DISK,//DISP=(NEW,CATLG,DELETE),//DCB=(LRECL=80,BLKSIZE=27920,RECFM=FB),//SPACE=(CYL,(4,1,5),RLSE)Figure 2–1. Sample JCL for copying grouper object library to diskAll of the programs contained on the system tape were written inIBM Basic Assembler. There may be some reprogramming involvedfor those installations that do not have IBM equipment. The sourcecode for each of the programs is provided on the system tape (seetable 2–1).10/10Installing the MS-DRG Software 2.5
Page 1 and 2: For z/OS BatchMedicare Severity Dia
Page 3 and 4: PrefaceTHIS MANUAL CONTAINS the inf
Page 5 and 6: ContentsChapter 1 Introduction 1.3G
Page 7 and 8: FiguresFigureTitle and page2-1 Samp
Page 9 and 10: TablesTableTitle and page1-1 Requir
Page 11 and 12: Chapter 11Introduction
Page 13 and 14: Chapter 1IntroductionTHIS MANUAL PR
Page 15 and 16: Table 1-1. Required data formatsNam
Page 17 and 18: Table 1-2. Information returned by
Page 19 and 20: Table 1-5. Diagnosis flags returned
Page 21 and 22: Ancillary bufferThe version number
Page 23 and 24: Chapter 22Installing the MS-DRG Sof
Page 25: Chapter 2Installing the MS-DRG Soft
Page 29 and 30: Copying the test database to diskTa
Page 31 and 32: Additional datasets on the transfer
Page 45 and 46: Chapter 33Using and testing the gro
Page 47 and 48: Chapter 3Using and testing the grou
Page 49 and 50: Using the grouper utilityAs previou
Page 51 and 52: Using the grouper utilityThe age co
Page 53 and 54: Using the grouper utilityThe DRG co
Page 55 and 56: Chapter 44Using the grouper withhig
Page 57 and 58: Chapter 4Using the grouper withhigh
Page 59 and 60: General strategy for COBOL driving
Page 61 and 62: Input to the grouper subroutines➤
Page 63 and 64: Using the alternate interfaceThe al
Page 65 and 66: Chapter 55The MS-DRG grouper execut
Page 67 and 68: Chapter 5The MS-DRG grouper executo
Page 69 and 70: Construction of the record maskThe
Page 71 and 72: DRG determinationTesting for the AN
Page 73 and 74: Executor ABEND codesThere is one AB
Page 75 and 76: Appendix AAGrouping results for the
Page 77 and 78:
Appendix AGrouping results for the
Page 79 and 80:
COUNTS BY DRG401 0 | 451 0 | 501 11
Page 81 and 82:
22 5923 6024 3325 31COUNTS BY RTC0
Page 83 and 84:
IndexAABEND codes, 5.9Additional da
Page 85 and 86:
LLink-editingAssembler subroutines,
show all

(MS-DRG) Software - National Technical Information Service

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?