RNABILB0 SAP ABAP Report - IS-H: Change Billing Block via Conditions (Inpat./Day Pat. Cases)

SAP T-Codes / Example ABAP code
ABAP OO / SAP Function Modules
ABAP reports / SAP Error Messages
SAP Tables / SAP Video Training

RNABILB0 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this program to set or cancel the billing block for inpatient and day patient cases...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.

If you would like to execute this report or see the full code listing simply enter RNABILB0 into the relevant SAP transactions such as SE38 or SE80

Transaction Code(s):

Below is a list of transaction codes which are relevant to this SAP report

NA31 - IS-H: Change Billing Block Inpat.

ABAP code to call this SAP report using the submit statement

This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.

SUBMIT RNABILB0. "Basic submit
SUBMIT RNABILB0 AND RETURN. "Return to original report after report execution complete
SUBMIT RNABILB0 VIA SELECTION-SCREEN. "Display selection screen of submitted report to user
See more syntax options for the ABAP SUBMIT statement

Text pool values

Selection Text: AUFDT_B = Admission Date
Selection Text: AUFDT_V = Admission Date
Selection Text: BB_RESET = Cancel Billing Block
Selection Text: BB_SET = Set Billing Block
Selection Text: BTAG = Charge Proposal w/o Error
Selection Text: EDIA = Cases with Discharge Diagnosis
Selection Text: ENTDT_B = Discharge Date
Selection Text: ENTDT_V = Discharge Date
Selection Text: ENTL = With Discharge
Selection Text: ENTLART1 = With Discharge Type
Selection Text: ENTLART2 = With Discharge Type
Selection Text: FALNR = Case
Selection Text: HDIA = With Main Diagnosis
Selection Text: KUE = With IV
Selection Text: LL00 = Without Charge Proposal
Selection Text: NO_BTAG = Charge Check with Error
Selection Text: NO_EDIA = Without Discharge Diagnosis
Selection Text: NO_ENTL = Without Discharge
Selection Text: NO_HDIA = Without Main Diagnosis
Selection Text: NO_KUE = Without IV
Selection Text: NO_LL00 = With Charge Proposal
Selection Text: SEL_EXP = Update Case Selection
Selection Text: SEL_IMP = Case Selection
Selection Text: SE_EINRI = Institution
Selection Text: TESTMODE = Test Mode
Selection Text: WR_SEL = Append Sel. Indicator
Title: IS-H: Change Billing Block via Conditions (Inpat./Day Pat. Cases)
Text Symbol: UND = and
Text Symbol: U32 = Conditions with AND Operation (Optional)
Text Symbol: U31 = Conditions with OR Operation (Optional)
Text Symbol: U30 = Update Case Selection
Text Symbol: U26 = With Complete Coverage
Text Symbol: U25 = With Complete Services acc. to Charge Check
Text Symbol: U24 = With Error-Free Charge Check
Text Symbol: U23 = With Hospital Main Diagnosis
Text Symbol: U22 = With Discharge Diagnosis
Text Symbol: U21 = With Discharge
Text Symbol: U15 = With Incomplete Coverage

Text Symbol: U14 = With Existing Services acc. to Charge Proposal
Text Symbol: U13 = With Incorrect Charge Check
Text Symbol: U12 = Without Hospital Main Diagnosis
Text Symbol: U11 = Without Discharge Diagnosis
Text Symbol: 001 = Created By
Text Symbol: 002 = : Billing Block Set.
Text Symbol: 003 = : Billing Block Canceled.
Text Symbol: 004 = Test Mode
Text Symbol: 005 = Set Billing Block
Text Symbol: 006 = Cancel Billing Block
Text Symbol: 007 = No data found for selection criteria
Text Symbol: 008 = Comment
Text Symbol: 009 = Curr.Dept
Text Symbol: 010 = Discharge Type &
Text Symbol: 011 = Not Discharged
Text Symbol: 012 = Without Discharge Diagnosis
Text Symbol: 013 = Without Hospital Main Diagnosis
Text Symbol: 014 = Incorrect Charge Check
Text Symbol: 015 = Charge Proposal Exists
Text Symbol: 016 = Coverage Incomplete
Text Symbol: 017 = Block Set Without Check
Text Symbol: 018 = Block Was Canceled
Text Symbol: 019 = Case Blocked-no Change
Text Symbol: 020 = Case
Text Symbol: 021 = Live Mode
Text Symbol: 022 = Patient
Text Symbol: 023 = Block Can Be Set
Text Symbol: 024 = Block Can Be Canceled
Text Symbol: 025 = Set/Cancel Block
Text Symbol: 026 = Block Icon
Text Symbol: 027 = Case Selection
Text Symbol: 064 = No. of Cases:
Text Symbol: B01 = Selection
Text Symbol: B02 = Processing Mode
Text Symbol: B03 = Further Options
Text Symbol: BIS = To
Text Symbol: G01 = Basic List
Text Symbol: ODR = Or
Text Symbol: S01 = Institution

