Hi Bruce,
Using C9.1 11313 NT 8.59
This is what is inside the routine. All code generated by NT;
data
loc:fieldclass string(StyleStringSize)
loc:extra string(StyleStringSize)
loc:disabled long
loc:saveCallPopups long
loc:counter long
! Start of "Set Value"
! [Priority 5000]
! End of "Set Value"
code
! Start of "Set Value"
! [Priority 5000]
! End of "Set Value"
loc:fieldclass = p_web.Combine(p_web.site.style.formentrydiv,,)
loc:fieldclass = choose(not(1=0),loc:fieldclass,'nt-hidden ' & loc:fieldclass)
! Start of "Set Class"
! [Priority 5000]
! End of "Set Class"
If p_web.site.FrontLoaded = 0 or loc:frontloading = net:GeneratingPage
p_web.DivHeader('LoginForm2A_' & p_web.nocolon('LOC:Password') & '_value',loc:fieldclass)
End
loc:fieldclass = ''
loc:fieldclass = p_web.combine(p_web.site.style.formentry,'wp-login-form-entry',)
If loc:viewonly
loc:fieldclass = clip(loc:fieldclass) & ' ' & p_web.combine(p_web.site.style.formEntryReadOnly,)
End
If loc:retrying
LOC:Password = p_web.RestoreValue('LOC:Password')
do ValidateValue::LOC:Password
If LOC:Password:IsInvalid then loc:fieldclass = clip(loc:fieldclass) & ' ' & p_web.combine(p_web.site.style.formEntryError,).
End
loc:extra = ''
! Start of "Set Value"
! [Priority 5000]
! End of "Set Value"
If Not (1=0) ! SecFieldHideStateRtn
p_web.site.HTMLEditor = net:HTMLTinyMCE
! --- STRING --- LOC:Password
loc:AutoComplete = 'autocomplete="off"'
loc:readonly = Choose(loc:viewonly,'readonly','')
loc:extra = clip(loc:extra) & ' size="' & clip(45) &'" style="width: '&(clip(45)/2)+1&'em;"'
loc:javascript = ''
if p_web.site.FrontLoaded and loc:frontloading = net:GeneratingData
p_web.Script('$(''#'&p_web.nocolon('LOC:Password')&''').val('''&p_web._jsok(p_web.GetSessionValueFormat('LOC:Password'))&''');')
Else
packet.append(p_web.CreateInput('password','LOC:Password',p_web.GetSessionValueFormat('LOC:Password'),loc:fieldclass,loc:readonly,clip(loc:extra) & ' ' & clip(loc:autocomplete),,loc:javascript,20,'tPassword','LOC:Password',,'imm',,,,'LoginForm2A') & p_web.CRLF)
End
do SendPacket
! Start of "After Value"
! [Priority 5000]
! End of "After Value"
End
if p_web.site.FrontLoaded = 0 or loc:frontloading = net:GeneratingPage
p_web.DivFooter()
end