Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBTRH5E

Package: Integrated Billing

Routine: IBTRH5E


Information

IBTRH5E ;ALB/FA - HCSR Create 278 Request ;12-AUG-2014

Source Information

Source file <IBTRH5E.m>

Entry Points

Name Comments DBIA/ICR reference
SELOU(IBTRIEN) ;EP
; Called from within Input template IB CREATE 278 REQUEST
; Provides the user with a quick view of currently entered Other UMO
; Information multiples and allows them to select one to edit or enter a new
; one.
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; Returns: Value of the .01 field of the multiple to edit
; "" if creating a new multiple, -2 to exit template
; IBNEW=1 when creating a new entry
OUTYPE(IBTRIEN) ; Prompts the user to enter the .01 (Entity Identifier) field
; of the Other UMO Information Multiple
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; Returns: Selected Entity Identifier or "" of not entered
DELOU(IBTRIEN,IEN) ; Checks to see if the user entered 'NEW' to create a new
; Other UMO Information Line and didn't enter any data for it OR selected a
; line to be deleted. If so, the Other Information Line with no data (or'
; selected) is deleted
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; IEN - Optional, IEN of the multiple to be deleted if passed
; defaults to ""
; Output: Empty or selected Other UMO Information line is deleted (Potentially)
SELSL(IBTRIEN) ;EP
; Called from within Input template IB CREATE 278 REQUEST
; Provides the user with a quick view of currently entered Service Lines and
; allows them to select one to edit or enter a new Service Line.
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; IBTRF - 1 - Being called from the brief form
; Returns: Value of the .01 field of the multiple to edit
; "" if creating a new multiple
; -1 if skipping altogether
; -2 to exit template
; IBNEW=1 when creating a new entry
GETSELLN(CNT,IBTRIEN,IEN,H1,H2) ; Gets a line of information to display a
; Service Line
; Input: CNT - Current line Count
; IBTRIEN - IEN of the entry
; IEN - IEN of the Service Line
; IBTRF - 1 - Being called from the brief form
; Output: H1 - 1st Header display line
; H2 - 2nd Header display line
; Returns: Service line display
DELSL(IBTRIEN,IEN) ; Checks to see if the user entered 'NEW' to create a new
; Service Line and didn't enter any data for it OR selected a service line
; to be deleted. If so, the Service Line with no data (or selected) is deleted
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; IEN - Optional, IEN of the multiple to be deleted if passed
; defaults to ""
; Output: Empty or selected Service line is deleted (Potentially)
SELSPD(IBTRIEN,SIEN) ;EP
; Called from within Input template IB CREATE 278 REQUEST
; Provides the user with a quick view of currently entered Service Line
; Provider Data multiples and allows them to select one to edit or enter a
; new one.
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; SIEN - Service Line Multiple IEN
; Returns: Value of the .01 field of the multiple to edit
; "" if creating a new multiple, -2 to exit multiple
; IBNEW=1 when creating a new entry
DELSPD(IBTRIEN,SIEN,IEN) ; Checks to see if the user entered 'NEW' to create a new
; Service Provider Data Line and didn't enter any data for it or selected a line
; to delete . If so, the Service Provider Data line with no data (or selectd) is deleted
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; SIEN - IEN of the Service Line
; IEN - Optional, IEN of the multiple to be deleted if passed
; defaults to ""
; Output: Empty OR selected Service Provider Data Line is deleted (Potentially)
PTYPE(IBTRIEN,SIEN) ; Prompts the user to enter the .01 (Provider Type) field
; of the Provider Data multiple
; Input: IBTRIEN - IEN of the 356.22 entry being edited
; SIEN - IEN of the Service Line
; Returns: IEN of the selected Provider Type or "" of not entered

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Other UMO Information is currently on file.",!
  • Line Location: SELOU+33
Function Call: WRITE
  • Prompt: !,"Entry #",ENTNUM," has been deleted."
  • Line Location: SELOU+52
Function Call: WRITE
  • Prompt: !,"Entry #",ENTNUM," has been deleted."
  • Line Location: SELSL+48
Function Call: WRITE
  • Prompt: !!," No Service Provider Data is currently on file.",!
  • Line Location: SELSPD+35
Function Call: WRITE
  • Prompt: !,"Entry #",ENTNUM," has been deleted."
  • Line Location: SELSPD+54

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBT(356.22 - [#356.22] Classic Fileman Calls
356.2215 FIELD^DID,  GET1^DIQ
356.2216 GET1^DIQ
356.22168 GET1^DIQ
^DGCR(399.2 - [#399.2] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call