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

Package: Registration

Routine: DGOTHD2


Information

DGOTHD2 ;SLC/SS,RM,RED - OTHD (OTHER THAN HONORABLE DISCHARGE) APIs ;12/27/17

Source Information

Source file <DGOTHD2.m>

Entry Points

Name Comments DBIA/ICR reference
CROTHENT(DGDFN) ;
GETSITE(DUZ) ;
HAS2AUTH(DGIEN33,DGI3301,CLCKNO) ;
HASENTRY(DGDFN) ;
CLCKS365(DGIEN33) ;
CHCK365(DGIEN33,CLCKNO) ;
CHCK90(DGIEN33,DGI3301,CLCKNO) ;
CHCKPAT(DGDFN) ;
GETPAT(DGIEN33) ;
PROMPT(DGPROM,DGDFVL) ;
SELPAT(DGPAT) ;
INSREC(DGFILE,DGIEN,DGZFDA,DGRECNO,DGFLGS,DGLCKGL,DGLCKTM,DGNEWRE) ;*/
HELP3 ;display help text for 1st 90-Day period

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$INSREC^DG53952(8.1,"",.DGVALS,,,,,1)
  • Line Location: SELPAT+38
Function Call: WRITE
  • Prompt: $$INSREC^DGOTHD2(33.01,"8",.DGVALS)
  • Line Location: SELPAT+40
Function Call: WRITE
  • Prompt: $$INSREC^DGOTHD2(33.11,"1,8",.DGVALS)
  • Line Location: SELPAT+42
Function Call: WRITE
  • Prompt: !," You have entered an invalid date, please enter a valid date."
  • Line Location: HELP3+1
Function Call: WRITE
  • Prompt: !," The date entered cannot be more than 90 days in the past."
  • Line Location: HELP3+2
Function Call: WRITE
  • Prompt: !," A future date cannot be entered."
  • Line Location: HELP3+3

FileMan Files Accessed Via FileMan Db Call

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