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

Package: Fee Basis

Routine: FBUTL135


Information

FBUTL135 ;DSS/LJF - FEE BASIS UTILITY FOR UNIQUE CLAIM ID - FEE5010 ;3/23/2012

Source Information

Source file <FBUTL135.m>

Entry Points

Name Comments DBIA/ICR reference
UCLAIMNO(FBSTA,FBSRC,FBINT,FBCLT,FBCLAIMS) ; Unique Claim Identifier for patch 135
CLAIMNO() ; Return the value of field 39: UNIQUE CLAIM IDENTIFIER SEQ from file 161.4: FEE BASIS SITE PARAMETERS - incremented by one
VALIDATE(TYPE,UCID) ;
STATION() ; Set station
INVUCID(FBAAIN,FBSTA,FBSRC,FBINTYP,FBCLAIMS)
PAYUCID(DFN,FBV,FBSDI,FBAACPI,FBSTA,FBSRC,FBINTYP,FBCLTYP,FBCLAIMS)
OCLMTYP(FBCURVAL) ; Get Outpatient Claim Type from the user
UCIDUTL()
CLEAR()
UCIDRPT()
OUTDSPLY(FBSTRT,FBEND)
INDSPLY(FBSTRT,FBEND)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This is a required response."
  • Line Location: OCLMTYP+10
Function Call: WRITE
  • Prompt: !!,"This is a required response. '^' is not allowed."
  • Line Location: OCLMTYP+11
Function Call: WRITE
  • Prompt: !!,"This is a required response. '^' is not allowed."
  • Line Location: OCLMTYP+12
Function Call: WRITE
  • Prompt: !,"Enter a code from the list."
  • Line Location: OCLMTYP+14
Function Call: WRITE
  • Prompt: !,?5,"FEE BASIS PATCH 135 UNIQUE CLAIM IDENTIFIER DISPLAY"
  • Line Location: UCIDUTL+12
Function Call: WRITE
  • Prompt: !,"No Fee Basis Invoice Vendors found for this patient!"
  • Line Location: UCIDUTL+74
Function Call: WRITE
  • Prompt: !,"No Fee Basis Invoice DATE OF SERVICE found for this Vendor!"
  • Line Location: UCIDUTL+84
Function Call: WRITE
  • Prompt: !
  • Line Location: CLEAR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAA(161.4 - [#161.4] GET1^DIQ
^FBAAC - [#162] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call