Text Symbol: S06 = Test Mode
Text Symbol: U02 = Set Billing Block for Cases
Text Symbol: U03 = Cancel Billing Block for Cases
Text Symbol: U04 = Admission Date
Text Symbol: U05 = Discharge Date
Text Symbol: U10 = Without Discharge

INCLUDES used within this REPORT RNABILB0

INCLUDE RNDATA00.
INCLUDE RNSSEINR.
INCLUDE RNABILB4.

TABLES used within REPORT and the associated SELECT statement:

No SAP DATABASE tables are accessed within this REPORT code!

Function Modules used within report and the associated call statement:

ISH_CALL_LIST_HEAD * CALL FUNCTION 'ISH_CALL_LIST_HEAD' * EXPORTING ** AUSBEGDT = '00000000' ** AUSENDDT = '00000000' * EINRI = SE_EINRI * LINE_SIZE = LSIZE * REPID = REPID * TITLE_LIN1 = HEADER1 * TITLE_LIN2 = HEADER2 * ULINE = ' ' ** VERBEGDT = '00000000' ** VERENDDT = '00000000' * EXCEPTIONS * INVALID_EINRI = 1 * OTHERS = 2.

ENQUEUE_ENFAK CALL FUNCTION 'ENQUEUE_ENFAK' EXPORTING * MODE_NFAK = 'E' * MANDT = SY-MANDT einri = se_einri selkz = sel_exp * X_EINRI = ' ' * X_SELKZ = ' ' * _SCOPE = '2' * _WAIT = ' ' * _COLLECT = ' ' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.

STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING objnr = infal-objnr status = bill_block_status EXCEPTIONS object_not_found = 1 status_not_active = 2 OTHERS = 3.

ISH_READ_NPAT CALL FUNCTION 'ISH_READ_NPAT' EXPORTING ss_patnr = infal-patnr SS_READ_DB = on SS_CHECK_AUTH = off SS_WITH_NADR = off IMPORTING SS_NPAT = ls_npat EXCEPTIONS NOT_FOUND = 1 OTHERS = 4.

STATUS_CHECK CALL FUNCTION 'STATUS_CHECK' EXPORTING objnr = infal-objnr status = bill_block_status EXCEPTIONS object_not_found = 1 status_not_active = 2 OTHERS = 3.

ISH_GRAPHIC_ORGID_SELECT * CALL FUNCTION 'ISH_GRAPHIC_ORGID_SELECT' * EXPORTING ** AMBES = '*' ** ANFKZ = '*' ** ARCHV = '*' ** ARCOE = '*' ** AUFKZ = '*' ** BELEG = '*' ** BETKZ = ' ' ** DATE = SY-DATUM ** DISKZ = '*' * EINRI = SE_EINRI ** ERBKZ = '*' * FAZUW = 'X' * FREIG = 'X' * GRAPH_TITLE = SY-TITLE ** INTEN = '*' ** INTKZ = '*' ** LGTXT = '*' * LOEKZ = ' ' ** NO_BAUID = 'X' ** ORGDS = '*' ** PFZUW = '*' ** SPERR = '*' ** START_BAUID = ' ' ** VCODE = 'UPD' ** ZIMKZ = ' ' ** START_ORGFA = ' ' ** START_ORGPF = ' ' * IMPORTING * NOTHING_SELECTED = NSEL ** placed_above_orgfa = ** placed_above_orgpf = ** placed_above_room = ** selected_bauid = * SELECTED_ORGID = ORGID * EXCEPTIONS * BAUID_NOT_IN_NBAU = 1 * EINRI_NOT_IN_TN01 = 2 * NO_HIERARCHY = 3 * ORGID_NOT_IN_NORG = 4 * OTHERS = 5.

ISH_READ_NDIA
  CALL FUNCTION 'ISH_READ_NDIA'
       EXPORTING
            afdia   = 'X'
            bhdia   = 'X'
            einri   = $se_einri
            endia   = 'X'
            ewdia   = 'X'
            falnr   = $falnr
            fhdia   = 'X'
            khdia   = 'X'
*                 LFDNR   = ' '
            opdia   = 'X'
*                 SPERR   = ' '
*                 STORN   = ' '
*            importing
*                 rc      =
       TABLES
            ss_ndia = $india
       EXCEPTIONS
            OTHERS  = 1.

ISH_CALL_RULE_SERVICES_BILLING CALL FUNCTION 'ISH_CALL_RULE_SERVICES_BILLING' EXPORTING einri = $se_einri * EVENT = ' ' infal = $infal inpat = $npat * MESSAGES_COLLECT = 'X' * MESSAGES_SHOW = ' ' rgart = 'R5' stichtag = $akt_dat * AKTION = ' ' IMPORTING errors = errors warnings = warnings TABLES ernlsr = ernlsr inlei = $inlei ivnbew = $inbew EXCEPTIONS error = 1 OTHERS = 2.

