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: IBJTRX

Package: Integrated Billing

Routine: IBJTRX


Information

IBJTRX ;ALB/ESG - TPJI ePharmacy ECME claim information ;22-Oct-2010

Source Information

Source file <IBJTRX.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for IBJT ECME RESP INFO
EX ;
HDR ; -- header code
INIT ; -- init variables and list array
INITX ;
VER ; Action to launch the View ePharmacy Rx report
VERX ;
HELP ; -- help code
EXIT ; -- exit code
SETL(TEXT,DATA,LABEL,LEND,LENL,COL) ; build line of text
; TEXT - existing line of text data
; DATA - field data
; LABEL - field label
; LEND - max length of data
; LENL - length of label (label will be right justified so the colons line up)
; COL - starting column for insert
SET(TEXT,VID) ; set data in variable TEXT into ListMan display
; VID is video attribute data of line if any
; Format: type;start column;width
; type=1 (reverse video)
; type=2 (bold)
; type=3 (underline)
SETX ;
AMT(VAL,L,P) ; convert dollar amount to external display
; VAL can be a number or the Fileman external version of the number
; L is the $J field length (default 8)
; P is a flag indicating the number should be enclosed within parentheses
; strip $ and spaces

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No Claim Defined!"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"Not available. This is not a Pharmacy Claim."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Not available. This is a Pharmacy Claim, but not an ECME Claim."
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"Rx data not found for this claim."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Rx IEN cannot be determined."
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !!,"System error. IBRXDATA missing."
  • Line Location: VER+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
9002313.0301 GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call