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

Package: Integrated Billing

Routine: IBCECOB4


Information

IBCECOB4 ;ALB/CXW - IB EM MANAGEMENT - REVIEW STATUS SCREEN ;16-MAY-2000

Source Information

Source file <IBCECOB4.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for claims status awaiting resolution detail
HDR ; -- header code
INIT ; -- init variables and list array
SCR
INITQ
HELP ; -- help code
EXIT ; -- exit code
SET(X) ;
STATUS ; Edit review status
STATUSQ ;
ADDCOM(IBDA,DUZ,IBCOM,ADD) ; Add review comment to file 361.1
; IBDA = array containing the DA references for the file add -
; pass by reference
; DUZ = ien of the user
; ADD = flag when set to 1 says the review date exists,
; just allow comment entry
; Returns IBDA = the entry # of the comment
; and IBCOM array referencing any comments added by the user
KILLREV(IBDA) ; Deletes a review date if no comments entered

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Sorry, another user currently editing this entry (#"_IBDA_")."
  • Line Location: STATUS+10
Function Call: WRITE
  • Prompt: !,"Since FILED - NO ACTION final status was selected, you must enter a",!," comment explaining the FILED - NO ACTION"
  • Line Location: STATUS+20
Function Call: WRITE
  • Prompt: !,"The review status was not changed because no comment was entered",!
  • Line Location: STATUS+24
Function Call: WRITE
  • Prompt: !,"The review status was not changed because no final status was selected"
  • Line Location: STATUS+29
Function Call: WRITE
  • Prompt: !,"New Review Date: "_$$FMTE^XLFDT(X,2)
  • Line Location: ADDCOM+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBM(361.1 - [#361.1] Classic Fileman Calls
361.121 WP^DIE
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call