ISH_CALL_RULE_SERVICES_PROPOSE CALL FUNCTION 'ISH_CALL_RULE_SERVICES_PROPOSE' EXPORTING einri = $se_einri infal = $infal inpat = $npat * MESSAGES_COLLECT = 'X' * MESSAGES_SHOW = ' ' rgart = 'R7' stichtag = $akt_dat aktion = 'X' * importing * errors = * warnings = TABLES ernlsr = ernlsr inlei = $inlei ivnbew = $inbew EXCEPTIONS error = 1 OTHERS = 2.

ISH_SUPERVISE_PAYMENT_GUARENT CALL FUNCTION 'ISH_SUPERVISE_PAYMENT_GUARENT' EXPORTING einri = $se_einri falnr = $falnr * LOOKAHEAD = 0 stdat = $akt_dat TABLES e_action_allg = msg_allg e_action_nksk = msg_nksk e_action_nksp = msg_nksp e_action_nlei = msg_nlei i_nksk = inksk i_nksp = inksp i_nlei = $inlei i_nlkz = inlkz i_ncir = it_ncir EXCEPTIONS OTHERS = 1.

MESSAGES_INITIALIZE CALL FUNCTION 'MESSAGES_INITIALIZE' * exporting * COLLECT_AND_SEND = ' ' * RESET = 'X' * LINE_FROM = '000' * LINE_TO = '999' EXCEPTIONS OTHERS = 1.

ISH_FILTER_PG_MESSAGES CALL FUNCTION 'ISH_FILTER_PG_MESSAGES' EXPORTING einri = $se_einri mess_coll = 'X' mess_show = ' ' * MESS_TITLE = ' ' TABLES i_action_allg = msg_allg i_action_nksk = msg_nksk i_action_nksp = msg_nksp i_action_nlei = msg_nlei EXCEPTIONS OTHERS = 1.

MESSAGES_STOP
  CALL FUNCTION 'MESSAGES_STOP'
    EXCEPTIONS
      a_message = 1
      e_message = 2
      i_message = 3
      w_message = 4
      OTHERS    = 5.

ENQUEUE_ENFAL * CALL FUNCTION 'ENQUEUE_ENFAL' * EXPORTING ** MODE_NFAL = 'E' ** MANDT = SY-MANDT * EINRI = $INFAL-EINRI * FALNR = $INFAL-FALNR ** X_EINRI = ' ' ** X_FALNR = ' ' ** _SCOPE = '2' ** _WAIT = ' ' ** _COLLECT = ' ' * EXCEPTIONS * FOREIGN_LOCK = 1 * SYSTEM_FAILURE = 2 * OTHERS = 3.

ISH_UPDATE_NFAL_FSPER * CALL FUNCTION 'ISH_UPDATE_NFAL_FSPER' * EXPORTING * FSPER = FSPER * N_NFAL = $INFAL * O_NFAL = $INFAL ** TCODE = SY-TCODE * EXCEPTIONS * OTHERS = 1.

DEQUEUE_ENFAL * CALL FUNCTION 'DEQUEUE_ENFAL' * EXPORTING ** MODE_NFAL = 'E' ** MANDT = SY-MANDT * EINRI = $INFAL-EINRI * FALNR = $INFAL-FALNR ** X_EINRI = ' ' ** X_FALNR = ' ' ** _SCOPE = '3' ** _SYNCHRON = ' ' ** _COLLECT = ' ' * EXCEPTIONS * OTHERS = 1.

ISH_INSREL_CASE_GETLIST CALL FUNCTION 'ISH_INSREL_CASE_GETLIST' EXPORTING i_einri = $se_einri i_falnr = $falnr i_authcheck = off * I_SEL_STORN = ' ' i_read_text = off i_read_adr = off TABLES e_ncir = pt_ncir.

Contribute (Add Comments)

Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.

The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.

This will then be available for everyone to easily find by simply searching on the report name RNABILB0 or its description.

RNABILB0 - IS-H: Change Billing Block via Conditions (Inpat./Day Pat. Cases)
RNABILB0 - IS-H: Change Billing Block via Conditions (Inpat./Day Pat. Cases)
RNABIEO00 - documentation and ABAP source code
RNABG002 - documentation and ABAP source code
RNABG002 - documentation and ABAP source code
RNABG000 - IS-H: Determine Cost Portions with Workers' Comp. Assoc. Billing

RM_RECIPE_SAMPLE_DATA_F03

RLXYRD_SCHDL_CHART_IN_SELSCR

RMCSACU8