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

Package: Beneficiary Travel

Routine: DGBTEE1


Information

DGBTEE1 ;ALB/SCK - BENEFICIARY TRAVEL ENTER/EDIT CHECK; 12/7/92 3/19/93 ;11/10/11 13:16

Source Information

Source file <DGBTEE1.m>

Entry Points

Name Comments DBIA/ICR reference
SCREEN ; called by dgbtee,dgbtce
START ; ask date/time, and division
ELIG1 ; select eligibility from those available in TMP list
ECHOZ ;
ESET ;
ESET1 ;
CERT ; stuff of certification date if appropriate
; naked global ref file #392.2, certification file.
ACCT ; allowed to select only valid active accounts
QUIT ;
DEFLT1() ;
ACCTHELP() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SCREEN+3
Function Call: WRITE
  • Prompt: !!,"Module has not been properly initialized - to continue you should first complete",!,"the parameters"
  • Line Location: SCREEN+4
Function Call: WRITE
  • Prompt: !?16,"Beneficiary Travel Claim Information <Enter/Edit>"
  • Line Location: SCREEN+5
Function Call: WRITE
  • Prompt: !!?8,"Name: ",VADM(1),?40,"PT ID: ",VA("PID"),?64,"DOB: ",$P(VADM(3),"^",2),!
  • Line Location: SCREEN+7
Function Call: WRITE
  • Prompt: !?5,"Another user is editing this entry.",*7
  • Line Location: START+9
Function Call: WRITE
  • Prompt: !?3,"SORRY, '^' NOT ALLOWED!!"
  • Line Location: ELIG1+4
Function Call: WRITE
  • Prompt: !,"ELIGIBILITY REQUIRED."
  • Line Location: ELIG1+7
Function Call: WRITE
  • Prompt: !!,"Choose by NUMBER the primary eligibility or other entitled eligibilities",!
  • Line Location: ECHOZ+1
Function Call: WRITE
  • Prompt: !?5,I,?10,$P(^TMP("DGBT",$J,I),"^",2)
  • Line Location: ECHOZ+2
Function Call: WRITE
  • Prompt: " ?? ",!,"Select ELIGIBILITY: "
  • Line Location: ECHOZ+5
Function Call: WRITE
  • Prompt: !,"ACCOUNT IS REQUIRED!!"
  • Line Location: ACCT+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGBT(392 - [#392] Classic Fileman Calls
^DGBT(392.3 - [#392.3] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call